" Att fela är mänskligt , att verkligen ställa upp tar en dator " . Denna gamla ordspråket avslöjar hur en dator kan upprepa samma process om och om flera gånger per sekund . När det gäller datorprogrammering , kallas detta en loop . Visual Basic har tre olika loop -konstruktioner : För medan och Do . Varje upprepar ett block av kod antingen ett visst antal gånger eller baserat på ett villkor . Följ dessa steg för att prova de tre looping konstruktioner . Saker du behöver
Microsoft Visual Basic Express eller Visual Studio ( version 2003 eller senare )
Visa fler instruktioner
1
Öppna Visual Basic och skapa en ny konsol ansökan . Klicka på " File ", " Nytt projekt . " Välj " Windows " under " Visual Basic " i trädvyn . Klicka på " Console Application ", " OK . " Koden fönstret för den nya konsolen ansökan kommer att visas . Ange all kod mellan de två raderna nedan
Sub Main ( ) katalog
' - . Kod går här - AktieTorget
End Sub
2
Skapa en for-loop . Detta upprepar ett block av kod under variation ett index från ett värde till ett annat . Ange koden enligt följande :
Dim I As Integer
För i = 2 till 10 Steg 2 Review
Console.Write (i ) katalog
Console . Skriv ( " " ) katalog
Nästa
Console.WriteLine ( ) katalog
Denna slinga varierar heltal jag från 2 till 10 , kliva av 2 . Slingan upprepas för värdena 2 , 4 , 6 , 8 och 10 , varje gång du skriver ut numret till konsolen . Efter loopen är klar , är konsolen markören fram till nästa rad . När det körs , visas resultatet som följer:
2 4 6 8 10
3
Skapa en while-slinga . Detta upprepas så länge som ett villkor är uppfyllt . Ange koden enligt följande :
i = 1
Medan jag < = 5
Console.Write (i ) katalog
Console.Write ( " " ) katalog
i + = 1
Slut Medan
Console.WriteLine ( ) katalog
I detta exempel slingan räknar från 1 till 5. Indexet jag är satt till 1 , då while-slingan upprepade gånger skriver värdet jag till konsolen adderar sedan 1 . While-slingan säger att det kommer att upprepa när jag är mindre än eller lika med 5 , så när jag får till 6 , slingan stannar . Utgången visas enligt följande :
1 2 3 4 5
4
Skapa en Do loop . Detta liknar en
Medan slingan men fortsätter tills ett villkor är uppfyllt . Ett Do loop körs alltid minst en gång . Ange koden enligt följande :
i = 1
Gör
Console.Write (i ) katalog
Console.Write ( " " ) katalog
i + = 1 Gör
loop Until i> 5
Console.WriteLine ( ) katalog
Detta exempel liknar While loop men märker att villkoret visas efter slingan och att slingan upprepas tills villkoret är uppfyllt . Utgången är samma som i föregående exempel.
