当指定的条件为 True 时,执行一系列的语句。
While condition  ; Version [statements] Wend
如果 condition 为 True,则 statements 中所有 Wend 语句之前的语句都将被执行,然后控制权将返回到 While 语句,并且重新检查 condition。如果 condition 仍为 True,则重复执行上面的过程。如果不为 True,则从 Wend 语句之后的语句继续执行程序。
While...Wend 循环可以是多层嵌套结构。每个 Wend 与最近的 While 语句对应。
注意 Do...Loop 语句提供一种结构化与适应性更强的方法以执行循环。
下面例子举例说明如何使用 While...Wend 语句:
Dim Counter Counter = 0 ' 初始化变量。While
Counter < 20 ' 测试计数器的值。 Counter = Counter + 1 ' 增加计数器。 Alert CounterWend
' 计数器大于 19 时终止循环。