各位vb编程“求100以内所有自然数的和”
答案:2 悬赏:70 手机版
解决时间 2021-03-01 11:03
- 提问者网友：人生佛魔见
- 2021-03-01 01:47
各位vb编程“求100以内所有自然数的和”
最佳答案
- 五星知识达人网友：罪歌
- 2021-03-01 02:33
private sub command1_click()
a = val(inputbox("输入a"))
print
print a; "的因子为：";
for i = 1 to a
if a mod i = 0 then
print i;
end if
next
end sub
a = val(inputbox("输入a"))
print a; "的因子为：";
for i = 1 to a
if a mod i = 0 then
print i;
end if
next
end sub
全部回答
- 1楼网友：英雄的欲望
- 2021-03-01 04:05
Private Sub Command1_Click()
Dim Sum As Integer,i As Integer
For i=1 to 100
Sum=Sum+i
Next i
Print "Sum=";Sum
End Sub
我要举报
如以上问答信息为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！
大家都在看
推荐资讯