我想求100以内奇数之和,但总是不对。
Private Sub Form_Load()
Show
Dim i, x As Integer
For i = 1 To 100 Step 2
x = x + i
Print i, x
Next i
End Sub
Private Sub Form_Load()
Show
Dim i, x As Integer
For i = 1 To 100 Step 2
x = x + i
Print i, x
Next i
End Sub
x = x + i
Print i, x
Next i