Vitajte na [www.pocitac.win] Pripojiť k domovskej stránke Obľúbené stránky
Otvorte zdrojový súbor v jazyku Visual Basic 6
2
Pridať " pre " slučky zadaním nasledujúci kód do vašich funkcií : . ClipArt
Dim x As Integer
Dim počet As Integer
x = 0
počet = 1 až 6 Krok 2
x = x + 2
Ďalšie
" pre " slučka sa skladá z pultu , rozsahu pultu , krok a príkazy vykonať pri každej iterácii . Argument " krok " určuje , koľko čítač zvýši medzi iterácií . Ak vynecháte " krok " kľúčové slovo je nastavená na predvolenú hodnotu 1. V príklade , v prvej iterácii , " počet " je rovné 1 a " X " je nastavená na hodnotu 2 ( 0 +2 ) . Na druhej iterácii " počítať " je nastavená na hodnotu 3 , a " X " je nastavený na 4 ( 2 +2 )
Ak chcete prechádzať zoznamom miesto , pridajte nasledujúci kód : .
Dim MyColors ( 2 ) ako String
Dim farby , String
MyColors ( 0 ) = " Blue " Spojené
MyColors ( 1 ) = " Green "
MyColors ( 2 ) = " Yellow "
pre každú farbu v MyColors
Debug.Print farba
Ďalšie
slučky proces sa opakuje pre každý hodnota v zozname , ktorý je typicky pole alebo kolekcia . Iterácie premenná " farba " , musí byť rovnakého typu ako prvky v zozname
3
Pridať " do " slučky zadaním nasledujúci kód : .
Dim x As Integer
x = 0
robiť , keď x < 10
x = x + 2
Loop
slučka udržuje iterácie , kým podmienka za kľúčovým slovom " to " je splnená . Podmienka je kontrolovaná na začiatku pred každou novou iteráciu . Prípadne môžete nastaviť tak , aby iterácii , kým podmienka je splnená pridaním nasledujúceho kódu :
X = X + 2
Loop Do X > 10
V " slučke , kým " štruktúry podmienka je kontrolovaná po skončení každej iterácie . Ak chcete ukončiť slučku , než je splnená podmienka , pridajte " Exit Do " vnútri slučky .
4
Uložte súbor VB6 , skompilovať a spustiť program pre prezeranie slučky .