首页 > 电脑专区 > 电脑教程 >

VB添加菜单栏

来源:互联网 2023-02-21 22:28:20 408

VB,是一个编程软件,全称Visual Basic,使用的是Basic语言进行编程,是多数编程爱好者用于编程的软件。用法十分简单,极其适合新手进行编程。可以实现许多功能,例如,可以用VB编一个计算器,当然,也可以编企业进销存管理系统……等等,都是利用VB来实现的,那么,该如何利用VB添加菜单呢?今天,小编带给大家两种显示菜单的方法,希望大家能够喜欢。U0s办公区 - 实用经验教程分享!

工具/原料

  • 装有VB的电脑 1台

顶部菜单模式

  • 1

    首先打开VB,并且选定“标准 EXE”来新建一个工程U0s办公区 - 实用经验教程分享!

    VB添加菜单栏U0s办公区 - 实用经验教程分享!

  • 1本页面未经许可获取自百度经验
  • 2

    在VB的顶部找到“工具”>“菜单编辑器”。或者,按下键盘上的“Ctrl E”也行U0s办公区 - 实用经验教程分享!

    VB添加菜单栏U0s办公区 - 实用经验教程分享!

  • 3

    点按“菜单编辑器”后,会弹出一个如图所示的对话框。在“标题”处填写该菜单的名称,如“文件”U0s办公区 - 实用经验教程分享!

    VB添加菜单栏U0s办公区 - 实用经验教程分享!

    VB添加菜单栏U0s办公区 - 实用经验教程分享!

  • 4

    接下来,在“名称”处填写该菜单在代码编写器中的名称,如“file”U0s办公区 - 实用经验教程分享!

    VB添加菜单栏U0s办公区 - 实用经验教程分享!

  • 5

    在“索引”处填写“0”“1”……等自然数(注:索引是用来快速识别菜单的,经常应用在 Select Case 语句中)U0s办公区 - 实用经验教程分享!

    VB添加菜单栏U0s办公区 - 实用经验教程分享!

  • 6

    【可选】若要启用快捷键,请在“快捷键”处选择适合您的菜单的快捷键,例如“Ctrl E”(仅适用于二级及以上菜单)U0s办公区 - 实用经验教程分享!

    VB添加菜单栏U0s办公区 - 实用经验教程分享!

  • 7

    【可选】若要使该菜单栏被复选(仅适用于二级及以上菜单),请选择“复选”;若要使该菜单不可用(enable=false)请将“有效”取消U0s办公区 - 实用经验教程分享!

    VB添加菜单栏U0s办公区 - 实用经验教程分享!

    VB添加菜单栏U0s办公区 - 实用经验教程分享!

  • 8

    【可选】若要添加n级菜单,请按下“下一个”并按下“→”并进行命名操作(最多添加4级子菜单)U0s办公区 - 实用经验教程分享!

    VB添加菜单栏U0s办公区 - 实用经验教程分享!

  • 9

    预览图……U0s办公区 - 实用经验教程分享!

    VB添加菜单栏U0s办公区 - 实用经验教程分享!

    VB添加菜单栏U0s办公区 - 实用经验教程分享!

  • 右键菜单模式

  • 1

    首先添加一个二级或以上的菜单,并且使顶层菜单不可见,并且索引为空(“”)U0s办公区 - 实用经验教程分享!

    VB添加菜单栏U0s办公区 - 实用经验教程分享!

  • 2

    接着,在“代码窗口”中书写如下代码:U0s办公区 - 实用经验教程分享!

    Private Sub Form_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single)U0s办公区 - 实用经验教程分享!

    If Button = 2 ThenU0s办公区 - 实用经验教程分享!

    PopupMenu menuU0s办公区 - 实用经验教程分享!

    End IfU0s办公区 - 实用经验教程分享!

    End SubU0s办公区 - 实用经验教程分享!

    VB添加菜单栏U0s办公区 - 实用经验教程分享!

  • 3

    接着,你可以根据自己的需要来为菜单书写代码。例如,我为a输入如下代码:U0s办公区 - 实用经验教程分享!

    Private Sub a_Click(Index As Integer)U0s办公区 - 实用经验教程分享!

    MsgBox "你单击了a"U0s办公区 - 实用经验教程分享!

    End SubU0s办公区 - 实用经验教程分享!

    VB添加菜单栏U0s办公区 - 实用经验教程分享!

  • 4

    预览图……U0s办公区 - 实用经验教程分享!

    VB添加菜单栏U0s办公区 - 实用经验教程分享!

    VB添加菜单栏U0s办公区 - 实用经验教程分享!

    VB添加菜单栏U0s办公区 - 实用经验教程分享!

  • 注意事项

    • 您若觉得本篇经验蛮好,请高抬贵手,点个【赞】吧!【投票】也行哦!!你的投票是对我工作的肯定!谢谢!

    以上方法由办公区教程网编辑摘抄自百度经验可供大家参考!U0s办公区 - 实用经验教程分享!


    标签: 电脑技术编程

    办公区 Copyright © 2016-2023 www.bgqu.net. Some Rights Reserved. 备案号:湘ICP备2020019561号统计代码