VB考试教程：菜单程序设计六工具栏的设计

不及物动词工具栏的设计

工具栏(也称为时钟或控制栏)已经成为许多基于Windows的应用程序的标准功能。工具栏提供对应用程序中最常用菜单命令的快速访问。

工具栏控件可以用来轻松创建工具栏，也可以用应用程序向导来创建工具栏，这样更方便。

1.使用应用程序向导创建工具栏。

应用程序向导是VB6.0为用户提供的一个功能。通过应用程序向导，用户可以快速设计一个标准Windows程序的框架，包括窗体、菜单、工具栏、多文档、状态栏、对话框、滚动条等。设计过程在对话中完成，设计完成后形成应用的界面和框架。

创建标准应用程序框架的步骤如下:

在“新建项目”对话框中，选择“VB应用程序向导”，点击[打开]命令按钮确认。

点击【下一步】按钮一次，进入“界面类型”对话框，选择“多文档界面”，将项目命名为“MyApplication”，点击【下一步】确认。

进入“菜单”对话框，可以设计菜单。点击【下一步】按钮确认设计，进入“自定义工具栏”对话框。

在“自定义工具栏”对话框中，您可以设计自己的工具栏。单击[完成]确认设计。

2.使用工具栏控件创建工具栏。

用工具栏控件创建工具栏也是一个非常简单的工作，通过一个对话框就可以完成基本的属性设置。设计一个带有四个工具按钮的工具栏比如Mymenu，分别对应菜单中的“新建”、“打开”、“粗体”、“斜体”四个菜单项，完成相应的功能。

首先，从“部件”对话框中选择Microsoft Windows公共控件6.0。确认后，工具栏控件将被添加到工具箱中。

向窗体添加工具栏控件。

用鼠标右键单击表单上的工具栏对象，在弹出的快捷菜单上单击[属性]选项，打开“属性页”对话框，选择“按钮”选项卡，单击[插入按钮]，插入索引分别为1、2、3、4、5的五个工具按钮。

在属性页上设置工具按钮的属性。每个工具按钮的设计属性值如下:

值标题样式
1新默认值
2打开默认值
3分隔符
4 thr检查
5 thr检查。

“风格”描述:

常量按钮说明
0 trbr default普通按钮按下后恢复原状，如“新建”按钮
1 tbrCheck开关按钮，按下后保持按下状态，2trbuttongroup分组按钮等按钮只能在一组按钮中有效。比如对齐按钮
3 tbr分隔符分隔按钮分隔左右按钮
4 tbrPlaceholder按钮用来放置其他按钮，其宽度可以设置
5TBR下拉菜单按钮有一个下拉菜单，比如Word中的“字符缩放”按钮。

用鼠标左键双击toolbar对象，并编写如下Click事件响应代码:

private Sub toolbar 1 _ Button click(ByVal Button As MSComctlLib。按钮)

选择案例按钮。Index
案例1
mnuNew_Click
案例2
mnuOpen_Click
案例4
mnuBold_Click
案例5
mnuItalic _ Click
End Select

末端接头

-

私有Sub mnuBold_Click()

mnuBold。选中=非mnuBold。已检查
文本1。FontBold = mnuBold。检查

末端接头

-

Private Sub mnufotesize_Click(索引为整数)

选择案例索引
案例0
文本1。FontSize = 20
案例1
文本1。FontSize = 30
End Select

末端接头

-

Private Sub mnuItalic_Click()

mnuItalic。选中=不是mnuItalic。已检查
文本1。FontItalic = mnuItalic。检查

末端接头

-

私有Sub mnuNew_Click()

1.表格1。Caption = "新文件"
text 1 . visible = true
text 1 . text = " "

末端接头

-

私有Sub mnuOpen _ Click()

表格1。Caption = "file"
Text1。可见=真

末端接头

保存项目运行程序。

[程序演示][程序下载]

3.使用ImageList控件在工具按钮上显示图像。

在创建ToolBar控件之前，应该创建一个ImageList控件并添加所需的图像。

ImageList控件

ImageList控件包含ListImage对象的集合，每个对象都可以由其索引或关键字引用。ImageList控件不能独立使用，只是作为一个数据中心，为其他控件提供图像。例如，ToolBar控件中的图像是从ImageList控件中获取的。