Question

VB 求由键盘输入的N个数据的和

用循环分支结构怎么写。。

Answer 1

dim i ,sum ,add(9)
for i = 0 to 9
add(i)=inputbox("请输入")

sum=sum+add（ i)
next
print sum

追问

能不能用DO WHILE 语句写。。

追答

Dim i As Integer, sum As Integer, add(9) As Integer
Do While i <= 8
add(i) = InputBox("请输入")
sum = sum + add(i)
i = i + 1
Loop
Print sum