(30) 有如下事件过程，单击命令按钮扣，输出结果为

　　Private Sub Command1_Click()

　　Dim b%(1 To 4) , j%, t#

　　For j=1 To 4

　　b(j) =j

　　Next j

　　t=Tax(b() )

　　Print "t="; t,

　　End Sub

　　Function Tax (a() As Integer)

　　Dim t#, i%

　　t=1

　　For i=2 To UBound(A)

　　t=t * a(i)

　　Next i

　　Tax=t

　　End Function

　　A) t=18

　　B) t=24

　　C) t=30

　　D) t=32

　　正确答案: B