While…Wend 语句

在给定条件为 True 时执行一系列语句。

语法

While condition
   [statements]
Wend

参数：

Condition：求值结果为 True 或 False 的数字或字符串表达式。如果条件为 Null，则将条件视为 False。
Statements：条件为 True 时执行的一个或多个语句。

注释

如果条件为 True，则会执行 statements 中的所有语句，直到遇到 Wend 语句为止。然后，控制权返回到 While 语句，并再次检查条件。如果条件仍为 True，则会重复执行该过程。如果它不是 True，则会继续执行 Wend 语句后面的语句。

While...Wend 循环可以嵌套到任意层。每个 Wend 匹配最近的 While。

Note:

Do...Loop 语句提供了一种更结构化和更灵活的方式来执行循环。

以下示例说明了 While...Wend 语句的用法：

示例 1：

Dim Counter
Counter = 0   ' Initialize variable.
While Counter < 20   ' Test value of Counter.
   Counter = Counter + 1   ' Increment Counter.
Wend   ' End While loop when Counter > 19.