VB for循环怎么在循环内设置停止循环？

VB for循环怎么在循环内设置停止循环？

VB中用 Exit 语句可以直接退出 For 循环、Do 循环、子过程或函数过程。Exit 语句的语法很简单：Exit For 在 For 循环中出现的次数没有限制，Exit Do 在 Do 循环中出现的次数也没有限制。
Exit For 和 Exit Do非常有用，因为它有时适于立即退出循环，而且不再执行循环中的任何进一步迭代或者语句。例如，在前面的打印屏幕和打印机共有字体的例子中，程序不断将打印机字体和给定的屏幕字体作比较，甚至在已经找到了一个相符的打字机字体后还在继续寻找。对这个函数有一个效率更高的改进版，在此，只要找到相匹配的字体后就立即退出循环：
Private Sub Form_Click()
    Dim SFont, PFont
    For Each SFont In Screen.Fonts()
        For Each PFont In Printer.Fonts()
            If SFont = PFont Then
                Print SFont
                Exit For            '退出内圈循环。
            End If
        Next PFont
    Next SFont
End Sub

exit for

Exit for

For i=0 To 20
Response.Write(i)
If i >= 10 Then
Exit For
End If
Next
用Exit For 可以无条件退出当前For循环

exit for