窗体上命令按钮Command1的事件过程如下: Option Base 1 Private Sub Command1_Click() Dim a(4,4)As Variant For i=1 To 4 For j=1 To 4 a(i,j)=(i-1)*3+j Next j Next i For i=3 To 4 For j=3 To 4 Print a(i,j) Next j Next i End Sub 该程序执行后,输出结果是( )。
A: 9
B: 10
C: 12
D: 13
E: 7
F: 10
G: 12
H: 13
I: 9
J: 12
K: 10
L: 13
M: 8
N: 11
O: 9
P: 12
A: 9
B: 10
C: 12
D: 13
E: 7
F: 10
G: 12
H: 13
I: 9
J: 12
K: 10
L: 13
M: 8
N: 11
O: 9
P: 12
举一反三
- 在窗体上画一个命令按钮(其Name属性为Command1),然后编写如下代码: Option Base 1 Private Sub Command1_Click() Dim a(4,4) For i=1 To 4 For j=1 To 4 a(i,j)=(i-1)*3+j Next j Next i For i=3 To 4 For j=3 To 4 Print a(j,i); Next j Next i End Sub 程序运行后,单击命令按钮,其输出结果为 ______ 。 A.6 9 7 10 B.7 10 8 11 C.8 11 9 12 D.9 12 10 13
- 在窗体上画一个名称为Command1的命令按钮 ,并编写如下程序:Option Base 1Private Sub Command1_Click() Dim a(4,4) For i=1 To 4 For j=1 To 4 a(i,j)=(i-1)*3+j Next j Next i For i=3 To 4 For j=3 To 4 Print a(j,i); Next j Print Next iEnd Sub运行程序,单击命令按钮,则输出结果为______。 A: 6 9 7 10 B: 7 10 8 11 C: 8 11 9 12 D: 9 12 10 13
- 在窗体上面一个名称为Command1的命令按钮,并编写如下程序: Option Base 1 Private Sub Command1_Click() Dim a(4,4) For i=1 To 4 For j=1 To 4 a(i,j)=(i-1)*3+j Next j Next j For i=3 To 4 For j=3 To 4 Print a(j,i); Next j Print Ncxt i End Sub 运行程序,单击命令按钮,则输出结果为______。 A: 6 97 10 B: 7 108 11 C: 8 119 12 D: 9 1210 13
- 在窗体上画一个名为Command1的命令按钮,然后编写如下代码: Option Base 1 Private Sub Command1_ Click() Dim arr(4, 4) For i = 1 To 4 For j = 1 To 4 arr(i, j) = (i - 1) * 3 + j Next j Next i For i = 1 To 2 For j = 1 To 2 Print arr(i, j) Next j Next i End Sub程序运行后,单击命令按钮,输出结果为______ 。 A: 3 4 6 7 B: 7 8 10 11 C: 1 2 4 5 D: 8 9 12 13
- 在窗体上面添加一个命令按钮Command1,然后编写如下事件过程: Private Sub Command1_Click() Dim a1(4, 4), a2(4, 4) For i = 1 To 4 For j = 1 To 4 a1(i, j) = i + j a2(i, j) = a1(i, j) + i + j Next j Next i Print a1(3, 3); a2(3, 3) End Sub 程序运行后,单击命令按钮,在窗体上输出的内容是( )