Do 循环

🎯功能

条件循环语句。可以是无限循环，也可以是有限循环。

📜语法

Do...Loop

无条件无限循环

Do
   循环体
Loop

Do While...Loop

条件成立时进入循环

Do While 条件
   循环体
Loop

Do Until...Loop

条件不成立时进入循环

Do Until 条件
   循环体
Loop

Do...Loop While

循环到条件不成立为止

Do
   循环体
Loop While 条件

Do...Loop Until

循环到条件成立为止

Do
   循环体
Loop Until 条件

Exit Do

使用If判断灵活退出循环

Do
   循环体
   If 条件 then
      Exit Do
   End If
   循环体
Loop

📥参数

参数	数据类型	解释
条件	布尔值	任意有效的条件表达式。
循环体	代码块	任意有效的代码语句块。

📤返回

无

💡示例

Do...Loop

无条件无限循环

//最常见的无限循环（死循环）
Do
   TracePrint "啊呀，停不下来了，头晕。。。"
   Delay 500
Loop

Do While...Loop

条件成立时进入循环

Dim i
i = 0
//当条件成立时，进入循环，直到条件不成立，退出循环
Do While i < 10
   i = i + 1
   TracePrint "正在循环中，i=", i
Loop
TracePrint "循环结束，i=", i

Do Until...Loop

条件不成立时进入循环

Dim i
i = 0
//当条件不成立时，进入循环，直到条件成立，退出循环
Do Until i > 5
   i = i + 1
   TracePrint "正在循环中，i=", i
Loop
TracePrint "循环结束，i=", i

Do...Loop While

循环到条件不成立为止

Dim i
i = 0
//进入循环，当条件不成立，退出循环
Do
   i = i + 1
   TracePrint "正在循环中，i=", i
Loop While i > 5
TracePrint "循环结束，i=", i

Do...Loop Until

循环到条件成立为止

Dim i
i = 0
//进入循环，当条件成立，退出循环
Do
   i = i + 1
   TracePrint "正在循环中，i=", i
Loop Until i > 5
TracePrint "循环结束，i=", i

Exit Do

使用If判断灵活退出循环

Dim i
i = 0

Do
   i = i + 1
   TracePrint "正在循环中，i=", i
   If i = 10 then
      TracePrint "准备退出循环"
      Exit Do
   End If
Loop
TracePrint "循环结束，i=", i

实现continue

实现continue

//使用Goto跳过某次循环，实现高级语言中的continue功能
Dim i
i = 0
//进入循环，当条件成立，退出循环
Do
   i = i + 1
   If i = 2 Then
      Goto 跳过循环
   End If
   TracePrint "正在循环中，i=", i
   Rem 跳过循环
Loop Until i > 5
TracePrint "循环结束，i=", i

📘备注

• Do循环通常用于无限循环与条件循环，要注意While和Until的位置与条件，如果怕弄迷糊的话，那么就使用If结合Exit Do作为退出条件。
• 注意，Exit Do只能退出离它最近的当前Do循环。