11章 工具栏与对话框分析.doc

工具栏设计 一、预备知识 1、概念： 工具栏又称工具条，紧跟在菜单栏下面，由一组按钮（Button）对象组成，每个按钮都对应于应用程序的菜单项目，提供了直观的用户界面。 2、工具栏的设计步骤 1）工具栏属于外部控件，添加需使用VB内置的ActiveX控件——Toolbar控件即可实现：“工程”菜单(”部件”(”Microsoft Windows Common Contrls 6.0”打上勾； 2）添加ImageList控件ImageList1，并右击ImageList1中“属性”，从出现的对话框中的“图像”标签中先后添加工具栏按钮上所需的图象；（注意添加的顺序） 3）添加ToolBar控件； 4）为工具栏连接图象：右击工具栏的“属性”，从出现的对话框的“通用”标签中的“图像列表”中选择第2）步所添加的ImageList1； 5）插入工具栏上的按钮及相应图象：在对话框的“按钮”标签中，选择“插入按钮”按钮，并将相应的按钮在“图像”位置输入相应的图像索引。 6）双击工具栏，编写代码： Private Sub Toolbar1_ButtonClick(ByVal Button As _ ComctlLib.Button) Select Case Button.Index Case 1 …… Case 2 …… End Select End Sub 二、实验在的界面上设计工具栏，在工具栏上添加如图所示的图标按钮。(利用Toolbar控件和ImageList控件) 提示：将每个按钮的样式设置为1-tbrChecktton的Value属性为逻辑型： 0——tbrUnpressed 表按钮的突起状态。 1——tbrPressed 表按钮的下陷状态。 对话框程序设计实验目的 了解VB的对话框的特点。 掌握对话框的创建方法。 预备知识 对话框的特点 所谓“对话框”可以看做一种特殊的窗体，它的大小一般不可改变，也没有“最小化”和“最大化”按钮，它只有一个“关闭”按钮。 创建对话框的方法 Visual Basic提供了3种设计对话框的方法： 系统预定义的对话框（InputBox和Msgbox） 用户自定义对话框 通用对话框控件 3、自定义对话框 创建用户自定义对话框，一般有两种方法：一是用户根据应用程序需要，在一个普通窗体上，使用标签、文本框、单选按钮、检查框和命令按钮等控件，通过编写相关的程序代码来实现人机交互功能。二是使用Visual Basic系统提供的“对话框”模块，通过简单的修改便可创建一个适合自己程序的自定义对话框。 1) 由普通窗体创建自定义对话框需要设置以下属性值： BorderStyle属性 BorderStyle属性决定窗体的边框样式，在运行时是只读的。该属性决定了窗体的主要特征，这些特征从外观上就能确定窗体是通用窗口还是对话框。 Form 对象的 BorderStyle 属性设置值如下： 常数 设置值 描述 vbBSNone 0 无（没有边框或与边框相关的元素）。 vbFixedSingle 1 固定单边框。可以包含控制菜单框，标题栏 ，“最大化”按钮，和“最小化”按钮。只有使用最大化和最小化按钮才能改变大小。 vbSizable 2 （缺省值）可调整的边框。可以使用设置值1列出的任何可选边框元素重新改变尺寸。 vbFixedDouble 3 固定对话框。可以包含控制菜单框和标题栏，不能包含最大化和最小化按钮，不能改变尺寸。 vbFixedToolWindow 4 固定工具窗口。不能改变尺寸。显示关闭按钮并用缩小的字体显示标题栏。窗体在 Windows 95 的任务条中不显示。 VbSizableToolWindow 5 可变尺寸工具窗口。可变大小。显示关闭按钮并用缩小的字体显示标题栏。窗体在 Windows 95 的任务条中不显示。 ControlBox属性 该属性值为True时窗体显示控制菜单框，为False时不显示。 MaxButton、MinButton属性 该属性值为True表示窗体具有最大化按钮或最小化按钮。 显示自定义对话框： 窗体名.Show [vbModal] （其中vbModal是系统常数，值为1，用来显示模式对话框） 所谓模式窗体，就是指在该窗体消失之前，不能切换到该应用程序的其他部分，即不能把其他窗口设为当前窗口。例如，一个应用程序中有一个用来输入口令的对话框，该对话框应该是模态的，使用者必须输入口令，否则无权访问该应用程序。 关闭自定义对话框： 使用Hide方法或Unload语句来关闭自定义对话框，其格式为： Me.Hide 或 窗体名.Hide