指定した回数だけ処理を繰り返す
　
指定した回数だけ処理を繰り返す For〜Next
　　　　　　 構文
　　For カウンター = 開始する数 To 終了する数 Step カウンター増減数
　　　　繰り返す処理を記入
　　Next カウンター

使用例
　　Private Sub Command1_Click()
　　　For i = 100 To 1 Step -1
　　　　Debug.Print i
　　　　　If i = 50 Then Exit For
　　　Next i
　　End Sub

　　強制的にループから抜け出たい時は Exit For を使う
　　　（旧BASICからの方は案外知らないかも）




01/06/06