[填空题] 在窗体上画一个名为Command1的命令按钮，然后编写如下程序： Private Sub Command1_Click() Dim i As Integer Sum=0 n=

[填空题] 在窗体上画一个名为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=______

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

______

End Function

以上程序的功能是，计算1! +2! +3! +…+n!，其中n从键盘中输入，请填空。