一到简单的VB题…………

来源:百度知道 编辑:UC知道 时间:2024/05/11 17:36:34
求1--100所有程序和?
Dim i As Integer,sum as interger
sum=0
for i=1 to 100
sum=sum+i
next i
print sum
end sub
不知道这样对不对?请写完整点啊

for i = 1 to 100
s = s + i
next
print s

工程里面建一个command1和一个text1
对控制按钮的Click事件进行编程如下:
Private Sub Command1_Click()
Dim i%, sum%
sum = 0
For i = 1 To 100
sum = sum + i
Next i
Text1.Text = sum
End Sub