【VB】PopupMenu: 弹出菜单的方法详解

VB PopupMenu 用来显示弹出菜单

语法格式：
    object.PopupMenu menuname, flags, x, y, boldcommand

参数详解：
    Object       对象，窗体名。
    Menuname     菜单名，指在菜单编辑器中定义的主菜单项名。
    Flags        该参数是一个数值或符号常量，指定弹出式菜单的位置和行为，其取值分为两组，一组用来指定菜单位置，另一组用来定义特殊的菜单行为，见下表(指定菜单位置)。
    X、Y         弹出式菜单在窗体上的显示位置的X、Y坐标(与Flags参数配合使用)。
    Boldcommand  指定弹出式菜中的弹出式菜单控件的名字，用以显示为黑体正文标题。
 
指定菜单位置：
    定位常量                值  作用
    VbPopupMenuLeftAlign    0   X坐标指定弹出式菜单的左边界位置
    VbPopupMenuCenterAlign  4   X坐标指定弹出式菜单的中间位置
    VbPopupMenuRightAlign   8   X坐标指定弹出式菜单的右边界位置

定义菜单行为：
    定位常量                值  作用
    VbPopupMenuLeftButton   0   通过单击鼠标左键选择菜单命令
    VbPopupMenuRightButton  8   通过单击鼠标右键选择菜单命令

说明：
    PopupMenu 方法的6个参数中，除“菜单名”外，其余参数都是可选的。当省略了“对象”时，弹出式菜单只能在当前窗体中显示。如果需要在其它窗体中显示弹出菜单，则必须加上窗体名。

    Flags 的两组参数可以单独使用，也可以联合使用。当联合使用时，每组中取一个值，两个值相加；如果使用符号常量，则两个值用Or连接。

    X、Y分别用来指定弹出式菜单显示位置的横、纵坐标，如果省略，则弹出菜单在鼠标光标的当前位置显示。

    弹出式菜单的“位置”由X、Y、Flags参数共同指定。如果省略这几个参数，则在单击鼠标右键弹出菜单时，鼠标光标所在位置为弹出式菜单左上角的坐标。在默认情况下，以窗体的左上角为坐标原点。如果只省略Flags参数，不省略X、Y参数，则X、Y为弹出式菜单左上角的坐标；如果同时使用X、Y及Flags参数，则弹出菜单的位置分为一下几种情况：

        Flags = 0    X、Y为弹出式菜单左上角的坐标

        Flags = 4    X、Y为弹出式菜单顶边中间的坐标

        Flags = 8    X、Y为弹出式菜单右上角的坐标

    为了显示弹出式菜单，通常把PopupMenu方法放在MouseDown事件中，该事件响应所有的鼠标单击操作。按照惯例，一般通过单击鼠标右键显示弹出菜单，这可以用Button参数来实现。对于两个键的鼠标来说，左键的Button参数值为1，右键的Button参数值为2。因此可以强制使用右键来响应MouseDown事件而显示弹出菜单：

        If Button=2 Then PopupMenu 菜单名

文章来源于lcx.cc:【VB】PopupMenu: 弹出菜单的方法详解

相关推荐: 当可执行文件不能上传时又一“思路”

    By：dark'moon     当可执行文件不能上传时又一思路，相信大家都遇上过把。     明明都有可写权限，可以上传 txt jpg 不能修改后缀名，不能上传 exe bat 还有其他文件。     想必有不少人会放弃，偶今天也遇上这种问题，当然…