用VB程序编写一个过程来计算1+2+3+4+……+100的值。

如题所述

Private
Sub
Command1_Click()
Dim
sum
As
integer
'定义变量sum,i为整形
Dim
i
As
integer
sum=0'给sum赋值
For
i
=
1
To
100
’for循环
sum
=
sum
+
i
'循环过程每次给sum加一
Next
i
Print
sum
’输出sum和
End
Sub
温馨提示:答案为网友推荐,仅供参考