用INPUTBOX涵数求任意项的三次方的累加和的编程
答案:1 悬赏:40 手机版
解决时间 2021-05-01 09:51
- 提问者网友：斑駁影
- 2021-05-01 05:57
如题
最佳答案
- 五星知识达人网友：英雄的欲望
- 2021-05-01 06:12
Private Sub Command1_Click()
M1 = InputBox("请输入N")
If Val(M1) <= 1 Then Exit Sub
zh = 0
For i = 1 To M1
zh = zh + i * i * i
Next
MsgBox zh
End Sub
M1 = InputBox("请输入N")
If Val(M1) <= 1 Then Exit Sub
zh = 0
For i = 1 To M1
zh = zh + i * i * i
Next
MsgBox zh
End Sub
我要举报
如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！
点此我要举报以上问答信息
大家都在看
推荐资讯