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

来源:学生作业帮助网 编辑:作业帮 时间:2024/04/20 10:34:24
用vb语言计算1!+2!+3!+…+10!,其中阶乘的计算分别用过程和函数实现.

用vb语言计算1!+2!+3!+…+10!,其中阶乘的计算分别用过程和函数实现.
用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