作业帮 > 综合 > 作业

用vb语言计算1!+2!+3!+…+10!,其中阶乘的计算分别用过程和函数实现.

来源:学生作业帮 编辑:百度作业网作业帮 分类:综合作业 时间:2024/07/31 11:46:33
用vb语言计算1!+2!+3!+…+10!,其中阶乘的计算分别用过程和函数实现.
用vb语言计算1!+2!+3!+…+10!,其中阶乘的计算分别用过程和函数实现.
Private Sub Command1_Click()
Dim i As Integer
For i = 1 To 10
Sum = Sum + jc(i)
Next
MsgBox Sum
End Sub
Function jc(a As Integer)
jc = 1
For i = 1 To a
jc = jc * i
Next
End Function