弹出式菜单名称为: a
写入:
Private Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
If Button = 2 Then PopupMenu a
End Sub
还可以继续编写子菜单:用MouseUp事件里的 Button参数(1表示左键 2表示右键)
建一个菜单 vbFile 子菜单vbRight: (右键点击窗体 就会弹出 vbFile下的几个子菜单了)
写入:
Private Sub Form_Load()
vbFile.Visible = False
End Sub
Private Sub Form_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single)
Select Case Button
Case 1
Print "1"
Case 2
Print "2"
PopupMenu vbFile
End Select
End Sub
以上这样就可以了。
扩展资料:
vb可以设计包括导航菜单、下拉菜单、右键菜单、顶部菜单等等各类需求菜单样式。
同时VB可以利用控件做出一些不同的风格菜单,让菜单别具一格。
主菜单栏
主菜单栏应构成 UI 任何特定于上下文菜单中程序包的命令的标准位置。 主菜单栏与其他命令结构不同,因为在环境中使用它来控制哪些命令都可见。 所有其他命令栏只需禁用命令不在上下文中,它们放在一个菜单或工具栏上。
环境定义一组内置于主菜单栏的命令所共有跨整个 IDE 和任务的多个域。 这些命令是始终可见的而不考虑其中 Vspackage 加载到环境。
These commands are always visible regardless of which VSPackages are loaded into the environment。 虽然 Vspackage 可以扩展此命令集,从每个产品和其命令的位置设置命令将为每个团队的责任。
参考资料:微软官网-菜单和 Visual studio 命令
1、VB弹出式菜单,先写栏目和弹出列表,如图所示。
2、打开VB软件,新建一个工程,添加一个文本框,将其text属性清空,设置ScrollBars属性为2-Vertical,MultiLine属性设置为True,如图所示。
3、在菜单栏选择【工具】选项下的【菜单编辑器】,然后进入菜单编辑器对话框。
4、接着添加文件菜单,做箭头表示将菜单升级,右箭头表示将菜单降级,上箭头和下箭头可以移动菜单项的位置。
5、然后添加新建、打开、保存、另存为等选项栏目,如图所示。
6、创建好文件菜单之后,单击“下一个”选项,使之成为一级菜单,接着设置“编辑”等功能。
7、接着就可以完成菜单制作了,效果如下图所示。
弹出式菜单,首先要创建菜单对象。方法是,把你要弹出的菜单当成是一个正常展示在窗体顶部的菜单,使用菜单编辑器将它制作出来。比如:添加一个标题是“弹出菜单”名称是“Menu1”的根菜单项,在其下层你可能要添加复制、粘贴、这是什么…这样的子菜单项作为弹出菜单的内容,内容你随意,这里不细究。最后要把根菜单项的“可见”对勾去掉。
创建完菜单对象后,便可以使用PopupMenu方法来弹出菜单。方法是:
PopupMenu 菜单对象名
继续上个例子,就是
PopupMenu Menu1
这个方法后面还有很多可选参数,如协调位置等,这些待你自己慢慢研究,这里不细究。如果你的弹出菜单是通过按右键弹出的话,通常会把它放到MouseDown事件中,继续上个例子,就是
Private Sub 控件_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
If Button = 2 Then '如果点的是右键
PopupMenu Menu1
End If
End Sub
If Button = 2 Then '如果是右键
PopupMenu Mnuedit, vbPoupMenuRightButton
‘Mnuedit是要弹出的菜单的名称,改成你
'要弹出的菜单的名称
End If
1、vb弹出式菜单,先写栏目和弹出列表,如图所示。2、打开vb软件,新建一个工程,添加一个文本框,将其text属性清空,设置scrollbars属性为2-vertical,multiline属性设置为true,如图所示。3、在菜单栏选择【工具】选项下的【菜单编辑器】,然后进入菜单编辑器对话框。4、接着添加文件菜单,做箭头表示将菜单升级,右箭头表示将菜单降级,上箭头和下箭头可以移动菜单项的位置。5、然后添加新建、打开、保存、另存为等选项栏目,如图所示。6、创建好文件菜单之后,单击“下一个”选项,使之成为一级菜单,接着设置“编辑”等功能。7、接着就可以完成菜单制作了,效果如下图所示。