问题
填空题
在窗体上画一个名为Command1的命令按钮，然后编写如下程序：
Private Sub Command1_Click()
Dim i As Integer
Sum=0
n=InputBox("Enter a number")
n=Val(n)
For i=1 To n
Sum= (9)
Next i
Print Sum
End Sub
Function fun(t As Integer) As Long
p=1
For i=1 To t
p=p*i
Next i
(10)
End Function
以上程序的功能是：计算11 +2! +3!+…+n!，其中n从键盘输入，请填空。
答案
参考答案：fun=p
解析： 在命令按钮中，要计算前n个数的乘方和，[9]处填Sum+fun(i)。fun函数实现的是求一个数的阶乘，函数结束要返回计算结果，[10]处填fun=p。