共用方式為

While...Wend 陳述式

  • 發行項

只要給定的條件為 True，就執行一系列陳述式。

語法

Whilecondition [ statements ] Wend

While...Wend 陳述式的語法具有以下幾個部分：

部分 描述
condition 必要。 會評估為 True 或 False的 數值運算式或字串運算式。 如果 condition 是 Null，condition 會被視為 False。
陳述式 選用。 當條件為 True，一或多個陳述式被執行。

備註

如果條件是 True，所有陳述式會被執行，直到 Wend 陳述式出現為止。 控制項接著回到 While 陳述式而再檢查一次條件。 如果條件仍然為 True，重複此流程。 如果不是 True，繼續執行 Wend 陳述式之後的陳述式。

While...Wend 迴圈可能會以巢狀方式置於任何層級。 每個 Wend符合最新的 While。

提示

Do...Loop陳述式提供了更結構化且更有彈性的方式，來執行迴圈。

範例

此範例使用 While...Wend 陳述式來增加計數器變數。 只要條件評估為 True，在迴圈的陳述式就會執行。

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. 
Debug.Print Counter ' Prints 20 in the Immediate window.

另請參閱

支援和意見反應

有關於 Office VBA 或這份文件的問題或意見反應嗎？ 如需取得支援服務並提供意見反應的相關指導，請參閱 Office VBA 支援與意見反應。