以下程序的功能是在程序运行后，单击命令按钮，输出如下结果：

问题填空题

以下程序的功能是在程序运行后，单击命令按钮，输出如下结果：
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的变化，用一个公式来产生和输出指定的数组。