[单项选择题] 请阅读程序： Option Base 1 Private Sub Form

[单项选择题] 请阅读程序：

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。