大众信息网

sum=1+3+5+……+99 用VB如何编程

关注:173  答案:3  手机版
解决时间 2021-01-16 13:14
一定要是VB的语言哦
最佳答案
Private Sub Command1_Click()
Dim i, j As Integer
For i = 1 To 99 Step 2
j = j + i
Next i
MsgBox "SUM=" & j
End Sub
全部回答

private sub command1_click()

dim i as integer, sum as integer do while sum <= 6000     sum = sum + i     i = i + 1 loop print i, sum

end sub

& sum '..+99 = "1+3+5+.; & sum..;使用消息函数输出 或者 print ", vbOK '.+99 = "dim sum as Integer;1+3+5+, i as Integer sum = 0 for i = 1 to 99 step 2 sum = sum + i next i 现在sum内存储的就是累加和: msgbox ",你只需要将其值输出就可以了
我要举报
如以上问答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息,可以点下面链接进行举报!