While…Wend 陳述式

如果指定的條件為 True，則執行一系列的陳述式。

語法

While condition
   [statements]
Wend

引數：

  • 條件：評估為 True 或 False 的數值或字串表示式。如果條件為 Null，則條件會被視為 False。

  • Statements：條件為 True 時執行的一或多個陳述式。

備註

如果條件為 True，則會執行 statements 中的所有陳述式，直到遇到 Wend 陳述式為止。控制項會回到 While 陳述式並再次檢查 condition。如果條件仍為 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.