2.5 設(shè)計(jì)狀態(tài)條、工具欄、進(jìn)程條等
1．創(chuàng)建狀態(tài)條
選中狀態(tài)條，按F4鍵進(jìn)入屬性窗口，雙擊（Custom）可以進(jìn)入主要的設(shè)置窗口SBarCtrl屬性窗口。
（1） 選擇面板形狀
在SBarCtrl屬性窗口里選擇General標(biāo)簽，在Style列表框里選擇多面板（缺省形式）或單面板簡(jiǎn)單文本形式。
（2） 添加或刪除狀態(tài)條面板
在SBarCtrl屬性窗口里選擇Panels標(biāo)簽，單擊Insert按鈕添加一個(gè)面板，或單擊Remove按鈕刪除一個(gè)面板。
（3） 在單面板里顯示文本
在SBarCtrl屬性窗口里選擇General標(biāo)簽，在SimpleText框里輸入想顯示在狀態(tài)條面板里的文本。用代碼顯示的方式是：
StatusBar1.SimpleText = "New string to appear"
（4） 在多面板里顯示文本或圖形
1). 在SBarCtrl屬性窗口里選擇Panels標(biāo)簽，用Index旁的按鈕選擇面板序號(hào)。
2). 在Text框里輸入想顯示在狀態(tài)條面板里的文本。
3). 如果想加入圖形，單擊Browse按鈕打開(kāi)一個(gè)圖形選擇對(duì)話(huà)框，選擇想加入的圖形，然后單擊打開(kāi)按鈕。
4). 最后按確定按鈕。
5). 用代碼顯示的方式是：StatusBar1.Panels(x).Text = "New string to appear"
6). 編寫(xiě)代碼
如果是一個(gè)單面板狀態(tài)條，當(dāng)用戶(hù)單擊狀態(tài)條時(shí)，只需用下面的事件過(guò)程來(lái)響應(yīng)：
Private Sub StatusBar1_Click()
End Sub
如果是一個(gè)多面板狀態(tài)條，就需要鑒別用戶(hù)單擊的是哪一個(gè)面板，可用下面的事件過(guò)程來(lái)識(shí)別用戶(hù)所單擊的面板：
Private Sub StatusBar1_PanelClick(ByVal Panel As Panel)
Select Case Panel.Index
Case 1
'Code to follow if user clicks the first panel
Case 2
'Code to follow if user clicks the second panel
Case 3
'Code to follow if user clicks the third panel
End Select
End Sub
2．創(chuàng)建工具欄
（1）建立工具條
1).在工具箱里單擊工具條圖標(biāo)，拖到窗體的任何位置，Visual Basic自動(dòng)將ToolBar移到頂部。
2).按F4鍵打開(kāi)屬性窗口。
3).雙擊（Custom），打開(kāi)ToolBar屬性窗口。
4). 選擇Buttons標(biāo)簽。
5). 單擊Insert按鈕，Visual Basic就會(huì)在你的工具條上顯示一個(gè)空按鈕，現(xiàn)在為你的每一個(gè)按鈕重復(fù)這一步。
6). 單擊確定按鈕。
如果想把按鈕分組，首先生成一個(gè)分隔的按鈕，再在剛才提到的對(duì)話(huà)框里將這個(gè)按鈕的Style屬性改為3-Separator。
（2） 為工具條增加圖畫(huà)
1). 在Visual Basic工具箱里單擊ImageList圖標(biāo)，并將它拖到窗體的任何位置（位置不重要，因?yàn)樗偸遣豢梢?jiàn)的）。
2). 按F4打開(kāi)屬性窗口。
3). 雙擊（Custom），打開(kāi)ImageListCtrl屬性窗口。
4). 選擇Image標(biāo)簽。
5). 單擊Insert Picture，在現(xiàn)在圖形的對(duì)話(huà)框里選擇想使用的位圖或圖標(biāo)，然后單擊打開(kāi)按鈕。為每個(gè)想添加圖形的工具條按鈕重復(fù)此步。
6). 單擊確定按鈕。
7). 單擊工具條，按F4，雙擊（Custom），顯示ToolBar屬性對(duì)話(huà)框。
8). 選擇General標(biāo)簽，在ImageList框里選擇剛才添加的ImageList控件。
9). 選擇Buttons標(biāo)簽，單擊緊挨Index框的向左或向右箭頭以選擇一個(gè)按鈕序號(hào)。出現(xiàn)在工具條最左邊的按鈕序號(hào)為1。
10). 在Image框里輸入一個(gè)數(shù)，輸入為1，則顯示剛才ImageList控件里的第一個(gè)圖形，輸入為2，則顯示剛才ImageList控件里的第二個(gè)圖形。
11). 為每個(gè)按鈕重復(fù)第10步。
12). 單擊確定按鈕，現(xiàn)在Visual Basic就會(huì)在工具條上顯示精美的圖形了。
1．創(chuàng)建狀態(tài)條
選中狀態(tài)條，按F4鍵進(jìn)入屬性窗口，雙擊（Custom）可以進(jìn)入主要的設(shè)置窗口SBarCtrl屬性窗口。
（1） 選擇面板形狀
在SBarCtrl屬性窗口里選擇General標(biāo)簽，在Style列表框里選擇多面板（缺省形式）或單面板簡(jiǎn)單文本形式。
（2） 添加或刪除狀態(tài)條面板
在SBarCtrl屬性窗口里選擇Panels標(biāo)簽，單擊Insert按鈕添加一個(gè)面板，或單擊Remove按鈕刪除一個(gè)面板。
（3） 在單面板里顯示文本
在SBarCtrl屬性窗口里選擇General標(biāo)簽，在SimpleText框里輸入想顯示在狀態(tài)條面板里的文本。用代碼顯示的方式是：
StatusBar1.SimpleText = "New string to appear"
（4） 在多面板里顯示文本或圖形
1). 在SBarCtrl屬性窗口里選擇Panels標(biāo)簽，用Index旁的按鈕選擇面板序號(hào)。
2). 在Text框里輸入想顯示在狀態(tài)條面板里的文本。
3). 如果想加入圖形，單擊Browse按鈕打開(kāi)一個(gè)圖形選擇對(duì)話(huà)框，選擇想加入的圖形，然后單擊打開(kāi)按鈕。
4). 最后按確定按鈕。
5). 用代碼顯示的方式是：StatusBar1.Panels(x).Text = "New string to appear"
6). 編寫(xiě)代碼
如果是一個(gè)單面板狀態(tài)條，當(dāng)用戶(hù)單擊狀態(tài)條時(shí)，只需用下面的事件過(guò)程來(lái)響應(yīng)：
Private Sub StatusBar1_Click()
End Sub
如果是一個(gè)多面板狀態(tài)條，就需要鑒別用戶(hù)單擊的是哪一個(gè)面板，可用下面的事件過(guò)程來(lái)識(shí)別用戶(hù)所單擊的面板：
Private Sub StatusBar1_PanelClick(ByVal Panel As Panel)
Select Case Panel.Index
Case 1
'Code to follow if user clicks the first panel
Case 2
'Code to follow if user clicks the second panel
Case 3
'Code to follow if user clicks the third panel
End Select
End Sub
2．創(chuàng)建工具欄
（1）建立工具條
1).在工具箱里單擊工具條圖標(biāo)，拖到窗體的任何位置，Visual Basic自動(dòng)將ToolBar移到頂部。
2).按F4鍵打開(kāi)屬性窗口。
3).雙擊（Custom），打開(kāi)ToolBar屬性窗口。
4). 選擇Buttons標(biāo)簽。
5). 單擊Insert按鈕，Visual Basic就會(huì)在你的工具條上顯示一個(gè)空按鈕，現(xiàn)在為你的每一個(gè)按鈕重復(fù)這一步。
6). 單擊確定按鈕。
如果想把按鈕分組，首先生成一個(gè)分隔的按鈕，再在剛才提到的對(duì)話(huà)框里將這個(gè)按鈕的Style屬性改為3-Separator。
（2） 為工具條增加圖畫(huà)
1). 在Visual Basic工具箱里單擊ImageList圖標(biāo)，并將它拖到窗體的任何位置（位置不重要，因?yàn)樗偸遣豢梢?jiàn)的）。
2). 按F4打開(kāi)屬性窗口。
3). 雙擊（Custom），打開(kāi)ImageListCtrl屬性窗口。
4). 選擇Image標(biāo)簽。
5). 單擊Insert Picture，在現(xiàn)在圖形的對(duì)話(huà)框里選擇想使用的位圖或圖標(biāo)，然后單擊打開(kāi)按鈕。為每個(gè)想添加圖形的工具條按鈕重復(fù)此步。
6). 單擊確定按鈕。
7). 單擊工具條，按F4，雙擊（Custom），顯示ToolBar屬性對(duì)話(huà)框。
8). 選擇General標(biāo)簽，在ImageList框里選擇剛才添加的ImageList控件。
9). 選擇Buttons標(biāo)簽，單擊緊挨Index框的向左或向右箭頭以選擇一個(gè)按鈕序號(hào)。出現(xiàn)在工具條最左邊的按鈕序號(hào)為1。
10). 在Image框里輸入一個(gè)數(shù)，輸入為1，則顯示剛才ImageList控件里的第一個(gè)圖形，輸入為2，則顯示剛才ImageList控件里的第二個(gè)圖形。
11). 為每個(gè)按鈕重復(fù)第10步。
12). 單擊確定按鈕，現(xiàn)在Visual Basic就會(huì)在工具條上顯示精美的圖形了。