用vb设计 单击窗体,在窗体上显示1+3+5+……+99之和。

Question

如题所述

Answer 1

private sub form_click()
for i=1 to 99 step 2
sum=sum+i
next
print sum
end sub

Answer 2

Private Sub Form_Click()
Dim i As Integer
For i = 1 To 99 Step 2
Sum = Sum + i
Next
Print Sum
End Sub

Answer 3

Private Sub Form_Click()
Dim i As Integer,ss as string
ss=""
For i = 1 To 99 Step 2
Sum = Sum + i
ss=ss & i & "+"
Next
ss=left(ss,len(ss)-1)
ss=ss & "=" & sum
Print ss
End Sub

Answer 4

Private Sub Form_Click()
Dim a As Long, i As Integer
a = 0
i = 1
For i = 1 To 100
a = a + i
i = i + 1
Next i
Print a
End Sub