![[填空题] 以下程序的功能是在程序运行后，单击命令按钮，输出如下结果： 1 4 7 2 5 8 3 6 9 请完善以下程序。 Private Sub Command1_Click](http://www.mshxw.com/aiimages/31/251788.png "[填空题] 以下程序的功能是在程序运行后，单击命令按钮，输出如下结果： 1 4 7 2 5 8 3 6 9 请完善以下程序。 Private Sub Command1_Click")
[填空题] 以下程序的功能是在程序运行后，单击命令按钮，输出如下结果：
1 4 7
2 5 8
3 6 9
请完善以下程序。
Private Sub Command1_Click()
Dim Arr(3，3)As Integer
For i=1 To 3
For j=1 To 3
Arr(i，j)= 【15】
Print Arr(i，j)；
Next j
Print
NeXt i
End Sub
参考答案：
i+(j-1)*3 或 (i-1)+j*3-2解析：[分析]： 该题输出的是一个3行3列的二维数组，数组中的各元素通过外层循环变量i和内层循环变量j产生， i用来控制数组Arr的行变化，而i用来控制数组的列变化。第1次执行外层循环时，产生并输出的一行为1 4 7，即内层循环变量为1时输出1，内层循环变量为2时输出4，内层循环变量为3时输出7。因此，可以根据循环变量i和i的变化，用一个公式来产生和输出指定的数组。问题解析:
解析无
