20、Visual Basic 循环与计时器的使用指南

Visual Basic 循环与计时器的使用指南

1. For…Next 循环中的 Exit For 语句

在 Visual Basic 里，多数 For…Next 循环能顺利执行到结束。不过，有时当特定的“退出条件”出现时，提前结束循环会很有用。这时可借助 Exit For 语句提前终止 For…Next 循环的执行，使程序跳转到循环后的第一条语句继续执行。

以下示例代码会提示用户输入 10 个名字，并逐个显示在文本框中，直到用户输入“Done”：

Dim i As Integer 
Dim InpName As String 
For i = 1 To 10 
    InpName = InputBox("Enter your name or type Done to quit.") 
    If InpName = "Done" Then Exit For 
    TextBox1.Text = InpName 
Next i

当用户输入“Done”时， Exit For 语句会终止循环，程序接着执行 Next 之后的语句。

2. Do 循环的编写

Do 循环是 For…Next 循环的替代方案，它会持续执行一组语句，直到特定条件为真。Do 循环很实用，因为很多时候我们无法提前知晓循环需要重复的次数。

Do 循环有多种格式，取决于循环条件的评估位置和方式。最常见的语法是：