Question

又一道VB操作题,高手帮忙7、下面的程序是求100以内容奇数和s的值（s=1+23+5+7…+99）.程序中有三个错误.

Answer 1

Private Sub Command1_Click()

Dim s As Integer

Dim i As Integer

s=0

For i=1 to 100 Step 2

s=s+i

Next i

Print s

End Sub

这样就成了