用vb编写一个过程,计算1+2∧2+3∧2+4∧2+……+n∧2
答案:2 悬赏:10 手机版
解决时间 2021-02-15 03:48
- 提问者网友：愿为果
- 2021-02-14 18:42
用vb编写一个过程,计算1+2∧2+3∧2+4∧2+……+n∧2
最佳答案
- 五星知识达人网友：平生事
- 2021-02-14 19:59
Dim s As Long
Private Sub Command1_Click()
Dim n As Integer
n = CInt(InputBox("N="))
Sum n
Print s
End Sub
Private Sub Sum(n As Integer)
For i = 1 To n
s = s + i * i
Next i
End Sub
Private Sub Command1_Click()
Dim n As Integer
n = CInt(InputBox("N="))
Sum n
Print s
End Sub
Private Sub Sum(n As Integer)
For i = 1 To n
s = s + i * i
Next i
End Sub
全部回答
- 1楼网友：末日狂欢
- 2021-02-14 21:33
Sub
Input n
For i = 1 To n
a=a+i^2
Next i
Print a
End Sub追问你这写的看不懂啊
Input n
For i = 1 To n
a=a+i^2
Next i
Print a
End Sub追问你这写的看不懂啊
我要举报
如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！
点此我要举报以上问答信息
大家都在看
推荐资讯