单项选择题

在窗体上画一个命令按钮，并编写如下事件过程：
Private Sub Command1_Click()
Dim a(3，3)
For m=1 To 3
For n=1 To 3
If n=m Or n=4-m Then
a(m，n)=m+n
Else
a(m，n)=0
End If
Print a(m，n)；
Next n
Print
Next m
End Sub
运行程序，单击命令按钮，窗体上显示的内容为______。

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

单项选择题
窗体上有名称为Command1的命令按钮和名称为Text1的文本框，编写如下程序： Private Sub Command1_Click() Text1.Text= 程序设计 Text1.SetFocus End Sub Private Sub Text1_GotFocus() Text1.Text= 等级考试 End Sub 运行以上程序，单击命令按钮后______。
A) 文本框中显示的是"程序设计"，且焦点在文本框中
B) 文本框中显示的是"等级考试"，且焦点在文本框中
C) 文本框中显示的是"程序设计"，且焦点在命令按钮上
D) 文本框中显示的是"等级考试"，且焦点在命令按钮上
单项选择题
在菜单编辑器中建立一个名称为Menu()的菜单项，将其 可见 属性设置为False，并建立若干子菜单，然后编写如下过程： Private Sub Form_MouseDown(Button As Integer, Shift As Integer,X As Single,Y As Single) If Button=1 Then PopupMenu Menu() End If End Sub 则以下叙述中错误的是______。
A) 该过程的作用是弹出一个菜单
B) 右击时弹出菜单
C) Menu()是在菜单编辑器中定义的弹出菜单的名称D) 参数X、Y指明鼠标当前位置的坐标
相关试题