在窗体上画一个名称为Command1的命令按钮,然后编写如下程序: Private Sub Command1_Click() Dim A(3, 3) As Integer For j = 1 To 3 For k = 1 T

admin2015-10-23  25

问题 在窗体上画一个名称为Command1的命令按钮,然后编写如下程序:
Private Sub Command1_Click()
    Dim A(3, 3) As Integer
    For j = 1 To 3
        For k = 1 To 3
            A(j, k) = (j - 1) * 3 + k
        Next k
    Next j
    For j = 2 To 3
        For k = 1 To 2
            Print A(k, j);
        Next k
        Print
    Next j
End Sub
运行程序,单击命令按钮,输出结果是

选项 A、2  5  3  6
B、2  3  5  6
C、4  7  5  8
D、4  5  7  8

答案A

解析 用Dim定义4*4的整型数组A(3,3)(默认情况下数组的下标从0开始),并将其元素初始化为0。程序中有两个多重循环:第一个多重循环给二维数组A(3,3)中的第二行第二列至第四行第四列的数据分别进行赋值,A(1,1)=1,A(1,2)=2,A(1,3)=3;A(2,1)=4,A(2,2)=5,A(2,3)=6;A(3,1)=7,A(3,2)=8, A(3,3)=9;第二个多重循环是输出二维数组A(3,3)的部分值,即输出A(1,2)、A(2,2)、A(1,3)、A(2,3)四个数据。故A(1,2)、A(2,2)、A(1,3)、A(2,3)的值分别为2,5,3,6。故选择A选项。
转载请注明原文地址:https://kaotiyun.com/show/WHLp777K
0

最新回复(0)