*

Access VBA 繰り返し処理 For Next文

公開日: : 最終更新日:2014/05/07 繰り返し処理

繰り返し処理 For Next文

For~Nextの間に書かれたプログラムを規定回数に達するまで繰り返し処理します。

スポンサーリンク

プログラムの例

Private Sub コマンド0_Click()

Dim i As Integer
Dim j As Integer

For i = 1 To 10    ‘*1

j = j + i               ‘*2
Debug.Print i       ‘*3

Next i                ‘*4

MsgBox j           ‘*5

End Sub

Private Sub コマンド0_Click()

Dim i As Integer
Dim j As Integer

For i = 1 To 10 Step 2   ‘*6

j = j + i
Debug.Print i                 ‘*7

Next i

MsgBox j                       ‘*8

End Sub

プログラムの説明

*1 変数「i」に1~10を繰り返し代入していく処理。

*2 変数「j」に変数「i」を繰り返し足していく式。
j+i=0+1,1+2,3+3・・・・

*3 イミディエイトウィンドウに「i」の値を表示する。
1 2 3 4 5 6 7 8 9 10

*4 *1に戻る。(次の値)

*5 「i」の値の合計値を表示する。
この場合は1+2+3+4+5+6+7+8+9+10=55

*6 「step 2」 2刻み。

*7 イミディエイトウィンドウに「i」の値を表示する。
2刻みなので、1 3 5 7 9

*8 「i」の値の合計値を表示する。
この場合は1+3+5+7+9=25

スポンサーリンク

ad-pc

ad-pc

関連記事

no image

Access VBA 繰り返し処理 Do Loop文

繰り返し処理 Do Loop文 Do~Loopの間に書かれているプログラムを規定の条件まで繰り返し

記事を読む

Message

メールアドレスが公開されることはありません。 * が付いている欄は必須項目です

転職01
初心者がAccess VBAの仕事に就く為には

初心者がAccess VBAを使った仕事に就く 私はSEやITエンジ

sound01
Access VBA 音を鳴らす PlaySound

音を鳴らす PlaySound Access上で効果音を鳴らすプログ

pass01
Access VBA フォームをパスワードで制限

フォームをパスワードで制限 Accessで作成したデータベース使用時

prg01
Access VBA 処理の進行状況を表示するプログレスバー(ProgressBar)

処理の進行状況を表示するプログレスバー Accessで処理に時間のか

excel03
Access VBA AccessのデータをExcel(エクセル)へ変換

AccessのデータをExcel(エクセル)へ変換 Accessで使

→もっと見る

PAGE TOP ↑