[单项选择题] 请阅读程序:
Option base 1
Private Sub Form_Click()
Dim Arr(4,4)As Integer
For i=1 To 4
For j=1 To 4
Art(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 7
6 8 B.6 8
7 9
C.7 9
8 10
D.8 10
8 11
参考答案:
C问题解析:
本题利用嵌套for循环给数组Arr赋值。结果是Arr(3,3)=7,Arr(3,4)=8,Arr(4,3)=9,Arr(4,4)=10,其他与后面程序无关,然后再次利用嵌套循环输出,输出顺序为Arr(3,3),Arr(4,3),print,Arr(3,4),Arr(4,4),所以结果为C。

![[单项选择题] 请阅读程序: Option Base 1 Private Sub Form_Click() Dim Arr(4,4)As Integer For i=1 To 4For j [单项选择题] 请阅读程序: Option Base 1 Private Sub Form_Click() Dim Arr(4,4)As Integer For i=1 To 4For j](http://www.mshxw.com/aiimages/31/258204.png)
