Transcript 第8章界面设计 - 沈阳药科大学

第八章 界面设计
全国高等医药院校药学类规划教材
计算机程序设计(第二版)
目录
沈
阳
药
科
大
学
计
算
计
教
研
室
第一节 常用窗体控件
第二节 对话框控件
第三节 菜单设计
第四节 工具栏设计
第五节 多窗体设计
计算机程序设计(第二版)——沈阳药科大学
第一节 常用窗体控件
8.1 常用窗体控件
计算机程序设计(第二版)——沈阳药科大学
第一节 常用窗体控件
Visual Basic中控件的种类
1. 标准控件(内部控件)
启动VB后，自动在工具箱中列出的20个控件。
2. ActiveX控件
由VB和第三方提供，可重复使用的代码和数据。扩展名为.OCX，通
常存放在系统根目录下的SYSTEM子目录中。
ActiveX控件在使用之前，需先被加载到工具箱中，方法是：
1) 选择“工程/部件”菜单，对话框中包含全部已登记ActiveX控件。
2) 选定所需ActiveX控件左边的复选框。
3) 单击“确定”。该控件就添于工具箱中。
3. 可插入对象
指Windows应用程序对象，例如“Microsoft Excel工作表”。
计算机程序设计(第二版)——沈阳药科大学
第一节 常用窗体控件
8.1.1 分组控件
每个分组控件本身就是一个容器，可以在这些分组控件上
放置其它控件，如单选钮、文本框等，这样：
第一：不同分组控件中的对象相互独立。
第二：不仅可以提供视觉上的分组而且还可以实现总体的
显示或隐藏操作。
常见的分组控件有框架（Frame）、选项卡（SSTab）、
图片框（PictureBox）等。
计算机程序设计(第二版)——沈阳药科大学
第一节 常用窗体控件
8.1.1.1 框架(Frame)
1. 向框架中添加对象的方法
1）向框架中添加新对象
2）将现有对象移动到框架中
2. 重要属性
1）Caption
2）Enabled
3）Visible
计算机程序设计(第二版)——沈阳药科大学
第一节 常用窗体控件
3. 事件
框架可以响应Click和DbClick事件。但几乎没有应用。
4. 应用实例
通过选择药品和病症，在文本框中显示正确的信息。
计算机程序设计(第二版)——沈阳药科大学
第一节 常用窗体控件
8.1.1.2 SSTab(选项卡)
SSTab不是标准控件，使用前需通过“工程/部件” 将
“Microsoft Tabbed Dialogue Control6.0”添加至工具箱。
1. 重要属性
1）Tabs
设置选项卡的个数，上图中为六。
2）TabsPerRow
设置每行可以显示的选项卡个数，下图中为二。
3）Tab
Tab为选项卡的编号，从0开始。该属性可以
返回目前处于激活状态的选项卡编号，也可以通过
修改该属性的值来决定哪个选项卡被激活。
计算机程序设计(第二版)——沈阳药科大学
第一节 常用窗体控件
2. 事件
SSTab可以响应Click和DbClick事件。但很少用。语法格式为：
Private Sub SSTab控件名_Click(PreviousTab As Integer)
语句块
End Sub
其中：PreviousTab参数为本次单击前处于激活状态的选项卡编号
3. 应用实例
设计如图所示的实验动物出库管理软件，要求在
离开“鼠”、“兔”、“狗”选项卡（Tab编号分别为0、
1、2）进入任意其它选项卡时，即时计算合计金额。
完毕单击“退出”结束程序。
计算机程序设计(第二版)——沈阳药科大学
第一节 常用窗体控件
8.1.2 列表选择控件
列表选择控件的功能是为用户提供一系列的候选项供用户
选择。最常用的是列表框和组合框。
计算机程序设计(第二版)——沈阳药科大学
第一节 常用窗体控件
8.1.2.1 列表框(ListBox)
ListBox通过提供多个候选项供用户选择，达到与用户
交互的目的。用户只能从给定的候选项中选择，不能添加和
修改候选项
1.重要属性
1）Text
当前被选定条目的内容，只能在运行模式下设置
或引用。图中List1.Text的值为“兔子”。通过该属性可
以获得用户的选择结果。
2）ListIndex
程序运行时被选定条目的序号(从零开始) ，只能在
运行模式下设置或引用。若没选中任何条目，ListIndex
值为-1。图中ListIndex的值为3。通过该属性可以知用户
选择的是第几项。
计算机程序设计(第二版)——沈阳药科大学
第一节 常用窗体控件
3）List
既可在设计模式下设置，也可在运行模式下设置或引用。
List属性为字符型数组，下标从0开始。图中第一项List1.List(0)的
值为“小鼠” 。
通过该属性可以在运行模式下修改某个条目的内容。
注意： List1.Text和List1.List(List1.ListIndex) 两种写法等价。
4）ListCount
列表框中项目的数量，只能在运行模式下引用。
图中List1.ListCount的值为8。
最后一个条目的编号为ListCount-1
计算机程序设计(第二版)——沈阳药科大学
第一节 常用窗体控件
5）Sorted
设置程序运行时列表框内的条目是否按照字符顺序升序排列显示，
只能在设计模式下设置。有两种取值情况True和False。
6）MultiSelect
设置在一个列表框中能否同时选择多个条目。有三种取值情况：
0—None 禁止多选（缺省）。
1—Simple 简单多选。
2—Extended 扩展多选。
计算机程序设计(第二版)——沈阳药科大学
第一节 常用窗体控件
7）Selected
该属性是布尔型数组，每个元素值表示对应条目目前是否被选中。
用于允许多选时，获得用户的选择结果。
只能在运行模式下引用。
8）SelCount
当MultiSelect属性为1(Simple)或2(Extended)时，用于返回列表框
中目前被选中条目的个数。通常它与Selected一起使用，以获得用户的
选择结果。
9） Style
(设计模式下)设置列表框的风格。有两种取值情况：
0—Standard，标准型，(缺省)
1—CheckBox，复选框形式，如图所示。
注意：当Style为1时MultiSelect属性只能为0，但
此时允许多选(前面带有复选框，当然可以进行复选了)。
计算机程序设计(第二版)——沈阳药科大学
第一节 常用窗体控件
2. 常用方法
1）AddItem
用于向列表框中添加新的条目。语法格式为：
对象.AddItem Item [,Index]
Item：必须是字符串表达式，是新增条目的具体内容。
Index：新增条目的位置，省略时添到最后。Index=0为第一项。
2）RemoveItem
用于从列表框中删除条目。语法格式为：
对象.RemoveItem Index
Index：被删除条目的编号。对于顶端的第一个条目，Index为0
3） Clear
Clear方法用于清除列表框中的所有条目。语法格式为：
对象.Clear
计算机程序设计(第二版)——沈阳药科大学
第一节 常用窗体控件
3. 事件
列表框能够响应Click和DblClick事件，但很少用。一般用户通过列表
框和组合框选择，完毕单击某按钮时才根据选择结果执行相应操作。
4. 应用实例
设计如图所示的程序。右侧列表框中的条目按照字符顺序升序排列，
左侧列表框中的条目按照添加的先后顺序排列。当双击某个条目时，该
条目从本列表框中被删除同时添加到另一个列表框中。
计算机程序设计(第二版)——沈阳药科大学
第一节 常用窗体控件
8.1.2.2 组合框(ComboBox )
ComboBox(组合框)是VB的标准控件，它是文本框和
列表框的组合。
1.重要属性
1）组合框也具有Text、ListIndex、List、ListCount、Sorted等属性，
含义同List控件。但没有MultiSelect、Selected、Selcount属性。
计算机程序设计(第二版)——沈阳药科大学
第一节 常用窗体控件
2）Style(风格，列表框没有)
该属性用于设置组合框的格式，有3种取值情况：
0-Dropdown下拉式组合框
1-Simple Combo简单组合框
2-Dropdown List下拉式列表框
这三种组合框的区别为：
①下拉式组合框和下拉式列表框运行时只显示文本框，如左图所示。
而简单组合框同时显示文本框和列表框，大小固定，如中间所示。
②下拉式组合框和简单组合框允许用户在文本框中输入新的内容，
而下拉式列表框不允许。
③三种组合框都可以响应Click事件，只有简单组合框可以响应
DblClick事件。
计算机程序设计(第二版)——沈阳药科大学
第一节 常用窗体控件
2. 应用实例
编写一个程序实现以下功能：必须从给定的实验类型中选择一个实验
种类，从给定实验动物列表中选择可用的动物类型（可以多选），当单
击“读取”按钮时将用户的选择结果输出到窗体上，如图所示。
计算机程序设计(第二版)——沈阳药科大学
第一节 常用窗体控件
8.1.3 滚动条(ScrollBar)
滚动条分为水平滚动条和垂直滚动条两种，它们都是VB的
标准控件。除了方向不同外，水平滚动条和垂直滚动条的结构
和操作是一样的。两端各有一个箭头，中间有一个滑块。如图
所示。
计算机程序设计(第二版)——沈阳药科大学
第一节 常用窗体控件
1.重要属性
1） Max
设置当滑块移至水平滚动条最右端，或垂直滚动条最下端时滚动条
所能表示的极值 (范围为-32768~32767) 。
2）Min
设置当滑块移至水平滚动条最左端，或垂直滚动条的最上端时滚动
条所能表示的极值 (范围为-32768~32767) 。
说明：Max既可以大于Min，也可以小于Min。
3）Value
设置和返回滑块在滚动条上的位置。
注意：不能将Value的值设置在Max和Min范围之外的值。
4）LargeChange
设置单击滚动条上滑块与箭头间位置时，Value增加或减小的值。
5）SmallChange
设置单击滚动条两端的箭头时，Value增加或减小的值。
计算机程序设计(第二版)——沈阳药科大学
第一节 常用窗体控件
2. 事件
1）Scroll
只有当拖动滚动条上的滑块时，才会触发Scroll事件。
2）Change
无论什么原因只要改变滚动条的Value值就会触发Change事件。
注意：一般为滚动条编写代码时，这两个事件都要编写。
3. 应用实例
设计如图所示的程序，实现利用滚动条来改变文本框内文字的大小。
要求水平滚动条的属性设置如下：Max为60，Min为10，SmallChange
为1，LargeChange为5
计算机程序设计(第二版)——沈阳药科大学
第一节 常用窗体控件
8.1.4 RichTextBox
RichTextBox是比文本框更为高级的文本控件，它可以同
时包含多种文字格式、段落格式等设置，甚至插入图形就像
Word一样。
RichTextBox控件不是标准控件，使用前需要通过“工程/
部件”菜单将“Microsoft Rich TextBox Control 6.0”添加到
工具箱中。
计算机程序设计(第二版)——沈阳药科大学
第一节 常用窗体控件
1. RichTextBox的重要属性列表
分类
属性
选中文本
SelText SelStart SelLength
同TextBox控件
字体字号
SelFontName SelFontSize
同上
字
SelBold SelItalic
SelUnderline SelStrikethru
逻辑型
粗体、斜体、下划线、删除线
SelCharOffset
整型
>0上标，<0下标，Twip为单位
型
上、下标
值类型
说明
颜
色
SelColor
整型
缩
排
SelIndent SelRightIndent
SelHangingIndent
整型
段落的左缩进、右缩进、
悬挂式缩进
SelAlignment
整型
(指段落) 0左、1右、2居中
对齐方式
计算机程序设计(第二版)——沈阳药科大学
第一节 常用窗体控件
2. 在RichTextBox中插入图片
可以将*.bmp图像文件插入RichTextBox控件中，语法如下：
对象名.OLEObjects.add [索引],[关键字],文件标识符
其中：对象名 是RichTextBox控件的名称
OLEObjects 是添加到RichTextBox控件中的对象的集合
索引和关键字 给被添加元素的编号和标识名，可以省略，
但是逗号不能省略
文件标识符 是被插入对象的带有完整路径的文件名
例如：将图形文件“C:\Windows\Greenstone.bmp”插入到
当前光标位置，方法为：
RichTextBox1.OLEObjects.add , ,"C:\Windows\Greenstone.bmp"
计算机程序设计(第二版)——沈阳药科大学
第一节 常用窗体控件
3. RichTextBox中的文件操作
1）LoadFile方法
将RTF文件(*.rtf)或文本文件(*.txt)装入RichTextBox控件并
显示，语法格式为：
对象名.LoadFile 文件标识符[，文件类型]
其中：对象名为某个RichTextBox控件的名称
文件标识符为欲加载文件的文件名(包含完整路径)
文本类型取值为0(或rtfRTF)表示加载RTF文件(缺省)；取
值1(或rtfTEXT)表示加载文本文件。
2）SaveFile方法
将RichTextBox控件中的内容保存为Rtf文件或文本文件，
语法格式为：
对象名.SaveFile 文件标识符[，文件类型]
例如：把RichTextBox1中的内容保存至“D:\mytest\abc.txt”
的语句为：RichTextBox1.SaveFile "d:\mytest\abc.txt", rtfTEXT
计算机程序设计(第二版)——沈阳药科大学
第一节 常用窗体控件
4. 应用实例
设计如图所示的应用程序，初始均为左对齐、宋体、四号。
实现以下功能：
1）单击“字体格式”时，将选中文本设置为隶书、20号、
红色、带下滑线。
2）单击“上标”时，将选中文本设置为字号缩小为原来的一
半，字符位置提升150。
3）单击“段落居中”时，将选中段落居中显示。
计算机程序设计(第二版)——沈阳药科大学
第一节 常用窗体控件
8.1.5 时间日期控件
Visual Basic提供了几种时间日期控件，用来进行秒表计
时、日期选择等功能。常见的有Timer控件、DateTimePicker
控件等。
计算机程序设计(第二版)——沈阳药科大学
第一节 常用窗体控件
8.1.5.1 Timer
Timer控件是VB提供的标准控件，它可以实现指定代码
的周期性自动运行。该控件在运行时不可见。
1.重要属性
1） Interval属性
设置和返回Timer事件周期性自动运行的时间间隔。单位是毫秒(千分之
一秒)，取值范围为0~65535。
2）Enabled属性
该属性用于设置Timer控件是否生效。当Enabled=False时，Timer事件
不执行
计算机程序设计(第二版)——沈阳药科大学
第一节 常用窗体控件
2. 事件
Timer控件只支持Timer事件。
该事件过程每隔Interval指定的时间间隔自动执行一次，前提是
Interval>0和Enabled=True两个条件同时为真。
注意： Timer控件、Timer事件、Timer函数和Time函数的区别。
3. 应用实例
设计如图所示的程序，要求程序运行后单击“开始”按钮，Text1中的
字体开始周期性地自动放大；当字号大于100时，开始周期性地缩小；当
字号小于10时，开始周期性地放大。单击“停止”按钮，保持当前字号
不变
计算机程序设计(第二版)——沈阳药科大学
第一节 常用窗体控件
8.1.5.2 DateTimePicker
DateTimePicker控件可以提供如图所示的下拉式日历
供用户选择日期，并按指定格式将选择结果显示出来。
DateTimePicker控件不是标准控件，使用前需要通过
“工程/部件”菜单将“Microsoft Windows Common
Controls-2 6.0”添加到工具箱中。
计算机程序设计(第二版)——沈阳药科大学
第一节 常用窗体控件
1.重要属性
1） Format
设置控件中日期和时间的显示格式。有四种取值情况：
0 – dtpLongDate长日期格式显示。
1 – dtpShortDate短日期格式显示。
2– dtpTime时间格式显示。
3 – dtpCustom 使用格式字符串来指定一种自定义格式进行显示。
2） CustomFormat
设置DateTimePicker控件中用户自定义的显示格式。前提是Format
属性值必须为dtpCustom。
计算机程序设计(第二版)——沈阳药科大学
第一节 常用窗体控件
3） Value
返回或设置控件当前选中的日期
4） Day、Month、Year
返回和设置控件显示日期中的日、月份、年份。当修改某个属性时其它几
个属性的值不会跟着变化
5） DayOfWeek
返回或设置当前显示日期为一个星期中的第几天。范围为1~7(星期日为1，
星期六为7)。例如DTPicker1中显示的日期为2009年8月14日星期五，语句
DTPicker1.DayOfWeek=3可以将显示日期修改为2009年8月11日星期二
计算机程序设计(第二版)——沈阳药科大学
第一节 常用窗体控件
2. Change事件
只要DateTimePicker控件中显示的日期发生改变就会触发Change
事件。
在Change事件中，通过Value、Year、Month、Day、
DayOfWeek等属性就可以获得用户选定的日期。
计算机程序设计(第二版)——沈阳药科大学
第二节 对话框设计
8.2 对话框设计
计算机程序设计(第二版)——沈阳药科大学
第二节 对话框设计
Visual Basic中对话框的种类
1. 预定义对话框
VB系统提供的格式固定的对话框，例如InputBox输入框、MsgBox
消息框等。
2. 通用对话框
VB提供的集打开、另存为、颜色、字体、打印机、帮助于一体的
Windows应用程序标准格式对话框。
3. 自定义对话框
自定义对话框是VB的一个窗体，用户可以按照自己的意愿来设计其格
式和功能。
计算机程序设计(第二版)——沈阳药科大学
第二节 对话框设计
8.2.1 通用对话框
通用对话框集打开、另存为、颜色、字体、打印机、帮助六种
基于Windows标准对话框于一体。
CommonDialog控件不是标准控件，使用前需要通过“工程/部
件”菜单将“Microsoft Common Dialog Control6.0”添加到工具
箱中。
和Timer控件一样，该控件运行时不可见。
计算机程序设计(第二版)——沈阳药科大学
第二节 对话框设计
1.针对这六种对话框的通用属性和方法
1) Action属性和Show方法
通用对话框的显示类型
Action属性值 Show方法
“打开(Open)”文件对话框
1
ShowOpen
“另存为(Save As)”文件对话框
2
ShowSave
“颜色(Color)”对话框
3
ShowColor
“字体(Font)”对话框
4
ShowFont
“打印(Print)”对话框
5
ShowPrinter
“帮助(Help)”对话框
6
ShowHelp
例如CommonDialog1.ShowOpen和CommonDialog1.Action=1等价
2) CancelError属性
设置当单击“取消”按钮时是否产生错误信息。
当CancelError=True时，单击“取消”系统出现Err.Number为32755
的错误
计算机程序设计(第二版)——沈阳药科大学
第二节 对话框设计
2. “打开(Open)”对话框
“打开”对话框提供了可以遍历每个驱动器、文件夹和文件的功能，如
图所示，并可以返回用户的选择结果。
InitDir
FileName
FilterIndex
Filter
计算机程序设计(第二版)——沈阳药科大学
第二节 对话框设计
1. “打开”对话框的重要属性
1） FileName
返回或设置“打开”对话框中选定的文件名(包含完整路径)。
2） FileTitle
返回“打开”对话框中选定的文件名(不包含路径) 。
3） Filter
设置“打开”对话框中“文件类型”处提供的文件类型过滤器。
每个过滤器由两部分组成，用“|”分隔。例如：
CommonDialog1.Filter="可执行文件|*.exe"
允许同时显示多种文件类型的过滤器写法：
CommonDialog1.Filter = "图片文件|*.jpg;*.bmp;*.gif;*.ico"
多个过滤器的书写方法：
CommonDialog1.Filter="文本文件|*.txt|所有文件|*.*"
4）FilterIndex
设置多个过滤器中，(程序刚运行时)哪个过滤器生效。
注意FilterIndex=0和1都是第一个，第二个过滤器值为2，……。
5）InitDir属性
该属性用于设置“打开”对话框的初始目录。
计算机程序设计(第二版)——沈阳药科大学
第二节 对话框设计
3. “另存为(Save as)”对话框
“另存为”对话框和“打开”对话框相似，提供了可以遍历每个驱动器、
文件夹和文件的功能，用户可以在“文件名”处输入新的文件名，如图所示，
并可以返回用户的操作结果。用法同“打开”对话框。
计算机程序设计(第二版)——沈阳药科大学
第二节 对话框设计
4. “颜色”对话框
“颜色”对话框提供了让用户通过鼠标点击就可以选择相应颜色的功能，
如图所示，并返回用户的选择结果。
Color属性是“颜色”对话框的一个重要属性，通过该属性可以设置和
返回对话框中选定的颜色。
计算机程序设计(第二版)——沈阳药科大学
5. “字体”对话框 FontName
FontBold、FontItalic FontSize
Min、Max
FontStrikethru
FontUnderline
Color
注意：Flags属性：指示所显示的字体类型，必须设置。
cdlCFScreenFonts &H1
cdlCFPrinterFonts &H2
cdlCFBoth
cdlCFEffects
&H100
屏幕字体
打印机字体
&H3
打印机字体和屏幕字体。
显示删除线和下划线检查框以及颜色组合框(不能单独使用)
计算机程序设计(第二版)——沈阳药科大学
第二节 对话框设计
6. “打印”对话框
通过“打印”对话框，用户可以选择打印机、打印范围和份数。
重要属性有：
1）Max属性、Min属性
在“打印”对话框打开之前设置，用于限定用户可以指定的页面范围，
一般Min=1、Max=文章总页数。
2）FromPage属性、ToPage属性
设置和返回打印的起始页码和终止页码。
3）Copies属性
返回用户指定的打印份数。
计算机程序设计(第二版)——沈阳药科大学
第二节 对话框设计
7. 通用对话框应用实例
设计如图所示的应用程序。单击“打开”可以通过“打开”文件对话
框选择一个文本文件，并将文件内容显示在文本框Text1中。单击“背景
色”可以通过“颜色”对话框选择一个颜色，并将该颜色应用于文本框背
景。单击“字体”可以通过“字体”对话框设置字体格式，并将结果应用
于文本框中。单击“打印”可以通过“打印”对话框指定打印机和打印份
数，并将文本框内容通过打印机输出。单击“保存”可以通过“另存为”
对话框将修改后的文本框内容保存到文件“d:\EnglishTest.txt”中。
计算机程序设计(第二版)——沈阳药科大学
第三节 菜单设计
8.3 菜单设计
计算机程序设计(第二版)——沈阳药科大学
第三节 菜单设计
下拉式菜单系统的组成结构 ：
计算机程序设计(第二版)——沈阳药科大学
第三节 菜单设计
菜单编辑器的使用
必须在对象窗口为活跃窗口的情况下才可以调用菜单编辑器，具体方法有：
1) 执行“工具”菜单里的“菜单编辑器”命令
2) 单击工具栏中的“菜单编辑器”按钮
3) 在对象窗口空白处右击，弹出的快捷菜单中选择“菜单编辑器”命
令
4) 通过快捷菜单“Ctrl+E”
常用属性：
菜单项属性
1. 标题(Caption) 热键：前面加&
2. 名称(Name)文本框
操作按钮
分隔符也应有名称。
3. 快捷键(Shortcut) 菜单名没有快捷键
4. 复选(Checked)检查框 TRUE 有
菜单列
表框
5. 有效(Enabled)检查框
6. 可见(Visible)检查框
计算机程序设计(第二版)——沈阳药科大学
第三节 菜单设计
应用实例：建立一个有菜单功能的文本编辑器。要求有
三级菜单、热键、快捷键、并能够进行对齐格式的变化
计算机程序设计(第二版)——沈阳药科大学
第三节 菜单设计
弹出式菜单(快捷菜单)设计
弹出菜单是独立于窗体菜单栏而显示在窗体内的浮动菜单。显示位
置取决于单击鼠标键时指针的位置。设计与普通菜单相同（如果不希
望菜单出现在窗口的顶部，可将该菜单Visible属性设为False）。菜
单弹出的方法：
[对象.]PopupMenu 菜单名, 标志, x, y
标志，表示弹出的位置和触发的键(见教材P222 表8-6)
Sub picture1_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
If Button = 2 Then PopupMenu EditMenu, vbPopupMenuCenterAlign
End Sub
计算机程序设计(第二版)——沈阳药科大学
第四节 工具栏设计
8.4 工具栏设计
计算机程序设计(第二版)——沈阳药科大学
第四节 工具栏设计
工具栏控件不是标准控件，使用前需通过“工程/部件”菜单
将“Microsoft Windows Common Controls 6.0”添加到工具箱中(九
个Windows风格常用控件)，其中ToolBar和ImageList就是所需的。
工具栏中的图像引自ImageList控件，开始设计工具栏之前必
须将所需的图像全部在ImageList中添加好，一旦开始设计就不能
再增删ImageList中的图库了。
计算机程序设计(第二版)——沈阳药科大学
第四节 工具栏设计
1. 向ImageList控件中添加图像
在ImageList控件的“属性页”窗口中， “图像”选项卡下：
“插入图片”可以添加扩展名为.bmp、.ico、.gif、.jpg的新图像。
“删除图片”按钮可以删除选中的图像。
“索引”为每个图像的唯一编号，第一个图像编号为1。
“关键字”为每个图像的唯一标识名。
“图像数”为已添加图像的个数。
图中所示的所有图像均由VB系统提供，路径为VB安装目录(…)下的
“…\Microsoft Visual Studio\ COMMON\Graphics\Bitmaps\TlBr_W95\”
计算机程序设计(第二版)——沈阳药科大学
第四节 工具栏设计
2. 在ToolBar控件中添加按钮
工具栏中按钮的六种样式
值
常数
按钮类型
说明
0
tbrDefault
标准按钮
单击后恢复原态，如“新建”按钮
1
tbrCheck
开关按钮
单击保持按下状态，再击恢复原态，如“加粗”按钮
2
tbrButtonGroup
编组按钮
一组按钮中只能有一个生效，如“左对齐”按钮
3
tbrSepatator
分隔按钮
产生具有8个像素宽度的分隔符
4
tbrPlaceholder
占位按钮
产生宽度可调的分隔符，以便放置“字号”组合框等控件
5
tbrDropdown
菜单按钮
产生下拉菜单按钮对象，如VB标准工具栏中的“添加新窗体”按钮
计算机程序设计(第二版)——沈阳药科大学
第四节 工具栏设计
3. 为ToolBar控件中的按钮编写代码
一个工具栏中所有的按钮对象对应同一个ButtonClick事件。
通常采用Select Case结构，通过每个按钮关键字和索引的不同来
编写对应的代码。例如：
方法一：通过关键字来区分
Private Sub Toolbar1_ButtonClick(ByVal Button As MSComctlLib.Button)
Select Case Button.Key
Case “cut”
…
方法二：通过索引来区分（第一个按钮的索引为1，
Case “copy”
占位按钮也有索引）
…
Private Sub Toolbar1_ButtonClick(…)
End Select
Select Case Button.Index
End Sub
Case 1
...
Case 2
...
End Select
End Sub
计算机程序设计(第二版)——沈阳药科大学
第五节 多窗体操作
8.5 多窗体操作
计算机程序设计(第二版)——沈阳药科大学
第五节 多窗体操作
1.多窗体的添加
新建
“工程|添加窗体”
现存
添加“现存”窗体时要注意：
防止出现窗体的重名错误；
添加的窗体实际是将其它工程中已有的窗体加入，多个工程共享窗体，
在一个工程中的修改将影响另一个窗体；
通过“另存为”命令以不同的窗体文件名保存，断开共享。
2.多窗体的保存
一个工程中有多个窗体，应分别取不同文件名保存在磁盘上，VBP工程文
件中记录了该工程的所有窗体文件名。
计算机程序设计(第二版)——沈阳药科大学
第五节 多窗体操作
3. 设置启动窗体
“工程/属性” “启动对象”
设置启动对象
4. 窗体语句
(1)Load语句：装入窗体到内存但没有显示窗体
形式： Load 窗体名称
(2)Unload语句：从内存删除窗体
形式： Unload 窗体名称
计算机程序设计(第二版)——沈阳药科大学
第五节 多窗体操作
5. 窗体方法
(1)Show方法：显示一个窗体（当窗体没有Load，自动Load）
[窗体名称].Show [模式]
0 － vbModeless ，可以随时对其它窗体进行操作。
1 － vbModal ，关闭后才能对其它窗体进行操作。
(2) Hide方法：隐藏窗体，并不从内存中删除
[窗体名称.] Hide
6.不同窗体间数据的存取
(1)存取控件的属性
另一窗体名.控件名.属性
(2)存取变量的值
另一窗体名.全局变量名
计算机程序设计(第二版)——沈阳药科大学
第五节 多窗体操作
应用实例
沈阳药科大学计算机教研室