[单项选择题] 下面程序运行后，输出的结果是( )。 Dim arr(3,3) For i=1 To 3 For k=1 To 3Arr(j,k)=(j-1)*3+kNext kNext jF

参考答案:

B

依题意，声明一个三行三列的数组，并用嵌套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)。