| 
    
     |  | 現在、VBAの勉強中です! 下記の【問】のプロシージャの作成方法を教えてください。
 (【問】の内容を具体的に書きましたのでどうかよろしくお願い致します。Do・・・Loop、For・・・Nextステートメントを利用した問題ですが・・・下記のところまで作成しましたが結果がうまくいかず、どうしてもわかりません。)
 --------------------------------------------------
 Sub テスト問()
 Dim i As Long
 For i = 1 To 10000
 MsgBox ("計算結果は" & i & "です。")
 Next i
 End Sub
 ---------------------------------------------------
 
 【問】1から10000までを加算した結果をメッセージボックスに表示するプロシージャを作成せよ。
 例)結果=1+2+3+4+5+・・・・・・+10000 というふうに加算する数を変数にしたい。
 1回目クリックで  答A=0+1=1
 2回目クリックで  答B=答A+2=3
 3回目クリックで  答C=答B+3=6
 4回目クリックで  答D=答C+4=10
 
 
 |  |