VB循环

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来决定循环的