下面程序段，运行后的结果是( )。　privAtE suBCommAnDl_CliCk( )　　Dim B%(1 to 4)，i%，t#　　For i=1 to 4　　　B(i)=i　　nExt i　　t=toF(B( ) )　　print"t="；t，　EnD suB　FunCtion toF(A()As intEgEr)　　Dim t#，i%　　t=1　　For i=2 to uBounD(A)　　　　　　t=t * A(i)　　　　nExt i　　　　toF=t　　EnD FunCtion
A、t=18
B、t=24
C． t=30
D、t=32