程序代码如下，当单击窗体上的Command1控件时，窗体上显示的结果

问题单项选择题

程序代码如下，当单击窗体上的Command1控件时，窗体上显示的结果是( )。 Option Base 1 Private Sub Command1_Click() Dim i As Integer Dim x(3，3)As Integer For i=1 To 3For j=1 To 3 x(i,j)=(i-1)*3+jNext j Next i For i=1 To 3Print x(i,4-i)； Next i End Sub

A．1 5 9

B．1 4 7

C．3 5 7

D．3 6 9

答案

参考答案：C

解析：本题首先通过一个双重For循环给一个3行3列的数组x的每个元素赋值，赋值规律是每个元素的值是它的行下标减1乘3加上列下标。然后通过一个For循环输出三个元素：x(1，3)、x(2，2)和x(3,1)，它们的值分别为：x(1，3)=(1-1)*3+3=3、x(2，2)=(2-1)*3+2=5、x(3，1)=(3-1)*3+1=7。