设已经在菜单编辑器中设计了窗体的快捷菜单，其顶级菜单为Bt，取

问题单项选择题

设已经在菜单编辑器中设计了窗体的快捷菜单，其顶级菜单为Bt，取消其“可见”属性，运行时，在以下事件过程中，可以使快捷菜单相应鼠标右键菜单的是()。

A． Private Sub Form_MouseDown(Button As Integer, Shift As Integer,_　　　　　　　　　　　　　　　X As Single, Y As Single)　　　If Button=2 Then PopupMenu Bt, 2　 End Sub

B．Private Sub Form_MouseDown(Button As Integer, Shift As Integer, _　　　　　　　　　　　　　　　X As Single, Y As Single)　　　PopupMenu Bt　 End Suh

C． Private Sub Form MouseDown(Button As Integer, Shift As Integer, _　　　　　　　　　　　　　　　X As Single, Y As Single)　　　PopupMenu Bt,0　 End Sub

D．Private Sub Form_MouseDown(Button As Integer, Shift As Integer, _　　　　　　　　　　　　　　　X As Single, Y As Single)　　　If (Button=vbLeftButton) Or ( Button=vbRightButton) Then PopupMenu Bt　 End Sub

答案

参考答案：A

解析：在Visual Basic中，允许出现快捷菜单，对用户来说，提供了很大的方便，一般来说，菜单都在窗口的顶部，有时，用户需要执行菜单中的某一命令，就得把鼠标移动到窗口顶部，然后打开菜单选择命令，这对用户来说，会觉得麻烦。而快捷菜单并不需要到窗口的顶部来打开，只要单击鼠标右键，就会弹出菜单。设计快捷菜单仍然可以用Visual Basic中提供的菜单编辑器，只要把某个菜单设置成隐藏就可以了，实际上，不管是在窗口顶部菜单条上显示的菜单还是隐藏的菜单，都可以用PopupMenu方法把它们作为快捷菜单在运行时显示出来。PopupMenu方法的使用形式如下：　　[对象]．PopupMenu菜单名，标志，x，y　　其中，x，y是提供菜单显示的位置；标志：指定快捷菜单的行为。当标志为0时，快捷菜单中的项只能对鼠标左键起反应；当标志为2时，快捷菜单中的项对鼠标右键和左键都反应；标志为2时，PopupMenu方法只能用在MouseDown事件过程中。