VBA编程实现：1！+2！+3！+......+N!
要求：（1）界面设计美观大方（界面上至少包含自己的照片、学号、班级、专业和一个命令按钮），单击按钮执行程序。（2）N从键盘输入。（3）定义一个求阶乘的函数。通过调用函数求...
要求：
（1）界面设计美观大方（界面上至少包含自己的照片、学号、班级、专业和一个命令按钮），单击按钮执行程序。
（2）N从键盘输入。
（3）定义一个求阶乘的函数。通过调用函数求阶乘。
（4）以消息框输出结果。 展开
（1）界面设计美观大方（界面上至少包含自己的照片、学号、班级、专业和一个命令按钮），单击按钮执行程序。
（2）N从键盘输入。
（3）定义一个求阶乘的函数。通过调用函数求阶乘。
（4）以消息框输出结果。 展开
1个回答
展开全部
Function Proc(m As Integer)
Dim t As Double
If IsNumeric(m) Then
For j = 1 To m
t = t + Application.WorksheetFunction.Fact(j)
Next
Proc = t
Else
Proc = -1
End If
End Function
这是实现计算过程的函数，在需要的地方调用即可。
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
