编程求1+3+5+7+…+99

来源:学生作业学帮网 编辑:学帮网 时间:2024/05/29 08:28:47

编程求1+3+5+7+…+99

Private Sub Form_Click() Dim Sum As Integer, I As Integer
Sum = 0
For I = 1 To 99 Step 2
Sum = Sum + I
Next I
MsgBox "1+3+5+…+99=" & Sum,
End Sub