第10讲 界面设计1

《第10讲 界面设计1》由会员上传分享，免费在线阅读，更多相关内容在行业资料-天天文库。

1、第10讲界面设计学习目标掌握菜单的设计与应用掌握工具栏与状态栏的设计教学内容10.1菜单的设计10.2工具栏与状态栏10.1菜单的设计与应用－相关概念1.菜单的类型下拉菜单：常以菜单栏的形式出现在标题栏下面弹出菜单(快捷菜单)：独立于菜单栏而显示在窗体上的浮动菜单，其菜单项取决于按下鼠标右键时指针所处的位置。2.VB中的菜单控件菜单和菜单项均看作是菜单控件菜单控件两个最重要的属性名称(Name)：程序代码中用来引用菜单控件标题(Caption)：出现在控件上的文本菜单控件只响应Click事件返回目录10.1菜单的设计与应用－使用菜单编辑器打开菜单编辑器：“工具→菜单编辑器”工具栏“菜单编

2、辑器”按钮1.常用属性标题：设置Caption属性字符前加&，该字符成为访问键只输入一个减号-，创建分隔条名称：设置Name属性注：对分隔条，也需定义名称索引(Index)：用于菜单控件数组快捷键、复选(Checked)有效(Enabled)、可见(Visible)返回目录10.1菜单的设计与应用－使用菜单编辑器2.编辑菜单控件返回目录如果菜单控件的前面没有内缩符号“····”，表明该控件建立的是主菜单，否则为菜单命令或子菜单。10.1菜单的设计与应用－设计下拉菜单下拉式菜单基本结构包括：顶层菜单、菜单项和子菜单返回目录子菜单项子菜单提示符访问键快捷键分隔线复选标记菜单项顶层菜单10.1

3、菜单的设计与应用－设计下拉菜单方法：先通过菜单编辑器设计菜单，然后编写各菜单控件的Click事件过程。[例10.1]创建简易编辑器(1)设计菜单返回目录10.1菜单的设计与应用－设计下拉菜单[例10.1]创建简易编辑器(2)设计界面编辑框RichTextBox控件CommonDialog控件(3)编写菜单控件的Click事件过程返回目录PrivateSubmmnew_Click()RichTextBox1.Text=""FileName="未命名"Me.Caption=FileNameEndSubPrivateSubmmopen_Click()CommonDialog1.Filter="

4、text

5、(*.txt)

6、*.txt

7、pictures(*.bmp;*.ico)

8、*.bmp;*.ico"CommonDialog1.ShowOpenRichTextBox1.Text=""FileName=CommonDialog1.FileNameRichTextBox1.LoadFileFileNameMe.Caption="记事本："&FileNameEndSub10.1菜单的设计与应用－设计弹出菜单用PopupMenu方法可显示弹出式菜单[对象.]PopupMenu菜单控件名称若“对象”缺省，则在当前窗体中显示弹出菜单通常，按下鼠标右键时显示弹出菜单，例如：PrivateSub

9、Form或控件名称_MouseUp(ButtonAsInteger,ShiftAsInteger,XAsSingle,YAsSingle)IfButton=2Then'如果按的是鼠标右键PopupMenu菜单名'显示弹出菜单EndIfEndSub返回目录10.1菜单的设计与应用－设计弹出菜单[例10.2]弹出菜单设计(1)打开例10.1所建立的工程(2)添加如下的事件过程：PrivateSubText1_MouseDown(ButtonAsInteger,ShiftAsInteger,XAsSingle,YAsSingle)IfButton=2ThenPopupMenumEdit'弹出名

10、称为mEdit的菜单EndIfEndSub注：若要创建一个不显示在菜单栏中的弹出菜单，设计菜单时，需取消主菜单的“可见”复选框。返回目录10.2工具栏和状态栏通过ActiveX控件ToolBar和StatusBar来实现VB中使用的控件有三类：标准控件、ActiveX控件和可插入对象(如Word文档、Excel工作表等，可当作控件使用)ActiveX控件是一段可重复使用的程序代码和数据。由ActiveX技术创建的，可以作为VB工具箱的扩充部分。ActiveX控件以单独的文件存在(.ocx)工具栏为用户带来比用菜单更为快速的操作为窗体添加工具栏，应使用工具条(ToolBar)控件和图像控件

11、列表(ImageList)控件(不是标准控件)创建工具栏的大致步骤：(1)添加ToolBar控件和ImageList控件(2)用ImageList控件保存要使用的图形(3)创建ToolBar控件，并将ToolBar控件与ImageList控件相关联，创建Button对象(4)编写Button的Click事件过程。单击工具栏控件时触发Click事件，单击工具栏上按钮时触发ButtonClick事件，并返回一个Button参数(表