第３話 Ｓｕｂ プロシージャの引数（１）
皆さん、前話ではＳｕｂプロシージャを呼び出すとき、
何の値も渡さないで、呼び出しましたが実は何種類かの値を渡すことができます。
具体例がないと何のことを言っているかわからないと思いますので、具体例を出しましょう。
次のプログラムをクリックして開いてください。
このプログラムは１からＥ２で与えられた整数まで加えていくプログラムです。
例えば、Ｅ２に１００を入れると
１＋２＋３＋・・・＋１００
が計算されＣ４に答えの５０５０が出てくるようになっています。
プログラムソースは
Private Sub CommandButton1_Click()
Dim n As Long
wa = 0
n = Cells(2, 5)
wakeisan n
End Sub
Sub wakeisan(n)
Dim i As Long, wa As Long
For i = 1 To n
wa = wa + i
Next
Cells(4, 2) = "答えは"
Cells(4, 3) = wa
End Sub
wakeisanでＳｕｂプロシージャwakeisanを呼び出していますが、
その際、nの値をＳｕｂプロシージャwakeisanに渡しています。
Ｅ２（つまりCells（２，５））に１００が入力されている今の例では、
渡される値は１００となります。具体的には
For i = 1 To n
の部分で使われます。
つまり、Ｆｏｒ文は１から100まで100回繰り返されるのです。
そして、その答えが
Cells(4, 2) = "答えは"
Cells(4, 3) = wa
の部分で出力されることになります。
nを引数といいます。
今は、わかりやすさを優先して
Sub wakeisan(n)
Dim i As Long, wa As Long
For i = 1 To n
wa = wa + i
Next
Cells(4, 2) = "答えは"
Cells(4, 3) = wa
End Sub
としましたが、例えば
Sub wakeisan(syuuti)
Dim i As Long, wa As Long
For i = 1 To syuuti
wa = wa + i
Next
Cells(4, 2) = "答えは"
Cells(4, 3) = wa
End Sub
としてもまったく同じです。
グローバル変数の宣言を
（これはすべてのＳｕｂプロシージャの前、
つまりプログラムの先頭で宣言するものです。）
しない限り、変数はすべてローカルでそのＳｕｂプロシージャ内でしか、
有効でないことを忘れないでください。
だから、変数名は自由に取ることができます。
大事な点は引数nの値がＳｕｂプロシージャwakeisanのsyuuti
に渡されるということです。
Ｅ２に１００が入力されている場合、
nの値が１００がsyuutiに渡されるわけです。
