當指定的條件為 True 時,執(zhí)行一系列的語句。
While condition  ; Version [statements] Wend
如果 condition 為 True,則 statements 中所有 Wend 語句之前的語句都將被執(zhí)行,然后控制權(quán)將返回到 While 語句,并且重新檢查 condition。如果 condition 仍為 True,則重復(fù)執(zhí)行上面的過程。如果不為 True,則從 Wend 語句之后的語句繼續(xù)執(zhí)行程序。
While...Wend 循環(huán)可以是多層嵌套結(jié)構(gòu)。每個 Wend 與最近的 While 語句對應(yīng)。
注意 Do...Loop 語句提供一種結(jié)構(gòu)化與適應(yīng)性更強的方法以執(zhí)行循環(huán)。
下面例子舉例說明如何使用 While...Wend 語句:
Dim Counter Counter = 0 ' 初始化變量。While
Counter < 20 ' 測試計數(shù)器的值。 Counter = Counter + 1 ' 增加計數(shù)器。 Alert CounterWend
' 計數(shù)器大于 19 時終止循環(huán)。