Do 循环

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

功能

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

语法

1
2
3
Do
循环体
Loop
1
2
3
Do While 条件
循环体
Loop
1
2
3
Do Until 条件
循环体
Loop
1
2
3
Do
循环体
Loop While 条件
1
2
3
Do
循环体
Loop Until 条件

参数

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

返回值

示例

1
2
3
4
5
//最常见的无限循环(死循环)
Do
TracePrint "啊呀,停不下来了,头晕。。。"
Delay 500
Loop
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
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
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
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
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 循环通常用于无限循环与条件循环, 要注意 WhileUntil 的位置与条件, 如果怕弄迷糊的话, 那么就使用 If 结合 Exit Do 作为退出条件
  • 注意, Exit Do 只能退出离它最近的当前 Do 循环