填空题：在窗体上画一个名为Command1的命令按钮，然后编写如下程序：Private Sub Command1_Click()

在窗体上画一个名为Command1的命令按钮，然后编写如下程序：
Private Sub Command1_Click()
Dim i As Integer
Sum=O
n=InputBox(“Enter a number”)
n=Val(n)
Fori=1 To n
Sum= 【1】
Next i
Print Sum
End Sub
Function fun(t As Integer)As Long
p=1
Fori=1 To t
p=p*i
Next i
【2】
End Function
以上程序的功能是，计算1 !+2 !+3 !+…+n!，其中n从键盘输入，请填空。