VB编程，实现计算机加法？求详细过程。

Question

如题所述

Answer 1

解：算法：
第一步：输入x=1
第二步：计算1+2
第三步：计算1+2+3
.。。。。。。。。。
。。。。。。。
流程图：
开始
s=0,i=1
i<=100
输入一个N
累加s=s+n
计数一次：I= I+1
输出s
结束
注：图中有两条线没有画，你可以自己补上的
算法语句：VB
Private Sub Form_Click()
Dim s As Single, n As Integer, i As Integer
s = 0
n = Val(InputBox("输入n:"))
For i = 1 To n
s = s + 1
Next i
Print s
End Sub