![[单项选择题] 下面程序运行后，输出的结果是 Dim arr(3，3) For j=1 To 3 For k=1 To 3 Art(j,k)=(j-1)*3+k Next k Next j For](http://www.mshxw.com/aiimages/31/256603.png "[单项选择题] 下面程序运行后，输出的结果是 Dim arr(3，3) For j=1 To 3 For k=1 To 3 Art(j,k)=(j-1)*3+k Next k Next j For")
[单项选择题] 下面程序运行后，输出的结果是 Dim arr(3，3) For j=1 To 3 For k=1 To 3 Art(j,k)=(j-1)*3+k Next k Next j For j=2 To 3 For k=2 To 3 Print arr(k,j)； Next k Print Next j Ａ) 2 5 Ｂ) 5 8 Ｃ) 4 7 Ｄ) 5 9 3 6 6 9 5 8 6 8
A. 2 5
B. 5 8
C. 4 7
D. 5 9 3 6 6 9 5 8 6 8
参考答案：
B问题解析:
依题意，声明一个3行3列的数组，并用嵌套for循环赋值如下： arr(1,1)=1 arr(2,1)=4 arr(3,1)=7 arr(1,2) =2 arr(2,2) =5 arr(3,2) =8 arr(1,3) =3 arr(2,3) =6 arr(3,3) =9 最后用Print函数输出arr(2,2) ，arr(3,2) ，空行，arr(2,3)，arr(3,3)。
