单项选择题

在窗体上画一个命令按钮(其Name属性为Command1)，然后编写如下代码：
Private Sub Command1_Click( )
Dim a(5,5)
For i=1 To 3
For j=1 To 4
a(i,j)=i*j
Next
Next
For n=1 To2
For m = 1 To3
Print a(m,n);
Next
Next
End Sub
程序运行后，单击命令按钮，输出结果是

A．2 4 6 1 2 3
B．1 2 3 2 4 6
C．1 2 3 4 5 6
D．6 5 4 3 2 1
<上一题 目录 下一题>
热门 试题

单项选择题
以下用户自定义函数 Function Func(a As Integer, b As Integer) As Integer Static m As Integer, i As Integer m=0:i=2 i=i+m+i m=i+a+b Func=m End Function 在窗体上画一个命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Dim k As Integer，m As Integer，p As Integer k=4：m=1 P=Func(k，m) Print p End Sub 程序运行后，单击命令按钮，输出结果为
A．8
B．9
C．10
D．11
单项选择题
在窗体上画一个列表框和一个命令按钮，其名称分别为List1和Command1，然后编写如下事件过程。 Private Sub Form_Load() List1.AddItem Item 1 List1.AddItem Item 2 List1.AddItem Item 3 End Sub Private Sub Command1_Click() List1.List(List1.Listcount)= AAAA End Sub 程序运行后，单击命令按钮，其结果为
A．把字符串"AAAA"添加到列表框中，但位置不能确定
B．把字符串"AAAA"添加到列表框的最后(即"Item 3"的后面)
C．把列表框中原有的最后一项改为"AAAA"
D．把字符串"AAAA"插入到列表框的最前面(即"Item 1"的前面)
相关试题