Do While...Loop 循环

Do While...Loop 循环的意思是，当条件满足时，执行循环，直到条件不满足时，停止循环。

Do While...Loop 循环语法如下：

Do While 条件
   在满足条件的情况下执行的语句
Loop

举个例子。
1. 新建一个 Form。
2. 添加一个 Button 控件，将其 Name 属性设置为btnLoop，Text 属性设置为 Loop。
3. 添加一个 ListBox 控件，将其 Name 设置为 lstLoop。
4. 双击 Button 控件，进入代码编辑器，然后加入下面红色代码如下：

Public Class Form1
    Private Sub btnLoop_Click(ByVal sender As System.Object, 
    ByVal e As System.EventArgs) Handles btnLoop.Click
        Dim number As Integer = 8
        Do While number > 5
            number -= 1
            lstLoop.Items.Add(number)
        Loop
    End Sub
End Class

5. 然后 F5 运行，点击 btnLoop 按钮，你会看到在 ListBox 显示的数字是

7
6
5

这段代码的意思是，当number 大于5的情况下，执行 Do While...Loop 中的代码，即每次 number 减 1，number -= 1 等同于number = number - 1 ，然后将减得的数添加到 ListBox 里，不断循环执行，直到 number 不再大于 5了，停止循环。

Do While...Loop 和 Do Until...Loop 循环的区别

Do While...Loop 是满足条件的情况下执行循环，而 Do Until...Loop 正相反，是在满足条件的情况下退出循环，停止循环。

编者或作者: 我有闲    收录日期: 2008-10-22
参考或来源:

上一页: Do Until...Loop 循环 返回上级目录: 流程控制 下一页: Do...Loop 循环的其他形式