单项选择题

下面程序段，运行后的结果是
Private Sub Command1_Click()
Dim b%(1 To 4)，i%，t#
　　For i=1 To 4
　　　　b(i) =i
　　Next
　　t=Tof(b() )
　　Print"t="；t，
End Sub
Function Tof(a() As Integer)
Dim t#,i%
　　t=1
　　For i=2 To UBound(

点击查看答案&解析