2. 计算机
  3. 编写如下程序代码： Option Base 1 Dim arr( )As Integer Private Sub Command1_Click( ) Dim i As Integer，j As Integer

编写如下程序代码： Option Base 1 Dim arr( )As Integer Private Sub Command1_Click( ) Dim i As Integer，j As Integer

admin2020-08-10  65
问题 编写如下程序代码：
    Option Base 1
    Dim arr(  )As Integer
    Private Sub Command1_Click(  )
        Dim i As Integer，j As Integer
        ReDim arr(3，2)
        For i=1 To 3
           For j=1 To 2
              arr(i，j)=i+j
           Next j
        Next i
        Re Dim m(3，4)
        For j=3 To 4
           arr(3，j)=j+6
        Next i
        Print m(3，2)+arr(3，4)
    End Sub
    程序运行后，单击命令按钮Command1，输出结果为(        )。
选项 A、15
B、12
C、13
D、10
答案D
解析 题目在过程Command1_Click之前声明了动态数组arr，并使用Option Base 1语句声明数组下标从1开始，在Command1_Click过程中使用ReDim语句对动态数组进行了定义，arr数组是一个3行2列的数组，接着使用二重For循环给数组中的运算进行赋值，arr(1，1)=1+1=2；arr(1，2)=1+2=3：arr(2，1)=2+1=3；air(2，2)=2+2=4；arr(3，1)=3+1=4：arr(3，2)=3+2=5。接着继续使用ReDim语句对动态数组进行定义，arr数组被定义为3行4列的数组，并且当重新分配动态数组时，数组中的内容被清除。接着使用For循环给数组元素赋值，循环共执行2次，数组元素arr(3，3)=3+6=9；arr(3．4)=4+6=100接着使用print方法输出arr(3，2)+arr(3，4)的结果，由于第二次重新分配动态数组，第一次计算出的arr(3．2)的结果被清除，而第二次并未对数组运算arr (3，2)赋值，所以arr(3，2)默认为0，表达式最终的结果为0+10=10，故D选项正确。本题选择D选项。
转载请注明原文地址:https://kaotiyun.com/show/dqHp777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

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