Visual Basic程序设计电子课件——第11章 菜单设计.pptVIP

Visual Basic程序设计电子课件——第11章 菜单设计.ppt

  1. 1、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。。
  2. 2、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载
  3. 3、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
  4. 4、该文档为VIP文档,如果想要下载,成为VIP会员后,下载免费。
  5. 5、成为VIP后,下载本文档将扣除1次下载权益。下载后,不支持退款、换文档。如有疑问请联系我们
  6. 6、成为VIP后,您将拥有八大权益,权益包括:VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
  7. 7、VIP文档为合作方或网友上传,每下载1次, 网站将根据用户上传文档的质量评分、类型等,对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
查看更多
第十一章 V i s u a l B A S I C 程序设计 * 第十一章 菜单设计 1.菜单编辑器的使用 2.下拉式菜单的设计 3.动态菜单的设计 4.弹出式菜单的设计  本章要求: 本章重点: 本章难点: 菜单的建立与使用 动态菜单的设计 * 11.1 Visual Basic中的菜单 菜单是图形化界面一个必不可少的组成元素,通过菜单对各种命令按功能进行分组,使用户能够更加方便、直观地访问这些命令。 菜单的组成: * 11.2 菜单编辑器的使用 菜单项: 看成控件,具有其属性、事件、方法。 菜单项也称为菜单控件。 设计: 通过“菜单编辑器”完成。 打开菜单编辑器: ? 首先使窗体成为当前窗体 ? 执行“工具”菜单下的“菜单编辑器”命令 ? 单击标准工具栏的“菜单编辑器”按钮 ? 从窗体快捷菜单中选择“菜单编辑器”命令 菜单编辑器结构: 属性区、编辑区、菜单列表区 * Caption Name Index Shortcut Checked Enabled Visible WindowList(MDI) NegotiatePosition HelpContextID 注: 标题框中键入“-”和“”符号的作用。 不能给顶级菜单项加快捷键。 * 例1:设计菜单界面,各主菜单项及其下拉菜单如下图所示。下拉菜单中的子菜单项用于对文本框Text1设置字体、字号、文字颜色和文字效果。其中,效果子菜单下的各菜单项具有复选功能,设运行初始时各项前面没有√符号,与文本框的初始状态一致。 * 标 题 名称 索引 快捷键 说 明 字体(F) AA 访问键Alt+F ....宋体 AA1 1 Ctrl+A 定义成控件数组AA1; AA1(3)用于生成分隔条 ....黑体 AA1 2 Ctrl+B ....- AA1 3 ....隶书 AA1 4 Ctrl+C ....楷体_GB2312 AA1 5 Ctrl+D 字号(S) BB 访问键Alt+S ....14 BB1 1 定义成控件 数组BB1 ....16 BB1 2 ....18 BB1 3 ....20 BB1 4 菜单编辑器设置如下表: * 访问键Alt+C 说 明 DD4 ....斜体 DD3 ....粗体 DD2 ....下划线 DD1 ....删除线 DD 效果(E) CC3 ....蓝色 CC2 ....绿色 CC1 ....红色 CC 颜色(C) 快捷键 索引 名称 标 题 (续表) 访问键Alt+E * (1) “字体”菜单下的菜单项设计成一个控件数组AA1,共享以下事件过程: Private Sub AA1_Click(Index As Integer) Text1.Font = AA1(Index).Caption End Sub (2) “字号”菜单下的菜单项设计成一个控件数组BB1,共享以下事件过程: Private Sub BB1_Click(Index As Integer) Text1.FontSize = Val(BB1(Index).Caption) End Sub (3)“颜色”菜单下的各菜单项为独立的菜单控件,因此应分别在其单击事件过程中编写代码,各事件过程如下: * Private Sub CC1_Click() Text1.ForeColor = vbRed End Sub Private Sub CC2_Click() Text1.ForeColor = vbGreen End Sub Private Sub CC3_Click() Text1.ForeColor = vbBlue End Sub (4) “效果”菜单下的各菜单项具有复选功能,每次单击时应切换成另一种状态,因此要判断当前菜单项的Checked属性,各事件过程如下: * Private Sub DD1_Click() If DD1.Checked = True Then Text1.FontStrikethru = False

文档评论(0)

潇湘画里 + 关注
实名认证
文档贡献者

该用户很懒,什么也没介绍

1亿VIP精品文档

相关文档