[填空題] 下面程序運(yùn)行后，單擊命令按鈕，輸出的結(jié)果是______。

Private Sub Command1_Click()

Dim a%(1 To 5)，i%，s#

　　For i=1 To 5

　　　a(i)=i

　　 Next

　　s=Fun(A)

　　Print "s=";s;

End Sub

Function Fun(a()As Integer)

Dim t#．i%

　　t=1

　　For i=LBound(A) To UBound(A)

　　　t=t*a(i)

　　Next

　　Fun=t

End Function

120

程序首先調(diào)用循環(huán)語(yǔ)句為數(shù)組a、b賦值，其中a(i)=i；b(i)=i，且數(shù)組a的上下界分別為1和5，接著將數(shù)組a作為參數(shù)調(diào)用Fun過(guò)程，在Fun過(guò)程中，定義了兩個(gè)變量t及i，i作為循環(huán)語(yǔ)句For的變量，它的初始值和終值分別為數(shù)組的上下界，循環(huán)體為t=t*a(i)，即將a(i)的值乘以t，然后再賦給t，當(dāng)循環(huán)結(jié)束后，程序返回的就是數(shù)組a中的各元素的積，故輸出結(jié)果為：s=120。