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

来源:学生作业帮助网 编辑:作业帮 时间:2024/04/30 11:07:58

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

编程求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