VB 中关于多重循环的执行问题

在程序设计中，变量、类型等是基础，语句才是直接影响程序功能发挥的因素

程序的功能无非就是这么几个：

 

判断：

判断某个变量是不是某个值，然后执行某个动作

 

跳转：

通常在判断后转到对应的语句上，而不是一路执行下来

 

循环：

其实循环可以说是判断+跳转，如汇编的修改IP指针，C++和VB的Goto语句，C/C++也可以用指针

来跳转，但是专门的循环语句要容易用的多，VB中常见的循环就是For循环和Do循环，应该说Do循环

是包含了While循环的。

 

退出循环，可以用Exit语句，Exit for，Exit Do，While循环则不能半路退出，直到条件满足。

 

我们来看例子:

Public Sub dfind()
Dim i, j As Integer
Dim bFind As Boolean
For i = 1 To 5
 For j = 0 To i
  If i * j > 10 Then                    '判断
    bFind = True                        '标识已经完成
    MsgBox str(i) + " " + str(j)
    Exit For                            '只是退出for j循环
    If bContinue = False Then Exit Sub  '直接跳出过程，当然也跳出了所有循环
  End If
 Next j
 If bFind = True Then Exit For          '满足则跳出for i循环，否则继续
Next i
End Sub

 

其实对这种问题有一种豪放就是Debug，VB6中用F8单步调试，就可以对整个过程一目了然了。