VBScript 中的循环语句详解117

在 VBScript 中，循环语句用于重复执行一组语句，直到满足特定条件。有三种主要的循环语句类型：Do While、Do Until 和 For Each。

Do While 循环

Do While 循环重复执行一组语句，只要条件为真。语法格式如下：```
Do While
[statements]
Loop
```

其中：* `` 是循环的条件表达式。如果条件为真，则执行循环体。
* `[statements]` 是要重复执行的语句。

例如，以下代码使用 Do While 循环来统计一个字符串中字符的数量：```
str = "Hello, world!"
count = 0
Do While count <
count = count + 1
Loop
MsgBox "字符串中的字符数：" & count
```

Do Until 循环

Do Until 循环重复执行一组语句，直到条件为假。语法格式如下：```
Do Until
[statements]
Loop
```

其中：* `` 是循环的条件表达式。如果条件为假，则执行循环体。
* `[statements]` 是要重复执行的语句。

例如，以下代码使用 Do Until 循环来读取用户输入，直到用户输入 "exit"：```
Do Until InputBox("请输入文本（输入 exit 退出）") = "exit"
MsgBox "已输入文本：" & InputBox("请输入文本（输入 exit 退出）")
Loop
```

For Each 循环

For Each 循环用于遍历集合中的每个项目。语法格式如下：```
For Each In
[statements]
Next
```

其中：* `` 是用于存储集合中每个项目的变量。
* `` 是要遍历的集合。
* `[statements]` 是要为集合中的每个项目重复执行的语句。

例如，以下代码使用 For Each 循环来打印一个数组中的所有元素：```
arr = ("one", "two", "three")
For Each item In arr
MsgBox item
Next
```

选择合适的循环语句

在选择要使用的循环语句类型时，需要考虑以下因素：* 循环条件：使用 Do While 循环或 Do Until 循环时，需要明确定义循环条件。使用 For Each 循环时，循环条件隐含在集合中。
* 集合遍历：如果您需要遍历集合中的每个项目，请使用 For Each 循环。
* 其他因素：例如，Do While 循环可以嵌套在另一个 Do While 循环中，这可以创建更复杂的循环结构。

通过理解每种循环语句类型的特性，您可以选择最适合特定任务的循环语句。

示例代码

以下是一些 VBScript 循环语句的示例代码：```
' 使用 Do While 循环累加从 1 到 10 的数字
count = 0
Do While (count < 10)
count = count + 1
MsgBox "当前计数：" & count
Loop
' 使用 Do Until 循环读取用户输入，直到输入 "exit"
Do Until InputBox("请输入文本（输入 exit 退出）") = "exit"
MsgBox "已输入文本：" & InputBox("请输入文本（输入 exit 退出）")
Loop
' 使用 For Each 循环遍历数组中的所有元素
arr = ("one", "two", "three")
For Each item In arr
MsgBox item
Next
```

通过练习使用这些循环语句，您可以编写出更有效、更灵活的 VBScript 脚本。

2025-01-16

上一篇：IF 函数条件为中文的 VBScript

下一篇：利用 VBScript 计算前 N 项和