07/06/17 23:10:44
>>173
Sub ex()
Dim x As Integer, sum As Integer
sum = 0
For x = 1 To 10
（空欄）
Next x
Msgbox "合計=" & sum
End Sub
の中で変えて良いのは（空欄）の部分だけ
単に（１）（２）（３）の計算ルーチンを作れば良いだけではなく
1 To 10のｘのループを使った上で解かなければならないという条件
07/06/17 23:10:44
>>173
Sub ex()
Dim x As Integer, sum As Integer
sum = 0
For x = 1 To 10
（空欄）
Next x
Msgbox "合計=" & sum
End Sub
の中で変えて良いのは（空欄）の部分だけ
単に（１）（２）（３）の計算ルーチンを作れば良いだけではなく
1 To 10のｘのループを使った上で解かなければならないという条件