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屬性指示被按下的按鈕的索引號。->