VB6提供了功能更为强大的ActiveX控件,其中CoolBar、ToolBar控件可以用来制作Win98风格的工具栏,其中CoolBar在“MicrosoftWindowCommonControls-36.0”部件中,ToolBar和ImageList在“MicrosoftWindowCommonControl6.0”部件中。具体实现步骤如下:
1.新建一个工程Project1,创建主窗体frmMain。
2.在主窗体中添加一个CoolBar控件(命名为CoolBar1),调整其Align属性为1,即停靠在窗体上方。
注:CoolBar上不能直接添加按钮,所以它实际上只是一个“准工具栏”(或者说是“伪工具栏”)。
3.在CoolBar1内添加一个ToolBar控件(命名为ToolBar1)。右击CoolBar1,选择Properties,打开它的属性窗口,在Bands选项卡中可以通过单击InsertBand按钮增加工具栏的个数,单击RemoveBand按钮减少工具栏的个数(默认为3个)。通过左右箭头改变Index的值,从而确定当前工具栏。为便于设计,将每个工具栏的NewRow复选框选定。
4.在第一个工具栏(Index=1)的Child下拉框中选择“ToolBar1”,于是ToolBar1就和CoolBar1的“Band1”大小保持一致。
5.在主窗体中添加两个ImageList控件(分别为ImageList1和Image-List2)。打开ImageList1的属性窗口,在Images选项卡中单击InsertPicture按钮,添加彩色图片(最好是32*32图标文件,因为它的透明背景不受显示属性、桌面主题的影响)。给ImageList2添加对应的灰度图片。注意:要保证它们的顺序相同,一一对应。
6.打开ToolBar1的属性窗口,在Generals选项卡中设定ImageList为ImageList2;HotImageList为ImageList1;Appearance为0,Style为1。
在Buttons选项卡中添加按钮,在每个按钮的Image框中输入对应图片的Index值,设定Caption。
工具栏按钮被按下的事件可以在ToolBar的ButtonClick事件中捕捉到。参数Button的Index属性指示被按下的按钮的索引号。->