网站大量收购闲置独家精品文档,联系QQ:2885784924

07-界面设计全解.ppt

  1. 1、本文档共37页,可阅读全部内容。
  2. 2、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
  3. 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载
  4. 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
查看更多
07-界面设计全解

Ch7 界面设计 菜单设计 ◇菜单的概念: 菜单是Windows应用程序中的要素之一,它以分组的形式组织多个命令或操作,为用户提供了便捷的操作手段。 ◇菜单的分类 △下拉式菜单 △弹出式菜单 ?下拉式菜单 在下拉式菜单系统中,一般有一个主菜单,称为菜单栏。其中包含一个或多个选择项,称为菜单标题。VB菜单系统最多有六层。 VB中,菜单是一个图形对象,即控件。这个控件不在工具箱中,而在“菜单编辑器”中进行设计。 使用菜单 菜单编辑器 ◇菜单编辑器的功能 创建新的菜单和菜单项,在已有的菜单上增加新命令、编辑已有的菜单命令以及修改和删除已有的菜单和菜单项。 ◇打开菜单编辑器 “工具”\“菜单编辑器”命令或工具栏中“菜单编辑器”按钮。 ◇菜单编辑器界面组成(如下图所示) ① 菜单控件属性区 用于设置菜单项的属性。 ② 编辑区 用于对菜单进行编辑。 ③ 菜单控件列表区 显示输入的菜单项及层次 菜单控制属性区 编辑区 菜单项 显示区 使用菜单 设置该菜单项是否可见,该属性为“False”时,相应菜单项将被暂时从菜单中删除,直到该属性被 重新设置为true 可见(Visible) 设置菜单项的操作状态,该属性为“False”时,菜单项变灰。不响应用户事件 有效(Enabled) “复选”属性为true时,在相应的菜单项前打“√”标记,表明该菜单项当前处于活动状态 复选(Checked) 设置与菜单项等价的快捷键 快捷键(Shortcut) 设置菜单控件数组的下标,相当于控件数组的Index属性 索引(Index) 设置菜单项的名称,相当与控件的Name属性 名称(Name) 设置菜单项的标题,相当与控件的Caption属性 标题(Caption) 说 明 属 性 菜单控件的主要属性 使用菜单 示例1:设计一个流动字幕的电子标题板,要求利用菜单来控制标题板的内容、字体、字体风格等。 设计步骤如下: ◇建立应用程序用户界面并设置属性,如下图: △增加一个标签、一个计时器控件(Intervel属性设置为100,Enabled属性设置为False) 、一个命令按钮。 △按菜单项的设置设计菜单项,如下页表所示 示例1 教材示例1 使用菜单 子菜单项133 Undrln ……下划线 子菜单项132 Itl ……斜体 子菜单项131 Bld ……粗体 子菜单项13 Styl …文本风格(S) 子菜单项124 Hei ……黑体 子菜单项123 Kai ……楷体 子菜单项122 Li ……隶书 子菜单项121 Song ……宋体 子菜单项12 Nam …文字字体(N) 子菜单项11 Txt …文本内容(T) 主菜单1 Menu 标题板(F) 说明 名称(Name) 标题(Caption) 菜单项的设置 使用菜单 ◇编写代码 ①“文本内容”项txt的Click事件代码 Private Sub txt_Click() temp = InputBox(输入标题板内容, 输入, Label1.Caption) If temp Then Label1.Caption = temp End If End Sub ②“文本字体”四个菜单选项的Click事件代码 Private Sub hei_Click() Private Sub song_Click() Label1.FontName = “黑体” Label1.FontName = 宋体“ End Sub End Sub Private Sub ki_Click() Private Sub li_Click() Label1.FontName =“楷体_GB2312” Label1.FontName = 隶书“ End Sub End Sub 使用菜单 ③“文本风格”中三个菜单选项的Click事件代码 Private Sub Bld_Click() Bld.Checked = Not Bld.Checked Label1.FontBold = Bld.Checked End Sub Priv

文档评论(0)

0022515 + 关注
实名认证
内容提供者

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

1亿VIP精品文档

相关文档