【vb】使用For循环语句 (第一课)

今天学习如何去使用循环语句

例如当求正整数和负数之和时 我们可用到循环语句 代码如下

首先我们可以先建立一个控件 或者直接在窗体上打

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