用vba给1+2+3+4一直加到100编程怎么做，重谢
答案:4 悬赏:50 手机版
解决时间 2021-02-05 19:52
- 提问者网友：饥饿走向夜
- 2021-02-05 09:10
用vba给1+2+3+4一直加到100编程怎么做，重谢
最佳答案
- 五星知识达人网友：患得患失的劫
- 2021-02-05 09:48
Sub a()
Dim a, b
For a = 1 To 100
b = a + b
Next
End Sub
全部回答
- 1楼网友：拾荒鲤
- 2021-02-05 13:09
sub jia()
dim he as integer
dim i as integer
for i=1 to 100
he=he+i
next i
end sub追问不对呀，我老师说这不对追答那就是你老师不能为人师表了
dim he as integer
dim i as integer
for i=1 to 100
he=he+i
next i
end sub追问不对呀，我老师说这不对追答那就是你老师不能为人师表了
- 2楼网友：杯酒困英雄
- 2021-02-05 12:55
是不是要用function呢?
Public Function he() as integer
dim i as integer
for i=1 to 100 he=he+i next i
End Function
Public Function he() as integer
dim i as integer
for i=1 to 100 he=he+i next i
End Function
- 3楼网友：玩家
- 2021-02-05 11:23
参考代码：
Sub 求和()
For i = 1 To 100
s = s + i
Next
MsgBox s
End Sub追问不对呀，我老师说这不对追答对不对你测试一下不就知道了？追问测试了，比对呀追答
我测试的结果。有图有真相！
追问图
Sub 求和()
For i = 1 To 100
s = s + i
Next
MsgBox s
End Sub追问不对呀，我老师说这不对追答对不对你测试一下不就知道了？追问测试了，比对呀追答
我测试的结果。有图有真相！
追问图
我要举报
如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！
点此我要举报以上问答信息
大家都在看
推荐资讯