[填空題] 在窗體上畫一個名為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從鍵盤中輸入，請?zhí)羁铡?/p>正確答案：

Sum+fun(i)(或fun(i)+Sum)fun=p

在自定義函數(shù)中返回值應使用語句：過程名=表達式。 調(diào)用函數(shù)并應使用語句：變量名=函數(shù)名(參數(shù)列表)。 本題中自定義函數(shù)名為fun，調(diào)用該函數(shù)時的參數(shù)為循環(huán)變量i，即fun(i)，故第一個空處應填入的累加表達式為Sum+fun(i)；在自定義函數(shù)fun中應將累乘積作為函數(shù)返回值，故第二個空處應填入fun=p。