请阅读程序： Option Base 1 Pfivate Sub Form_Click() Dim Arr(4，4)As Integer For i=1 To 4 For j=1 To 4 Arr(i,j)=(i-1

admin2010-11-02 28

问题请阅读程序：
Option Base 1
Pfivate Sub Form_Click()
Dim Arr(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 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。

转载请注明原文地址:https://kaotiyun.com/show/7Mmp777K

本试题收录于：二级VB题库NCRE全国计算机二级分类