我数学没学好,只知道整数的“!”运算怎么计算,小数的不知道怎么计算..不过你好像只计算整数的,代码写出来了,这种问题自己多研究下就出来了,等别人来回答还不如自己查查资料来的快
Private Sub Form_Load()
MsgBox GetNum(3) + GetNum(7) + GetNum(12)
End Sub
Private Function GetNum(num As Long) As Long
r = 1
For i = 2 To num
r = r * i
Next
GetNum = r
End Function