Public Class Form1
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
'変数の宣言
Dim w As Integer
'初期化
w = 0
'ループ（繰り返し）処理
w = w + 1
w = w + 2
w = w + 3
w = w + 4
w = w + 5
w = w + 6
w = w + 7
w = w + 8
w = w + 9
w = w + 10
'結果の表示
Label1.Text = w
End Sub
End Class
動きをトレース（コンピュータの動きを追うこと）してみましょう。
となって、確かに１＋２＋３＋４＋５＋６＋７＋８＋９＋１０の計算ができています。
しかし、このプログラムもコンピュータの特長を全く生かしていません。
同じようなものの繰り返しは人間がするものではなく、繰り返しはコンピュータにさせたいものです。
そこで、繰り返し処理であるFor文が登場するわけです。
For i = 1 To 10
・
・
・
Next
は同じことを１０回繰り返す命令です。
このFor文を使えば先のプログラムは、
Public Class Form1
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
'変数の宣言
Dim w As Integer, i As Integer
'初期化
w = 0
'ループ（繰り返し）処理
For i = 1 To 10
w = w + i
Next
'結果の表示
Label1.Text = w
End Sub
End Class
となります。
実行結果例
For文の部分は、iが１から10まで変化しながら10回繰り返されることになります。
繰り返すので繰り返し処理といいます。
繰り返し処理は、For文以外に、While文、Do...While文がありますが、
これは第６講で学ぶ予定にになっています。
iが１，２，３，・・・と変化しながらw=w+i を10回繰り返すのですから、
結局先のトレースと同じ結果になります。
今回もトレースしてみましょう。
１回目
i=1から
w=w+iはw=w+1です。
1回目の処理の終わりにNextによって、iは一つ増えて2に変わります。
２回目
i=2ですから
w=w+iはw=w+２です。
２回目の処理の終わりにNextによって、iは一つ増えて3に変わります。
３回目
i=3ですから
w=w+iはw=w+3です。
２回目の処理の終わりにNextによって、iは一つ増えて4に変わります。
４回目
i=4ですから
w=w+iはw=w+4です。
２回目の処理の終わりにNextによって、iは一つ増えて5に変わります。
・
・
・
このプログラムはすっきりしましたし、これはコンピュータの利点を生かしています。
汎用性と普遍性のあるプログラムだからです。
例えば、10を100と変更すれば、
１＋２＋３＋・・・＋１００
の計算をさせることができます。
また、For i = 5 To 200と変更すれば、
５＋６＋７＋・・・＋２００
の計算をさせることができます。
それでは皆さん、
２＋４＋６＋・・・＋１００を計算させるためには、
どのように変更したらよいでしょうか。
iを二つずつ増やすには
For i = 2 To 100 Step 2
また、Step -1とすればiを一つずつ減らすことができます。
