单项选择题

程序如下：
Private Sub form_ Activate()
Dim a As Integer
for i=4 To 5
a=fun(i)
Print a,
Next i
End Sub
Private Function fun(n)As Integer
if n ＞0 then
fun =n* fun(n-1)
Else
fun=1
End if
End Function
程序最后打印结果是______。

点击查看答案&解析