While...Wend 語(yǔ)句當(dāng)指定的條件為 True 時(shí),執(zhí)行一系列的語(yǔ)句。 While condition   ; Version [statements] Wend
參數(shù)condition 數(shù)值或字符串表達(dá)式,其計(jì)算結(jié)果為 True 或 False。如果 condition 為 Null,則 condition 被當(dāng)作 False。 statements 在條件為 True 時(shí)執(zhí)行的一條或多條語(yǔ)句。 說(shuō)明如果 condition 為 True,則 statements 中所有 Wend 語(yǔ)句之前的語(yǔ)句都將被執(zhí)行,然后控制權(quán)將返回到 While 語(yǔ)句,并且重新檢查 condition。如果 condition 仍為 True,則重復(fù)執(zhí)行上面的過(guò)程。如果不為 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)。 下面例子舉例說(shuō)明如何使用 While...Wend 語(yǔ)句: Dim Counter
Counter =0 ' 初始化變量。
While Counter < 20 ' 測(cè)試計(jì)數(shù)器的值。
Counter =Counter + 1 ' 增加計(jì)數(shù)器。
Alert Counter Wend ' 計(jì)數(shù)器大于 19 時(shí)終止循環(huán)。
要求版本 1 請(qǐng)參閱Do...Loop 語(yǔ)句 返回首頁(yè) |