VB添加菜单栏

 时间:2026-02-12 22:26:11

1、首先打开VB,并且选定“标准 EXE”来新建一个工程

VB添加菜单栏

2、在VB的顶部找到“工具”>“菜单编辑器”。或者,按下键盘上的“Ctrl+E”也行

VB添加菜单栏

3、点按“菜单编辑器”后,会弹出一个如图所示的对话框。在“标题”处填写该菜单的名称,如“文件”

VB添加菜单栏

VB添加菜单栏

4、接下来,在“名称”处填写该菜单在代码编写器中的名称,如“file”

VB添加菜单栏

5、在“索引”处填写“0”“1”……等自然数(注:索引是用来快速识别菜单的,经常应用在 Select Case 语句中)

VB添加菜单栏

6、【可选】若要启用快捷键,请在“快捷键”处选择适合您的菜单的快捷键,例如“Ctrl+E”(仅适用于二级及以上菜单)

VB添加菜单栏

7、【可选】若要使该菜单栏被复选(仅适用于二级及以上菜单),请选择“复选”;若要使该菜单不可用(enable=false)请将“有效”取消

VB添加菜单栏

VB添加菜单栏

8、【可选】若要添加n级菜单,请按下“下一个”并按下“→”并进行命名操作(最多添加4级子菜单)

VB添加菜单栏

9、预览图……

VB添加菜单栏

VB添加菜单栏

1、首先添加一个二级或以上的菜单,并且使顶层菜单不可见,并且索引为空(“”)

VB添加菜单栏

2、接着,在“代码窗口”中书写如下代码:

Private Sub Form_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single)

 If Button = 2 Then

  PopupMenu menu

 End If

End Sub

VB添加菜单栏

3、接着,你可以根据自己的需要来为菜单书写代码。例如,我为a输入如下代码:

Private Sub a_Click(Index As Integer)

 MsgBox "你单击了a"

End Sub

VB添加菜单栏

4、预览图……

VB添加菜单栏

VB添加菜单栏

VB添加菜单栏

  • excel如何为单元格设置数据的范围(数据校验)
  • 教大家在PPT中插入根式公式
  • 创建图形报表
  • excel2003数据有效性使用技巧
  • Excel 365如何设置图表标题的艺术字样式
  • 热门搜索
    崇尚英雄精忠报国手抄报 文明创建手抄报 中秋节手抄报内容资料 读书名言手抄报 纪念英雄手抄报 国庆节手抄报文字内容 母亲节手抄报图片 清明节手抄报简单画 手抄报装饰 低碳生活手抄报内容