Forstå, hvordan loops arbejder i Visual Basic 6 ( VB6 ) er vigtig , fordi det lader dig udføre blokke af kode flere gange . De to hovedtyper af loops er " for" og " Do" sløjfer. A "for " loop er en forkortet udgave af en "gør " loop , der bruges, når antallet af gentagelser er kendt på forhånd . Nogle anvendelser af en løkke læser i linjer fra en fil , trykning alles navn fra en medarbejder listen og sortering gennem et array på udkig efter en bestemt værdi. Instruktioner
1

Åbn din kilde fil i Visual Basic 6
2

Tilføj "for" loop ved at skrive følgende kode i din funktion : .
< P > Dim x As Integer

Dim tæller As Integer

x = 0

count = 1 til 6 Trin 2

x = x + 2 < br >

Next

A "for " loop består af en tæller , til den række af tælleren , et trin og kommandoerne udføre under hver iteration . Den " trin " argument sætter hvor meget tælleren vil stige mellem iterationer. Hvis du udelader "step " søgeord den er indstillet til standardværdien på 1. . I eksemplet i første iteration " count" er lig med 1 , og "X" er sat til 2 (0 +2) . . På den anden iteration " count" er indstillet til 3 , og "X" er sat til 4 (2 +2)
p Hvis du ønsker at sløjfe gennem en liste i stedet , skal du tilføje følgende kode : Hej < p > Dim MyColors (2) As String

Dim farve som String

MyColors (0 ) = "blå"

MyColors (1) = " Grøn "

MyColors (2) = " Yellow "

hver farve I MyColors

Debug.Print farve

Næste

løkke gentager for hver værdi på listen , som typisk er en matrix eller samling. Den iteration variabel "farve ", skal være af samme type som de elementer på listen
3

Add a " Do" loop ved at skrive følgende kode : .
< p> Dim x som Integer

x = 0

Do While x < 10

x = x + 2

Loop
< p > løkken holder iteration mens tilstanden efter " Do " søgeord er opfyldt . Betingelsen er kontrolleres i begyndelsen før hver ny iteration . Alternativt kan du indstille den til at gentage , indtil en betingelse er opfyldt ved at tilføje følgende kode : Hej

Gør

X = X ​​+ 2

Loop Indtil X > 10 < br >

et "loop indtil" struktur tilstanden kontrolleres, efter afslutningen af ​​hver iteration . Hvis du ønsker at afslutte løkken før betingelsen er opfyldt , skal du tilføje "Exit Do" inde i din løkke.
4

Gem VB6 filen , kompilere og køre programmet for at se din løkke.