[单项选择题] 下面程序段，运行后的结果是
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(
A．
[单项选择题] 下面程序段，运行后的结果是
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(
A．
B
程序调用循环语句对数组b()赋值，b(i)=i，且数组b的上下界分别为1和4；接着将数组b()作为对象，调用Tof过程，在Tof过程中，定义了两个变量，和i，i作为For循环的循环变量，初始值为2，终值为数组b的上界；循环体为“t=t*a(i)”，即将b(i)的值乘以t，然后在赋给t，当循环结束后，程序返回的就是数组b中除第一个元素以外所有元素值的乘积，本题为2×3×4=24，输出结果为t=24。
VIP截止日期：2025-01-03 01:23:39
←请使用支付宝扫码支付
VIP截止日期：2025-01-03 01:23:39
←请使用微信扫码支付
