问题详情

下面程序的输出结果为()
PrivateSubCommand1_Click()
Dima%(1To5),b%(2To10),i%,t1#,t2#
Fori=1To5
a(i)=i
Nexti
t1=tim(a())
Print"t1=";t1
EndSub
Functiontim(a()AsInteger)
Dimt#,i%
t=1
Fori=LBound()ToUBound()
t=t*a(i)
Nexti
tim=t
EndFunction
A.t1=10
B.t1=12
C.t1=120
D.120