以下程序的功能是在程序运行后,单击命令按钮,输出如下结果: 1 4 7 2 5 8 3 6 9 请完善以下程序。 Private Sub Command1_Click() Dim

admin2009-02-13  61

问题 以下程序的功能是在程序运行后,单击命令按钮,输出如下结果:
   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)=【  】
             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的变化,用一个公式来产生和输出指定的数组。
转载请注明原文地址:https://kaotiyun.com/show/X61p777K
0

最新回复(0)