VB(62)為寫字板添加工具欄

1、汝南縣職業(yè)教育中心汝南縣職業(yè)教育中心第6章 菜單和工具欄設(shè)計(jì) 任務(wù)任務(wù)2為寫字板添加工具欄為寫字板添加工具欄汝南縣職業(yè)教育中心汝南縣職業(yè)教育中心第5章目錄任務(wù)1 制作寫字板程序【知識(shí)點(diǎn)】n 工具欄控件（Toolbar）n 圖像列表控件(ImageList)汝南縣職業(yè)教育中心汝南縣職業(yè)教育中心任務(wù)1 制作寫字板程序Toolbar ImageList控件不是標(biāo)準(zhǔn)控件，使用之前要把它們添加到工具箱中，具體操作方法是: (1) 右鍵單擊【工具箱】空白位置，選擇彈出菜單中的【部件】命令，彈出【部件】對(duì)話框； (2) 在對(duì)話框的【控件】列表框中選擇MicorSoft Windows Common Cont

2、rols 6.0選項(xiàng)(使該選項(xiàng)前的復(fù)選框中出現(xiàn)對(duì)鉤)；(3)單擊【確定】按鈕。此后，在工具箱中增加一組控件 第5章目錄汝南縣職業(yè)教育中心汝南縣職業(yè)教育中心任務(wù)1 制作寫字板程序設(shè)計(jì)工具欄的主要步驟是： (1) 將Toolbar和ImageList添加到窗體。Toolbar自動(dòng)顯示在窗體頂部，ImageList運(yùn)行程序時(shí)不可見，它只是存放圖標(biāo)的數(shù)據(jù)庫(kù)。 (2)為ImageList添加所需圖標(biāo)。 (3)創(chuàng)建Toolbar的按鈕對(duì)象。 (4) 編寫按鈕對(duì)象的事件過程。 第5章目錄汝南縣職業(yè)教育中心汝南縣職業(yè)教育中心任務(wù)1 制作寫字板程序1、工具欄控件(Toolbar)：用途：包含一個(gè)Button對(duì)象

3、集合，用于創(chuàng)建與應(yīng)用程序相關(guān)聯(lián)的工具欄。ToolBar1.Buttons.Add(一) ToolBar1.Buttons.Remove(二)常用屬性如下：lButtons：返回對(duì)Toolbar控件的Button對(duì)象集合的引用；語(yǔ)法： Toolbar.Buttons(index)toolbar 對(duì)象表達(dá)式，其值是 Toolbar 控件。index 整數(shù)或字符串，它唯一標(biāo)識(shí)集合中的對(duì)象。整數(shù)是 Index 的屬性值（ Index 屬性是從數(shù)字 1 開始）;字符串是 Key 的屬性值。例： Dim btnX As Button通過索引數(shù)字引用第三個(gè) Button 對(duì)象。Set btnX = Tool

4、bar1.Buttons(3)或通過唯一關(guān)鍵字引用第三個(gè) Button 對(duì)象。Set btnX = Toolbar1.Buttons(third) 假設(shè) Key 是third。第5章目錄汝南縣職業(yè)教育中心汝南縣職業(yè)教育中心任務(wù)1 制作寫字板程序1、工具欄控件(Toolbar)：用途：包含一個(gè)Button對(duì)象集合，用于創(chuàng)建與應(yīng)用程序相關(guān)聯(lián)的工具欄。常用屬性如下：lImagelist：返回或設(shè)置與工具欄相關(guān)聯(lián)的ImageList控件；語(yǔ)法： Toolbar. Imagelist(=imagelist)例：Set ToolBar1.ImageList = ImageList1常用事件：ButtonC

5、lick 當(dāng)單擊工具欄控件內(nèi)的按鈕對(duì)象時(shí)發(fā)生 使用 Select Case 語(yǔ)句和MSComctlLib類來確定單擊的工具欄按鈕。返回值為Toolbar 的Key值 或索引值例：Private Sub Toolbar1_ButtonClick(ByVal Button As Select Case Button.Key （Select Case Button.Index）Case NewmnuFileNew_ClickEnd Select第5章目錄汝南縣職業(yè)教育中心汝南縣職業(yè)教育中心任務(wù)1 制作寫字板程序2、圖像列表控件(ImageList)：用途：包含ListImage對(duì)象集合，通過索引或關(guān)鍵字被引用，不能單獨(dú)使用。第5章目錄汝南縣職業(yè)教育中心汝南縣職業(yè)教育中心任務(wù)1 制作寫字板程序2、圖像列表控件(ImageList)：用途：包含ListImage對(duì)象