Private Sub Command1_Click()
Dim s As Integer, i As Integer
s = 0
For i = 1 To 1000
s = s + i
Next i
Print s
End Sub
运行时,出错信息如下图所示,导致此错误的语句或原因是( )。
微信扫码预览、分享更方便