- 1、本文档共33页,可阅读全部内容。
- 2、有哪些信誉好的足球投注网站(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
- 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
查看更多
第11章 菜单程序设计 11.1 Visual Basic中的菜单 应用程序通过菜单为用户提供一组命令 菜单一般分为两种:下拉式菜单和弹出式菜单 下拉式菜单 下拉式菜单基本结构包括:顶层菜单、菜单项和子菜单 11. 2 菜单编辑器(知识点) 设计菜单的工具——菜单编辑器 可以有4种方式进入菜单编辑器 ⑴执行“工具”菜单中的“菜单编辑器”命令。 ⑵使用热键Ctrl+E。 ⑶单击工具栏中的“菜单编辑器”按钮。 ⑷在要建立菜单的窗体上单击鼠标右键,将弹出一个菜单,然后单击 “菜单编辑器”命令。 11. 2 菜单编辑器 设计菜单的工具——菜单编辑器 菜单编辑器分为上、中、下三部分,上半部分是数据区用来设置属性,中间部分是编辑区,用来对输入的菜单进行编辑;下半部分是菜单显示区,用来显示用户输入的菜单内容。 11. 2 菜单编辑器 只有当某个窗体为活动时,才能打开菜单编辑器窗口。 1. 数据区用来输入或修改菜单项、设置属性。 分为标题、名称、索引、快捷键、帮助上下文、协调位置、复选 、有效、可见和显示窗口列表等栏目。 2. 编辑区有左右箭头,上下箭头,下一个、插入和删除7个按钮,用来对输入的菜单进行简单的编辑。菜单在数据区输入,在菜单项显示区显示。 3. 菜单项显示区位于菜单编辑器窗口的下部,输入的菜单在这里显示出来,并通过内缩符号(…)表明菜单项的层次。条形光标所在的菜单项是“当前菜单项” 。 除分隔线以外的所有菜单元素都能识别Click事件 例11.1 编写程序,进行两个操作数的算术运算练习 设计步骤如下: (1)创建应用程序的用户界面和设置对象属性 菜单栏向用户提供功能选择,包括运算数的位数,运算符类型(加、减、乘)和退出程序 菜单设计 各个菜单项名称 (2)编写程序代码 Option Explicit 规定所有变量都要显式声明 Dim sel1 As Integer, sel2 As String Dim r1 As Long Private Sub Form_Load() sel1 = 0 位数标记 sel2 = 运算标记 Randomize End Sub Private Sub Mnu11_Click() 单击“一位数”菜单项 sel1 = 1 设置位数标记 End Sub Private Sub Mnu12_Click() 单击“二位数”菜单项 sel1 = 10 End Sub Private Sub Mnu13_Click() 单击“三位数”菜单项 sel1 = 100 End Sub Private Sub Mnu21_Click() 单击“加法”菜单项 sel2 = + 设置运算标记 End Sub Private Sub Mnu22_Click() 单击“减法”菜单项 sel2 = - End Sub Private Sub Mnu23_Click() 单击“乘法”菜单项 sel2 = * End Sub Private Sub Command1_Click() 命题按钮单击事件 Dim a As Long, b As Long If sel1 = 0 Or sel2 = Then MsgBox 先选择运算数的位数和运算类型
您可能关注的文档
- T磁共振临床应用和影像报告解读.ppt
- t-平板车悬挂液压系统设计.ppt
- u8EAI培训案例资料.ppt
- U9V2.5组件化实施方案实例指导-INV-240库存管理下成本计算业务流程资料.ppt
- u71第七章-市场营销定位.ppt
- U872顾问测试培训-质量追溯.ppt
- Unit-3-A-taste-of-English-humour精讲课件-新人教版必修4.ppt
- Unit4-Hummingbird-Winter蜂鸟的冬季汇编.ppt
- unit4-language-points-英语必修5汇编.ppt
- unit5新视野大学英语第二版第一册汇编.ppt
- 第18讲 第17课 西晋的短暂统一和北方各族的内迁.docx
- 第15讲 第14课 沟通中外文明的“丝绸之路”.docx
- 第13课时 中东 欧洲西部.doc
- 第17讲 第16 课三国鼎立.docx
- 第17讲 第16课 三国鼎立 带解析.docx
- 2024_2025年新教材高中历史课时检测9近代西方的法律与教化含解析新人教版选择性必修1.doc
- 2024_2025学年高二数学下学期期末备考试卷文含解析.docx
- 山西版2024高考政治一轮复习第二单元生产劳动与经营第5课时企业与劳动者教案.docx
- 第16讲 第15课 两汉的科技和文化 带解析.docx
- 第13课 宋元时期的科技与中外交通.docx
文档评论(0)