ToolBar(工具欄)控件包含用來創建工具欄的ToolBarButton對象的集合。工具欄可與應用程序相關聯。ToolBar在工具箱中的圖標如圖所示:
一般情況下,工具欄中的按鈕與應用程序菜單中的菜單項相對應,可以用它們來訪問應用程序最常用的功能和命令。要創建工具欄,必須先將Button對象加入Buttons集合,每個Button對象可以擁有可選的文本,或者(並且)擁有相關聯的ImageList控件提供的圖象。可以用Text屬性為每個Button對象設置文本,用ImageIndex屬性設置圖象。在設計時,可通過ToolBar的Buttons對話框加入Button對象,如下圖:
在運行時,可以用Add和Remove方法將按鈕加入Buttons集合或從中刪除。要在設計時添加其他控件,只需在工具欄上將所需要的控件拖入工具欄即可。
1.Buttons集合
ToolBar控件由Buttons集合中的一個或多個ToolBarButton對象構成。在設計時和運行時均可創建Button對象。每個按鈕可有圖象、標題、工具提示,並且可以同時具有上述三種特性,下圖為一個工具欄的實例:
每個按鈕對象還有Style屬性,該屬性決定了按鈕的行為。
2.在運行時創建按鈕
在運行時創建ToolBarButton對象的集合按以下的步驟:
(1)聲明ToolBarButton類型的對象變量。在添加ToolBarButton對象時,該變量用來包含對新產生對象的引用。該引用可以用來設置新ToolBarButton對象的各種屬性。
(2)用帶Add方法的Set語句,將對象變量賦值為新ToolBarButton對象。
(3)用該對象變量設置新ToolBarButton對象的屬性
下面的代碼在Button對象的Click事件中創建一個ToolBarButton對象,然後設置新的ToolBarButton對象的ImageIndex,Text,ToolTipText和Style屬性。
Protected Sub Button1_Click(ByVal sender As Object,ByVal e As System.EventArgs) Dim MyButton As New ToolBarButton() ToolBar1.Buttons.Add(MyButton) MyButton.ImageIndex=1 MyButton.Text="left" MyButton.ToolTipText="left1" MyButton.Style=ToolBarButtonStyle.PushButton End Sub