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

[填空题] 在窗体上画一个名为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从键盘输入，请填空。