マイクロソフトアクセスで広がる世界

アクセスのTIPS集

For...Next ステートメント

概要

指定したカウンタが初期値から最終値になるまで記述した処理を続けます
(書式)
For カウンタ = 初期値 To 最終値
処理内容
Next カウンタ

作成例

フォーム「テストフォーム」上のコマンドボタン「カウンタテスト」のクリック時イベントに 次のプロシージャを作成して実行。
(プロシージャ)
Private Sub cmd_カウンタテスト_Click()
Dim i As Integer

For i = 0 To 10
MsgBox i
Next i

End Sub
下図のように0~10までメッセージが順に表示され終了します。