While...Wend

---

While...Wendステートメント

構文

While condition

[statements]

Wend

conditionには、条件を指定します。

statementsには、条件が真の間実行するステートメントを指定します。

解説

conditionで指定した条件が真の間だけステートメントを繰り返し実行します。

While...Wnedステートメントは、

    Do While condition
        statements
    Loop

と同じです。

サンプル

次の例は、変数aが100より小さい間だけa=a+1を実行します。

Sub Sample()
    Dim a As Long, b As Long
    While a < 100
        a = a + 1
    Wend
    MsgBox a            '100を表示します
End Sub