02.基本命令02.控制命令

Do 循环

文章目录
  1. 1. 功能
  2. 2. 语法
  3. 3. 参数
  4. 4. 返回值
  5. 5. 示例
  6. 6. 备注

功能

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

语法

语法1
1
2
3
Do
    循环体
Loop
语法2
1
2
3
Do While 条件
    循环体
Loop
语法3
1
2
3
Do Until 条件
    循环体
Loop
语法4
1
2
3
Do
    循环体
Loop While 条件
语法5
1
2
3
Do
    循环体
Loop Until 条件

参数

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

返回值

无

示例

例子1
1
2
3
4
5
//最常见的无限循环（死循环）
Do
   TracePrint "啊呀，停不下来了，头晕。。。"
   Delay 500
Loop
例子2
1
2
3
4
5
6
7
8
Dim i
i = 0
//当条件成立时，进入循环，直到条件不成立，退出循环
Do While i < 10
   i = i + 1
   TracePrint "正在循环中，i=", i
Loop
TracePrint "循环结束，i=", i
例子3
1
2
3
4
5
6
7
8
Dim i
i = 0
//当条件不成立时，进入循环，直到条件成立，退出循环
Do Until i > 5
   i = i + 1
   TracePrint "正在循环中，i=", i
Loop
TracePrint "循环结束，i=", i
例子4
1
2
3
4
5
6
7
8
Dim i
i = 0
//进入循环，当条件不成立，退出循环
Do
   i = i + 1
   TracePrint "正在循环中，i=", i
Loop While i > 5
TracePrint "循环结束，i=", i
例子5
1
2
3
4
5
6
7
8
Dim i
i = 0
//进入循环，当条件成立，退出循环
Do
   i = i + 1
   TracePrint "正在循环中，i=", i
Loop Until i > 5
TracePrint "循环结束，i=", i
例子6
1
2
3
4
5
6
7
8
9
10
11
12
Dim i
i = 0
//跳出循环
Do
   i = i + 1
   TracePrint "正在循环中，i=", i
   If i = 10 then
      TracePrint "准备退出循环"
      Exit Do
   End If
Loop
TracePrint "循环结束，i=", i

备注

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