Question

在vb循环结构中的Exit···语句用于强制退出循环，可是具体怎么用

Answer 1

do loop就exit do
for 就exit for
跟在退出条件后面就行了
比如
Sub ExitStatementDemo()
Dim I, MyNum
For I = 1 To 1000
MyNum = Int(Rnd * 1000)
Select Case MyNum 。
Case 7: Exit For
Case 54: Exit Sub
End Select
Next I
End Sub

追问

抱歉，我只学了点基础，能不能编个简单点的例子？用Exit时，是不是在Exit前面要加一个条件，让程序退出就行了？

追答

对啊
这个程序就是生成一个随机数赋给MyNum，Select后边根据MyNum的值进行操作，如果是7就退出循环