《第8章 菜单与工具栏设计VB.ppt》由会员分享，可在线阅读，更多相关《第8章 菜单与工具栏设计VB.ppt（20页珍藏版）》请在taowenge.com淘文阁网|工程机械CAD图纸|机械工程制图|CAD装配图下载|SolidWorks_CaTia_CAD_UG_PROE_设计图分享下载上搜索。
1、菜单与工具栏设计菜单与工具栏设计主讲主讲:李晓岚李晓岚8.1 菜单设计菜单设计v什么是菜单？什么是菜单？v菜单的功能？菜单的功能？人机对话界面，方便使用者选择应用系统的人机对话界面，方便使用者选择应用系统的各种功能各种功能通过菜单可以管理应用系统，控制应用程序通过菜单可以管理应用系统，控制应用程序各种功能模块的运行各种功能模块的运行v菜单的类型菜单的类型下拉式下拉式弹出式弹出式v属性属性定义其外观和操作定义其外观和操作Caption、Enable、Visible、Checkedv事件事件Click事件事件使用菜单编辑器设计菜单使用菜单编辑器设计菜单菜单编辑器菜单编辑器数据区数据区编辑区编辑区显
2、示区显示区属属 性性说说 明明标题标题CaptionCaption该内容显示在菜单条或菜单之中该内容显示在菜单条或菜单之中名称名称NameName菜单项的标识符，仅用于访问代码中的菜单项菜单项的标识符，仅用于访问代码中的菜单项索引索引IndexIndex设置菜单控件数组的下标设置菜单控件数组的下标快捷键快捷键允许为每个命令选定快捷键，即通过键盘来选择某个菜单项允许为每个命令选定快捷键，即通过键盘来选择某个菜单项复选复选CheckedChecked当当 复选复选 属性设置为属性设置为True 时，在相应的菜单项时，在相应的菜单项旁加上旁加上 以表明该菜单项处于活动状态以表明该菜单项处于活动状态有
3、效有效EnableEnable当该属性设置为当该属性设置为False时，相应的菜单项呈灰色，时，相应的菜单项呈灰色，表明不会相应用户事件表明不会相应用户事件可见可见VisibleVisible不可见的菜单项时不能被执行的不可见的菜单项时不能被执行的协调位置协调位置决定是否及如何在容器窗体中显示菜单决定是否及如何在容器窗体中显示菜单显示窗口列表显示窗口列表在在多文档应用多文档应用程序中使用程序中使用1 数据区数据区v用来输入或修改菜单项，设置属性。用来输入或修改菜单项，设置属性。2.编辑区编辑区v编辑区由编辑区由 7 个按钮组成个按钮组成右箭头右箭头把选定的菜单向右移一个等级。把选定的菜单向右移
4、一个等级。左箭头左箭头把选定的菜单向上移一个等级。把选定的菜单向上移一个等级。上箭头上箭头把选定的菜单项在同级菜单内向上移动一个位置。把选定的菜单项在同级菜单内向上移动一个位置。下箭头下箭头把选定的菜单项在同级菜单内向下移动一个位置。把选定的菜单项在同级菜单内向下移动一个位置。下一个下一个将开始一个新的菜单项。将开始一个新的菜单项。插入插入将在某个菜单项前插入一个新的同级空白菜单项。将在某个菜单项前插入一个新的同级空白菜单项。删除删除将删除选定的菜单项。将删除选定的菜单项。3.菜单项显示区菜单项显示区菜单编辑器相关说明菜单编辑器相关说明v菜单项包括菜单项包括4个方面的信息个方面的信息菜单标题、
5、菜单命令、分隔线和子菜单菜单标题、菜单命令、分隔线和子菜单v内缩符号用于表示菜单项所在层次，最多可以有内缩符号用于表示菜单项所在层次，最多可以有5个内缩符号个内缩符号v分隔线分隔线在在“标题标题”栏中输入栏中输入“-”v菜单中除了分隔线外，每个菜单项都可以接收菜单中除了分隔线外，每个菜单项都可以接收Click事件事件v在输入菜单项标题时，加上在输入菜单项标题时，加上&字母字母，则可以通过，则可以通过Alt+字母字母执行相应菜单命令执行相应菜单命令v应用菜单进行程序设计，主要经历三个步骤，分应用菜单进行程序设计，主要经历三个步骤，分别是：别是：（1）界面设计）界面设计主要任务是在窗体设计器中创建
6、控件，设置控件主要任务是在窗体设计器中创建控件，设置控件的相应属性。的相应属性。（2）菜单设计）菜单设计利用菜单编辑器创建菜单界面。利用菜单编辑器创建菜单界面。（3）代码设计）代码设计为窗体中的控件编写事件过程，为子菜单项编写为窗体中的控件编写事件过程，为子菜单项编写单击事件过程单击事件过程8.1.4 菜单控件数组菜单控件数组v菜单控件数组的作用菜单控件数组的作用简化编程过程，用一段代码处理多个菜单项简化编程过程，用一段代码处理多个菜单项动态增加或删除菜单项动态增加或删除菜单项一段代码处理多个菜单项一段代码处理多个菜单项Private Sub file_Click(Index As Integ
7、er)Select Case Index Case 0 Text1.Text=new Case 1 Text1.Text=open End SelectEnd Sub动态增删菜单项动态增删菜单项1.在主菜单下插入一个子菜单在主菜单下插入一个子菜单caption:清单清单name:listindex:0visible:False2.代码部分代码部分增加菜单项增加菜单项:load list(1)List(1).visible=trueList(1).caption=“添加一个菜单项添加一个菜单项”删除菜单项删除菜单项:unload list(1)8.1.6 弹出菜单弹出菜单 弹出菜单是独立于菜单栏
8、的浮动菜单，其在窗体上的显示位置由单弹出菜单是独立于菜单栏的浮动菜单，其在窗体上的显示位置由单击鼠标时指针的位置决定。击鼠标时指针的位置决定。在在VB中，使用中，使用PopupMenu方法来显示弹出菜单。方法来显示弹出菜单。PopupMenu方法的语法为：方法的语法为：对象对象.PopupMenu 菜单名，标志，菜单名，标志，x，yv表表9-8用于用于“标志标志”的设置值的设置值常数位置常数位置值值描述描述vbPopupMenuLeftAlign 0缺省值。弹出式菜单的左边定位于缺省值。弹出式菜单的左边定位于 x。vbPopupMenuCenterAlign 4弹出式菜单以弹出式菜单以 x为居
9、中心。为居中心。vbPopupMenuRightAlign 8弹出式菜单的右边定位于弹出式菜单的右边定位于 x。常数行为常数行为值值描述描述vbPopupMenuLeftButton 0缺省值。缺省值。仅当使用鼠标左按钮时，仅当使用鼠标左按钮时，弹出式菜弹出式菜单中的项目才响应鼠标单击。单中的项目才响应鼠标单击。vbPopupMenuRightButton 2不论使用鼠标右按钮还是左按钮，不论使用鼠标右按钮还是左按钮，弹出式菜弹出式菜单中的项目都响应鼠标单击。单中的项目都响应鼠标单击。v【例【例8-3】在例】在例8-1中实现弹出式菜单，在文本中实现弹出式菜单，在文本显示区域单击右键可以设置字体
10、格式。显示区域单击右键可以设置字体格式。v编辑标签的编辑标签的MouseDown事件过程事件过程Private Sub output_MouseDown(Button As Integer,Shift As Integer,X As Single,Y As Single)If Button=2 ThenPopupMenu popformatEnd IfEnd Subv为每个子菜单项编写事件过程代码。为每个子菜单项编写事件过程代码。Private Sub popBold_Click()output.FontBold=TrueEnd SubPrivate Sub popItalic_Click()
11、output.FontItalic=TrueEnd SubPrivate Sub popUndrli_Click()output.FontUnderline=TrueEnd SubPrivate Sub font20pt_Click()output.FontSize=20End SubPrivate Sub fontLs_Click()output.FontName=隶书隶书End SubPrivate Sub Qit_Click()EndEnd Sub 9-1建立弹出菜单，应使用的方法是建立弹出菜单，应使用的方法是(【9】)。【9】A)MenuToB)SetMenuToC)PopupMenu
12、D)PopMenu9-2在在菜菜单单设设计计窗窗口口，如如果果希希望望菜菜单单项项的的某某一一字字母母为为热热键键，则可在该字母前加的符号是则可在该字母前加的符号是(【9】)。【9】A)B)#C)D)&9-5菜单控件中不包含菜单控件中不包含(【9】)属性。属性。【9】A)captionB)checkedC)visibleD)Value9-6VisualBasic6.0可可以以建建立立下下拉拉式式菜菜单单，最最多多可可达达(【9】)层。层。【9】A)3B)4C)5D)610-1以下叙述中错误的是以下叙述中错误的是(【10】)。【10】A)在在同同一一窗窗体体的的菜菜单单项项中中，不不允允许许出出现现标标题题相相同同的的菜单项菜单项B)在在菜菜单单的的标标题题栏栏中中，“&”所所引引导导的的字字母母表表示示该该字字母母为热键为热键C)菜单的菜单的Visible属性可以在程序运行过程中重新设置属性可以在程序运行过程中重新设置D)弹出式菜单也在菜单编辑器中定义弹出式菜单也在菜单编辑器中定义10-2一一个个菜菜单单项项是是不不是是一一个个分分隔隔条条，是是由由(【10】)属属性性决决定的。定的。【10】A)名称名称B)标题标题C)有效有效D)可见可见