VB的几种循环

次数已知的循环语句For…next 循环

例子1

Dim i%,y%

For i = 1 To 10 Step 2

y= y + 1

Next i

step2表示i=i+2

所以这个是循环5次

例子2

Dim i,c As Integer

c = 0

For i = -12 To -33 Step -4

c = c + 1

Next i

当结束的时候，c=6,i=-36

例子3

Dim t,u,i,j As Integer

t = 0: u = 0

For i = 1 To 3

For j = 1 To i

t = t + 1

Next j

u = u + 1

Next i

MsgBox (Str(t)& "" & Str(u))

这个出现的MsgBox 弹出框显示6 3

I=4; j=4 ; t=6;u=3

当型/直到型循环语句Do …loop循环

1)Do while<条件>

<循环体>

Loop

2)Do until<条件>

<循环体>

Loop

3）Do

<循环体>

Loop while<条件>

4）Do

<循环体>

Loop until<条件>

例子4Do while

Dim k,n,m As Integer

n = 10

m = 1

k = 1

Do While k <= n

m = m + 2

k = k + 1 （这句话是不可缺省的，否则会死循环）

Loop

MsgBox (m)

例子5

当型循环语句 While …wend

While <条件>

<循环体>

Wend

是依据条件的true或false来决定循环的