もどる
Do...Loop ステートメント
もどる
(c) Copyright 2005
VBAを基礎から解説 VBA World
All rights reserved.
E-Mail：
info@vba-world.com
一連のステートメントを繰り返すフロー制御ステートメントです。繰り返す回数が分かっていないときに使います。
「Do...Loop ステートメント」にはいろいろな使い方がありますが、ここでは基本的な使い方を紹介します。その他はヘルプを参照してください。
構文解説
次に「Do...Loop ステートメント」構文の例を示す。
例１
Private Sub CommandButton1_Click()
Dim i As Integer
Do While i < 10
i = i + 1
Loop
MsgBox i
End Sub
例２
Private Sub CommandButton1_Click()
Dim i As Integer
Do
i = i + 1
If i >= 10 Then Exit Do
Loop
MsgBox t
End Sub
解説
Do...Loop間を10回繰り返す。
例１と例２の実行結果は同じとなる。
