While...Wend 語(yǔ)句

當(dāng)指定的條件為 True 時(shí)，執(zhí)行一系列的語(yǔ)句。

While condition
&nbsp；  Version [statements]
Wend

參數(shù)

condition

數(shù)值或字符串表達(dá)式，其計(jì)算結(jié)果為 True 或 False。如果 condition 為 Null，則 condition 被當(dāng)作 False。

statements

在條件為 True 時(shí)執(zhí)行的一條或多條語(yǔ)句。

說明

如果 condition 為 True，則 statements 中所有 Wend 語(yǔ)句之前的語(yǔ)句都將被執(zhí)行，然后控制權(quán)將返回到 While 語(yǔ)句，并且重新檢查 condition。如果 condition 仍為 True，則重復(fù)執(zhí)行上面的過程。如果不為 True，則從 Wend 語(yǔ)句之后的語(yǔ)句繼續(xù)執(zhí)行程序。

While...Wend 循環(huán)可以是多層嵌套結(jié)構(gòu)。每個(gè) Wend 與最近的 While 語(yǔ)句對(duì)應(yīng)。

注意 Do...Loop 語(yǔ)句提供一種結(jié)構(gòu)化與適應(yīng)性更強(qiáng)的方法以執(zhí)行循環(huán)。

下面例子舉例說明如何使用 While...Wend 語(yǔ)句:

Dim CounterCounter = 0                '初始化變量。While Counter < 20         ' 測(cè)試計(jì)數(shù)器的值。   Counter = Counter + 1   ' 增加計(jì)數(shù)器。   Alert CounterWend                       ' 計(jì)數(shù)器大于 19 時(shí)終止循環(huán)。

要求

版本 1

最新評(píng)論