单选题
请阅读下面程序:
Option Base 1
Private Sub Form_Click()
Dim Art(4,4) As Integer
For i=1 To 4
For j=1 To 4
Arr(i,j)=(i-1)*2+j
Next j
Next i
For i=3 To 4
For j=3 To 4
Print Arr(j,i)
Next j
Print
Next i
End Sub
程序运行后,单击窗体,则输出结果是______。
A、
5 76 8
B、
6 87 9
C、
7 98 10
D、
8 108 11
【正确答案】
C
【答案解析】
[解析] 由Option Base 1可知,数组元素的下标值从1开始。第一个for循环可获得该二维数组的每一个元素值,即第一行为1 2 3 4,第二行为3 4 5 6,第三行为5 6 7 8,第四行为7 8 9 10,是一个2×2的矩阵。第二个for循环用来输出2行2列的元素。此题设置了一个陷阱,要求输出的是Arr(j,i),而不是Arr(i,j),因此考生做题的时候一定要非常仔细。
提交答案
关闭