第３講 繰り返し処理をさせよう（For文を理解しよう）。
第1話 1から10までの和を求めよう。
まず、サンプル６を開いてください。
そして、Alt+F１１によってプログラムを見てください。
Private Sub CommandButton1_Click()
Dim wa As Integer, i As Integer
Cells(5, 1) = "１から１０までの和"
wa＝０
For i = 1 To 10
wa = wa + i
Next
Cells(6, 1) = wa
End Sub
Dim wa As Integer, i As Integerは変数ｗａとｉを整数型と定義しています。
（変数の定義は「，」で繋いでいけば複数個同時にできます。）
Cells(5, 1) = "１から１０までの和"はExcelのセルA5に「１から１０までの和」と入力しています。
wa=0で変数和の初期値を0としています。
ここで学ぶFor文とは
For i = 1 To 10
wa = wa + i
Next
の部分です。
対象を小学生の高学年以上の人としていますので、
For、To、Nextの意味も説明しておきましょう。
Forは「から」を意味します。
Toは「まで」です。
ですからFor i = 1 To 10は、
ｉは1から１０までという意味になります。
Nextは「次」を意味します。
３行で行っていることは、
ｉを１から１０まで変えていきながら、
wa = wa + i
を繰り返しなさいという命令になります。
第１行For i = 1 To 10と第３行Nextで挟まれた部分が、
１０回繰り返されたことになります。
このように繰り返すことを繰り返し処理といいます。
１０回の動きを追ってみましょう。
１回目はｉ＝１から始まります。
そして、ｗａは最初0ですからwa = wa + iの右辺は、
０＋１です。
＝によってその合計１がｗａに入ります。
Next（次）によって次の繰り返しがなされます。
今度はｉ＝２で、ｗａは前回の処理により１となっていますので
wa + iは１＋２となります。
＝によってその計３がｗａに入ります。
Next（次）によって３回目の繰り返しがなされます。
ｉ＝３でｗａ＝３ですから、
今回wa + iは３＋３となります。
＝によって６がｗａに入ります。
以下同様に計算されていきますが、
その流れを図にすると
０＋１
↓
１
１＋２
↓
３
３＋３
↓
６
６＋４
↓
１０
１０＋５
↓
１５
１５＋６
↓
２１
２１＋７
↓
２８
２８＋８
↓
３６
３６＋９
↓
４５
４５＋１０
↓
５５
となります。
ｗａ＋ｉですから＋の左側がｗａで＋の右側がｉですから
ｗａの値が０，１，３，６，１０，１５，２１，２８，３６，４５，４５と動いていき、
ｉは１，２，３，４，５，６，７，８，９，１０と動いています。
以上の１０回の処理により１＋２＋３＋・・・＋１０の計算が行われているということは、
おわかりでしょうか。
以上の流れをスローモーションで再現したものが次のプログラムです。
クリックして実行してみてください。
再現プログラム
なお、For i = 1 To 10 Step 2
としますとｉは２飛びに変化させることができます。
Step 2とつけたときのｉの動きは、
１，３，５，７，９となります。
３飛びに動かしたいなら
For i = 1 To 10 Step 3
とすればよいのです。
この場合のｉの動きは、
１，４，７，１０となります。
逆に１ずつ減らしていきたいなら
For i = 10 To 1 Step -1
です。
Stepはステップです。ですから変化させる幅という意味になります。
Stepを省略するとStepは１と判断されます。
さて、皆さん次の課題の挑戦しましょう。
① ５＋６＋７＋・・・＋５５
② ２＋４＋・・・＋１００
③ １＋３＋・・・＋９９
④ ４＋７＋１０＋・・・＋３０４
を計算するプログラムを組んでみましょう。
解答はあくまで例です。プログラムの場合正解は無限にあると言っていいのです。
だから、正確に計算できるプログラムであればすべて正解ということになります。
できれば、解答例とは違うプログラムも考えるようにしましょう。
プログラムでは自分で考えることが大切だからです。
