用vb进行一到一百加法计算

呵呵，我也是个新手，互相交流一个吧，这道题比较简单的

Private Sub Form_Activate()
Dim sum As Integer
Dim I As Integer
sum = 0
For I = 1 To 100
sum = sum + I
Next I
Print "1到100的和为"; sum

End Sub

我用的是VB6.0， 但愿对你有所帮助...

你用RT去运算

可视界面

一些稍微复杂点的都可以自动生成

for i=1 to 100
a=a+i
next i

Dim i, str As Integer
str = 0
For i = 1 To 100
str = str + i
Next i

MsgBox str