考试网 >> IT认证 >> 等级 >> 等级动态 >> VB中的界面设计原则和编程技巧

发布时间：2006-07-25 12:00     点击：

PopupMenu mnuExample 

End Sub 

如果要求只有按下鼠标左键或者右键才能激活菜单,就必须在Form_MouseDown里加入如下代码: 

Sub Form_MouseDown(Button As Integer,Shift As Integer,x As Sin-gle,y As Sin gle) 

If Button=2 then Button=2 表示鼠标右键 

PopupMenu mnuExample 

End If 

PopupMenu的完整句法是: 

[Form.]PopupMenu menuname[flags[,x[,y]]] 

改变flags的值可以控制弹出式菜单的表现形式。flags有两组值:第一组值用来控制菜单的显示方式,包括POPUP-MENU_LEFTALIGN,POPUPMENU_CENTERALIGN,POPUPMENU_RI-GHTALI GN,分别表示以x为左边界、以x为中心和以x为右边界的显示方式,并且以x为左边界是缺省的方式;另外一组值用来控制菜单项的选中方式,包括POPUP-MENU_LEFTBUTTON和POPUP-MENU_R IGHTBUTTON,分别表示左键选中和左/右键选中均可,并且左键选中是缺省的方式。flags的值由上面的两组值经过OR运算得出。例如,要求左对齐显示并且左键选中为准,则应有: 

flags=POPUPMENU_LEFTALIGN OR POPUPMENU_LEFTBUTTON 

x和y用来定义菜单弹出的位置,缺省是鼠标点中的位置。 

菜单项的其他属性 

用ALT+字母键激活顶层菜单,或者在菜单激活后用字母键激活一个菜单项,必须学会使用 &。&用在菜单项的标题属性(Caption)里。它的用法和作用与在用C语言编制的Windows程序中的用法和作用相同。 

有时希望顶层菜单之间的间隔大一些,或者某个顶层菜单出现在菜单条的最右端,这时就要用到标题属性是空格的菜单。如果一个菜单的标题是由多个空格组成的,那么这个菜单在菜单条上就占用跟空格的个数相应的空间,并且它后面的菜单也顺序地后移;如果这个菜单的 Visible属性是False,那么它就跟不存在一样。 

发表评论： 匿名发表 用户名: 查看评论

您将承担一切因您的行为、言论而直接或间接导致的民事或刑事法律责任 留言板管理人员有权保留或删除其管辖留言中的任意内容 本站提醒：不要进行人身攻击。谢谢配合。