2. 计算机
  3. 有如下事件过程，单击命令按钮扣，输出结果是　　 Private Sub Command1 Click( )　　　　Dim b% (1 To4) ,j%, t#　　　　For j=1 To 4　　　　　　b(j) =j　　　　Next j　　　　t=Tax(

有如下事件过程，单击命令按钮扣，输出结果是　　 Private Sub Command1 Click( )　　　　Dim b% (1 To4) ,j%, t#　　　　For j=1 To 4　　　　　　b(j) =j　　　　Next j　　　　t=Tax(

admin2009-01-15  37
问题 有如下事件过程，单击命令按钮扣，输出结果是　　 Private Sub Command1 Click( )　　　　Dim b% (1 To4) ,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
答案2
解析 程序开始调用循环语句对数组b( )赋值，b(j)=j，且数组b的上下界分别为1和4；接着将数组b( )作为对象，调用Tax过程，在Tax过程中，定义了两个变量t即i，i作为For循环的循环变量，初始值为2，终值为数组b的上界；循环体为“t=t * a(i)”，即将b(i)的值乘以t，然后在赋给t，当循环结束后，程序返回的就是数组b中除第一个元素以外所有元素值的乘积，此题的结果为2×3×4=24，故输出结果为t=24。
转载请注明原文地址:https://kaotiyun.com/show/Pe2p777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

相关试题推荐
随机试题
最新回复(0)