
VB题目!!使用函数完成1x2+2x3+3x4+……+Nx(N+1)的运算,N由程序输入
使用函数完成1x2+2x3+3x4+……+Nx(N+1)的运算,N由程序输入如题····其中x是乘号!...
使用函数完成1x2+2x3+3x4+……+Nx(N+1)的运算,N由程序输入
如题····其中x是乘号! 展开
如题····其中x是乘号! 展开
1个回答
展开全部
Private Sub Command1_Click()
Dim n As Integer, s As Long
n = Val(InputBox(""))
For i = 1 To n
s = s + i * (i + 1)
Next
Print s
End Sub
Dim n As Integer, s As Long
n = Val(InputBox(""))
For i = 1 To n
s = s + i * (i + 1)
Next
Print s
End Sub
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询