用手工制作的工具栏，实际上是一个放置了一些工具按钮的图片框。通过设置图片框的Align属性，可以控制工具栏(图片框)在窗体中的位置，当改变窗体的大小时，Align属性值非0的图片框会自动地改变大小，以适应窗体的宽度或高度。
图片框上各种工具按钮，如命令按钮、图形方式的选项和复选框、下拉列表控件等，可以通过不同的图像来表示对应的功能，还可以设置按钮的ToolTipText属性为工具按钮添加工具提示。对于有些按钮如复选框等，需在其上放置两个图像，分别代表按钮弹起及按下时的外观。
例如，通过在窗体上添加一个图片框Picture1和文本框Text1，并在图片框中增加一个命令按钮数组Commadn1(0)～Command1(2)。然后将命令按钮的Caption属性值设为空白，Style属性设为1-Graphical，Picture属性分别设为New.bmp、Open.bmp和Save.bmp。建立好的用户界面如图7.9所示。
图7.9 手工制作的工具栏
由于工具按钮通常用于提供对其他(菜单)命令的快捷访问，所以一般都是在其Click事件代码中调用对应的菜单命令。
7.2.2 Toolbar控件与ImagList控件
要在工具栏中放置一系列图片按钮，最直接的方法是在窗体上添加工具栏(Toolbar)控件和图像列表(ImageList)控件。Toolbar控件和ImageList控件是ActiveX控件的一部分，在使用前必须加载"Microsoft Windows Common Controls 6.0"，然后才能使用工具箱中新添加的ImageList
控件和Toolbar
控件。
1. 创建ImageList控件
ImageList控件的作用像图像的储藏室，ImageList控件不能独立使用，它需要Toolbar控件(或ListView，TabStrip，TreeView控件等)来显示所储存的图像。ImageList控件可以包含任意大小的所有图片文件，但是图片的显示大小都相同。通常，加入该控件的第一幅图像决定了随后加入图像的显示大小。
在设计时，可以在ImageList属性页中添加图像，按照顺序将需要的图像插入到ImageList中。例如，在窗体上创建ImageList1后，用鼠标右键单击ImageList1控件，出现弹出式菜单，选择"属性"命令，或者选中窗体上的ImageList1后在属性窗口选择"(自定义)"右边的三点按钮，都可以打开"属性页"对话框。选择"图像"选项卡，在"图像"选择卡中就可以插入图片了，如图7.10所示。
ImageList控件的ListImage属性是对象的集合，每个对象可以存放图片文件。图片文件类型有.bmp，.cur，.ico，.jpg和.gif等，并可通过索引(Index)或关键字(Key)来引用每个对象。控件具有标准的集合方法：Add，Remove和Clear。利用这些方法，用户可以在运行时添加、删除图像。一旦ImageList关联到其他控件，就不能再删除或插入图像了。
图7.10 ImageList控件属性页
2. 设置工具栏的属性
用鼠标双击Toolbar控件，它将加入窗体并出现在窗体的顶部(也可单击控件后在窗体中画出控件)。通过设置Toolbar1的Align属性可以控制工具栏在窗体中的位置。当改变窗体的大小时，Align属性值为非0的工具栏会自动改变大小以适应窗体的宽度或高度。
用鼠标右键单击窗体上的Toolbar1，在弹出的快捷菜单中选择"属性"，将打开"属性页"对话框，如图7.11所示。"通用"选项卡中的"图像列表"属性将被用来与ImageList控件建立关联。
图7.11 Toolbar属性页 图7.12 "按钮"选项卡
将属性页切换到"按钮"选项卡，创建按钮(Button)对象，如图7.12所示。其中各项功能说明如下：
(1) 插入按钮、删除按钮：在Button集合中添加或删除元素。通过Button集合可以访问工具栏中的各个按钮。
(2) 索引、关键字：工具栏中的按钮通过Button集合进行访问，集合中的每个按钮都有唯一的标识，Index属性和Key属性就是这个标识。Index为整型，Key为字符串型，访问按钮时可以引用二者之一。
(3) 标题(Caption)、描述：标题是显示在按钮上的文字；描述是按钮的说明信息。
(4) 值(Value)：Value属性决定按钮的状态，0-tbrUnpressed为弹起状态，1-tbrPressed为按下状态。
(5) 样式(Style)：Style属性决定按钮的行为特点。与按钮相关联的功能可能受到按钮样式的影响，如表7.4所示。
表7.4 Button对象Style属性设置值
|----------------|---|---------------------------------------------------------------------|
| 常 数 | 值 | 说 明 |
| tbrDefault | 0 | 默认值。按钮是一个规则的下压按钮，如保存文件 |
| tbrCheck | 1 | 复选按钮。具有下压、放开两种状态。当按钮代表的功能是某种开关类型时，可用复选样式，如加粗、倾斜、下划线等 |
| tbrButtonGroup | 2 | 选项按钮。当一组按钮功能相互排斥时，可使用选项按钮组样式。同一时刻只能有一个按钮被按下，但可同时处于抬起状态，如两端对齐、居中、右对齐 |
| tbrSeparator | 3 | 分隔符。只创建宽度为8个像素的按钮，没有其他功能。可将其他按钮分隔开 |
| tbrPlaceholder | 4 | 占位符。其外观和功能类似分隔符，但是可以设置其宽度。可用来在工具栏上显示其他控件，如ComboBox控件、ListBox控件 |
| tbrDropDown | 5 | 下拉式菜单按钮，如字体颜色 |
(6) 宽度(Width)：当Style为4时，可设置按钮的宽度。
(7) 图像(Image)：按钮上显示的图片在ImageList控件中的编号。
(8) 工具提示文本(ToolTipText)：程序运行时，当鼠标指向按钮时显示的说明。
在设计时，可以很方便地在工具栏控件中放置其他控件，例如，组合框、文本框或选项按钮控件等，这可按照下面的步骤执行：
(1) 创建工具栏控件，设置属性。
(2) 在工具栏中为希望显示的其他控件留出空间，然后加入占位符式按钮，将其宽度设置为合适的值。
(3) 在占位符按钮上绘制其他控件。
3. 编写ButtonClick事件代码
工具栏控件的常用事件有ButtonClick事件和Change事件。当用户单击按钮(占位符和分隔符样式的按钮除外)时，将激发ButtonClick事件。此时可以用按钮的Index属性或Key属性标识被单击的按钮。
【例7.3】 利用工具栏来实现例7.1中的字体变化。
分析：为了能够输入更多的文字，这里使用文本框Text1代替了例7.1中的标签，并将文本框的MultiLine属性值设为True，ScrollBars属性值设为2-Vertical。
(1) 利用添加部件将ImageList和Toolbar控件放入工具箱。
(2) 在窗体上添加ImageList1控件，通过其属性窗口，依次将Graphic\Bitmaps\Tlbr_w95目录中的图片文件Bld.bmp，Itl.bmp，Undrln.bmp加入到图像框内。
(3) 双击工具箱中的Toolbar控件，在窗体的顶部添加一个工具栏Toolbar1。打开Toolbar1属性对话框，在"通用"选项卡中将图像列表的属性值改为ImageList1，建立与图像列表控件的关联。还可以将样式属性值改为1(tbrFlat式样)。在"按钮"选项卡中依次插入按钮：1，2，3，并同时注意修改他们的图像属性值(这里依次为1，2，3)。由于加粗、倾斜、下划线为复选按钮，还应将三个按钮的样式属性值设为1。
(4) 编写程序代码：
Private Sub Form_Resize()
With Text1
.Top = Toolbar1.Height
.Left = 0
.Height = Form1.ScaleHeight - Toolbar1.Height
.Width = Form1.ScaleWidth
End With
End Sub
Private Sub Toolbar1_ButtonClick(ByVal Button As MSComctlLib.Button)
n = Button.Index
Select Case n
Case 1
Text1.FontBold = Not Text1.FontBold
Case 2
Text1.FontItalic = Not Text1.FontItalic
Case 3
Text1.FontUnderline = Not Text1.FontUnderline
End Select
End Sub
运行程序，显示界面如图7.13所示。
图7.13 例7.3的用户界面
可以用ToolTipText属性设置提示文本。设计时，在Toolbar1控件属性页中的"工具提示文本"框中输入需要的文本，即可为按钮加入提示文本。运行时，可通过设置Button对象的ToolTipText属性动态地改变提示文本。
工具栏控件提供的另一功能是用户定制工具栏。如果将工具栏控件的AllowCustomize属性设置为True，则当用户双击工具栏时，即可显示出"自定义工具栏"对话框。在代码中可以通过调用Customize方法显示对话框。"自定义工具栏"的对话框如图7.14所示。
图7.14 "自定义工具栏"对话框
当用户利用"自定义工具栏"对话框定制了自己的工具条时，Change事件被激活。通常，在该事件中保存用户的定制。
如果允许用户重新配置工具栏控件，那么需要用SaveToolbar和RestoreToolbar方法保存和恢复该工具栏。例如，如果多个用户同时使用同一个应用程序，但他们的使用习惯不同，则可以用SaveToolbar方法使用户能够创建自己的定制工具栏。然后创建一个登录过程，用来标识每个用户，并通过RestoreToolbar方法，根据登录信息恢复用户个人的工具栏。