[填空題] 在窗體上畫(huà)一個(gè)名為Command1的命令按鈕，然后編寫(xiě)如下程序：

Private Sub Command1_Click()

Dim i As Integer

Sum=0

n=InputBox("Enter a number")

n=Val(n)

For i=1 To n

Sum= (13)

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

(14)

End Function

以上程序的功能是，計(jì)算1!+2!+3!+…+n!，其中n從鍵盤(pán)輸入，請(qǐng)?zhí)羁铡?/p>正確答案：

(13)Sum+fun(i) (14)fun=p

題中fun函數(shù)主要用來(lái)求解n!，然后由Command1_Click過(guò)程調(diào)用，并對(duì)n!(n=1，2，3，…)進(jìn)行遍歷相加求和，所以第[13]空應(yīng)填寫(xiě)Sum+fun(i)，第[14]空應(yīng)填寫(xiě)fun=p。