VB工具栏的设计讲解

1、VB提供了工具栏提供了工具栏Toolbar控件，可以方便地为应用程序制作工控件，可以方便地为应用程序制作工具栏，为了使工具按钮更生动，具栏，为了使工具按钮更生动，VB还提供了图像列表还提供了图像列表ImageList控件，使用这两个控件可以制作出非常形象的应控件，使用这两个控件可以制作出非常形象的应用程序工具栏。但这两个控件不是标准控件，使用之前要把用程序工具栏。但这两个控件不是标准控件，使用之前要把它们添加到工具箱中，具体操作方法是：它们添加到工具箱中，具体操作方法是： (1)右键单击【工具箱】空白位置，选择弹出菜单中的【部右键单击【工具箱】空白位置，选择弹出菜单中的【部件】命令，弹出【部件

2、】对话框；件】命令，弹出【部件】对话框； (2)在对话框的【控件】列表框中选择在对话框的【控件】列表框中选择MicorSoft Windows Common Controls 6.0选项选项(使该选项前的复选框中出现对钩使该选项前的复选框中出现对钩)；(3)单击【确定】按钮。单击【确定】按钮。此后，在工具箱中增加一组控件此后，在工具箱中增加一组控件 设计工具栏的主要步骤是： (1) 将Toolbar和ImageList添加到窗体。Toolbar自动显示在窗体顶部，ImageList运行程序时不可见，它只是存放图标的数据库。 (2) 为ImageList添加所需图标。 (3) 创建Toolbar

3、的按钮对象。 (4) 编写按钮对象的事件过程。 在创建ToolBar控件之前，应创建一个ImageList控件并添加你想要的图像。 n ImageList控件ImageList控件包含ListImage对象的集合，该集合中的每个对象都可以通过其索引或关键字被引用。ImageList控件不能独立使用，只是作为一个便于向其它控件提供图象的资料中心。如工具栏控件（ToolBar）中的图像就是从ImageList控件中获取的。n为为ImageList添加所需图标添加所需图标 把把ImageList控件添加到窗体上，右单击该控件，从弹出的控件添加到窗体上，右单击该控件，从弹出的快捷菜单中选择【属性】，便

4、打开【属性页】对话框快捷菜单中选择【属性】，便打开【属性页】对话框. . 其中的“索引”和“关键字”（可选）属性用来引用每张图片。“关键字”属性是唯一的字符串，用来识别图片。使用“关键字”属性一般比使用“索引”要好，因为当插入或删除图片时，索引会发生改变而关键字不会改变。 为工具栏连接图片按钮 把把Toolbar控件添加到窗体上，右单击该控件，从弹出的快捷菜控件添加到窗体上，右单击该控件，从弹出的快捷菜单中选择【属性】，便打开单中选择【属性】，便打开Toolbar控件【属性页】对话框控件【属性页】对话框 。v通用卡设置通用卡设置v通用卡主要用于连接通用卡主要用于连接ImageList，从【图像

5、，从【图像列表】的下拉列表中列表】的下拉列表中选择选择ImageList控件控件 v选择“按钮”标签，在“图像”一栏中设置。你可以用两种方法来把按钮与ImageList中的某个图片相连：把按钮的“图像”属性设置为图片的“索引”数或图片的“关键字”属性（注意“关键字”属性是区分大小写的）。 l l 插入按钮：在工具栏添加一个按钮，每次单击【插入按钮】，插入按钮：在工具栏添加一个按钮，每次单击【插入按钮】，系统在索引号指定的按钮之后插入一个按钮。系统在索引号指定的按钮之后插入一个按钮。 l l 索引：工具栏中按钮的序号，索引号从索引：工具栏中按钮的序号，索引号从1开始。每次单击【插开始。每次单击【

6、插入按钮】，系统在索引号指定的按钮之后插入一个按钮，并自动生入按钮】，系统在索引号指定的按钮之后插入一个按钮，并自动生成索引号，成索引号， 在事件过程中可引用索引号。在事件过程中可引用索引号。 l l 关键字：可选项，按钮的名称，可在事件过程中引用。关键字：可选项，按钮的名称，可在事件过程中引用。 l l 图像：可以输入图像：可以输入ImageList控件图标的序号控件图标的序号(索引号索引号)，也可，也可以输入以输入ImageList控件图标的名称控件图标的名称(关键字关键字)，代表在，代表在Toolbar的的按钮中引用索引号或关键字指定的图标。按钮中引用索引号或关键字指定的图标。 l l

7、样式：按钮的形式，例如，普通按钮为样式：按钮的形式，例如，普通按钮为0，开关按钮为，开关按钮为1，分隔，分隔线按钮为线按钮为3等。等。n关于“样式”的说明：n响应响应ToolBar控件事件控件事件ToolBar控件常用控件常用 的事件有两个：的事件有两个：ButtonClick和和ButtonMenuClick，前者对应按钮样式为，前者对应按钮样式为0-2，后者对应，后者对应样式为样式为5的菜单按钮。的菜单按钮。实际上，工具栏上的按钮是控件数组，单击工具栏上的按钮会实际上，工具栏上的按钮是控件数组，单击工具栏上的按钮会发生发生ButtonClick事件和事件和ButtonMenuClick事件

8、，可以利事件，可以利用数组的索引（用数组的索引（Index属性）或关键字（属性）或关键字（Key属性）来识别属性）来识别被单击的按钮，再使用被单击的按钮，再使用Select Case语句完成代码编制。语句完成代码编制。n（1）用索引）用索引Index确定按钮确定按钮Private Sub Toolbar1_ButtonClick(ByVal Button As MSComctlLib.Button)Select Case Button.IndexCase 1 .Case 2 .Case 3 .End selectEnd subn（2）用关键字）用关键字Key确定按钮确定按钮Private Sub Toolbar