在Form1窗体上有一个菜单项,名称为Menu,它有自己的子菜单。若希望在鼠标右键单击窗体时能够弹出Menu的子菜单,某人编写了下面的事件过程: Private Sub Form_MouseDown(Button As Integer, Shift As

admin2018-05-08  36

问题 在Form1窗体上有一个菜单项,名称为Menu,它有自己的子菜单。若希望在鼠标右键单击窗体时能够弹出Menu的子菜单,某人编写了下面的事件过程:
Private Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
    If Button = 2 Then
        Menu PopupMenu
    End If
End Sub
但调试时发现不能达到目的,需要修改程序,下面正确的修改方案是

选项 A、把 If Button = 2 Then 改为 If Button = 1 Then
B、把过程名改为Form1_MouseDown
C、把Menu PopupMenu 改为Popup Menu
D、把Menu PopupMenu 改为PopupMenu Menu

答案D

解析 PopupMenu方法用来显示弹出式菜单, PopupMenu 后接菜单名。菜单名是在菜单编辑器中定义的主菜单项名,故选项D正确,C选项错误。对于两个键的鼠标来说,左键的Button参数值为1,右键的Button参数值为2,因此,若鼠标右键单击窗体时能够弹出Menu的子菜单,If Button=2条件语句正确,故A选项错误。故本题答案为D项。
转载请注明原文地址:https://jikaoti.com/ti/69y0FFFM
0

最新回复(0)