今天学习如何去使用循环语句
例如当求正整数和负数之和时 我们可用到循环语句 代码如下
首先我们可以先建立一个控件 或者直接在窗体上打
Dim a As Integer, b As Integer, c As Integer, i As Integer
'假如输入 -1,-2,-3
c = 0
For a = 1 To 3
b = InputBox("输入个数字")
If b <= 0 Then
c = c + b
ElseIf b >= 0 Then
i = i + b
End If
Next a
Print "正整数和为" & i
Print "负数和为" & c