问题
单项选择题
请阅读程序：
Option Base 1
Private Sub Form_Click()
Dim Arr(4,4)As Integer
For i=1 To 4
Forj=1 To 4
Arr(i,j)=(i-1)*2+j
Nextj
Nexti
Fori=3 To 4
For j=3 To 4
Print Arr(j,i)；
Next j
Print
Next i
End Sub
程序运行后，单击窗体，则输出结果是______。
A) 5 7
6 8
B) 6 8
7 9
C) 7 9
8 10
D) 8 10
8 11
答案
参考答案：C
解析： 本题中第一个For是为数组Arr赋初值，得到的数组第一行为{1，2，3，4}，第二行为{3，4，5，6}，第三行为{5，6，7，8}，第四行为{7，8，9，10}。第二个For循环针对的是Arr数组的最右下角四个元素，输出为Arr(j，i)，即输出的数组中主对角线元素不变，副对角线数字对调，得到答案C) 。