vb全屏下的右键菜单问题当vb的窗体无边框,以最大化显示时,怎样
当vb的窗体无边框,以最大化显示时,怎样设置右键单?若利用菜单编辑器,那么最大化时仍会有标题栏(即使设置为无边框)
右键菜单,其实就是弹出式菜单,是独立于菜单栏而显示在窗体上的浮动菜单。在弹出式菜单上显示的项目取决于按下右键时指针所处的位置;因而,弹出式菜单也被称为上下文菜单。 为了显示弹出式菜单,可使用 PopupMenu 方法。这个方法使用下列语法: [object.]PopupMenu menuname [, flags [,x [, y [, boldcommand ]]]] 例子:使用窗体的MouseUp事件进行处理。 Private Sub Form_MouseUp (Button As Integer, Shift As Integer, X As Single, Y As Single) If Button = 2 Then '检查是否单击了鼠标右键。 PopupMenu mnuFile '把文件菜单显示为一个弹出式菜单。 End If End Sub 注意:直到菜单中被选取一项或者取消这个菜单时,调用 PopupMenu 方法后面的代码才会运行。 所以:如果要实现你的设计,你仍然可以设计窗体无边框最大化运行。但是你必须使用菜单编辑器设计一个菜单,要弹出的菜单项,例如mnuFile,下面必须包含子菜单项,并写上相应的处理代码。然后调用PopupMenu方法。