1. 狀態(tài)欄的作用與組成
StatusBar 控件由 Panel(窗格) 對象組成,最多能被分成 16 個 Panel 對象,每一個 Panel 對象能包含文本和/或圖片??刂苽€別窗格的外觀屬性包括 Width、Alignment(文本和圖片的)和 Bevel(斜面)。此外,能使用 Style 屬性七個值中的一個自動地顯示公共數(shù)據(jù),諸如日期、時間和鍵盤狀態(tài)等。
2. 創(chuàng)建狀態(tài)欄
先在窗體上畫出一個StatusBar對象,再右擊該對象,從快捷菜單中選擇“屬性”,進入屬性頁設(shè)置窗口,進行下面的設(shè)置:
(1) 選擇窗格形狀
在屬性窗口里選擇通用標簽,在樣式列表框里選擇多窗格(缺省形式)或單窗格簡單文本形式。
(2) 添加或刪除狀態(tài)欄窗格
在屬性窗口里選擇窗格標簽,單擊插入窗格按鈕添加一個窗格,或單擊刪除窗格按鈕刪除一個窗格。
(3) 在單窗格里顯示文本
在屬性窗口里選擇通用標簽,在簡單文本框里輸入想顯示在狀態(tài)欄窗格里的文本。用代碼顯示的方式是:
StatusBar1.SimpleText = "要顯示的內(nèi)容"
(4) 在多窗格里顯示文本或圖形
1). 在屬性窗口里選擇窗格標簽,用索引旁的按鈕選擇窗格序號。
2). 在文本框里輸入想顯示在狀態(tài)欄窗格里的文本。用代碼顯示的方式是:
StatusBar1.Panels(x).Text = "要顯示的內(nèi)容"
3). 如果想加入圖形,單擊瀏覽按鈕打開一個圖形選擇對話框,選擇想加入的圖形,然后單擊打開按鈕。
(5) 編寫代碼
如果是一個單窗格狀態(tài)欄,當用戶單擊狀態(tài)欄時,只需用下面的事件過程來響應(yīng):
Private Sub StatusBar1_Click()
<要執(zhí)行的代碼>
End Sub
如果是一個多窗格狀態(tài)欄,就需要鑒別用戶單擊的是哪一個窗格,可用下面的事件過程來識別用戶所單擊的窗格:
Private Sub StatusBar1_PanelClick(ByVal Panel As Panel)
Select Case Panel.Index
Case 1
<要執(zhí)行的代碼>
Case 2
<要執(zhí)行的代碼>
……
End Select
End Sub
3.創(chuàng)建工具欄
(1).建立工具欄
1) 在工具箱里單擊工具欄圖標,拖到窗體的任何位置,Visual Basic自動將ToolBar移到頂部。再右擊該對象,從快捷菜單中選擇“屬性”,進入屬性頁設(shè)置窗口;
2) 選擇按鈕標簽,單擊插入按鈕,Visual Basic就會在工具欄上顯示一個空按鈕,重復(fù)此步插入多個按鈕;
3) 單擊確定按鈕。如果想把按鈕分組,首先插入一個分隔的按鈕,再在對話框里將這個按鈕的樣式屬性改為3-Separator。
(2) 為工具欄增加圖畫
1). 在Visual Basic工具箱里單擊ImageList圖標,并將它拖到窗體的任何位置(位置不重要,因為它總是不可見的),再右擊該對象,從快捷菜單中選擇“屬性”,進入屬性頁設(shè)置窗口;
2). 選擇圖象標簽,單擊插入圖片,在選定圖形對話框里選擇想使用的位圖或圖標,然后單擊打開按鈕。為每個想添加圖形的工具欄按鈕重復(fù)此步。
3). 單擊確定按鈕。
4). 進入ToolBar屬性對話框,選擇通用標簽,在圖象列表框里選擇剛才添加的ImageList控件。
5). 選擇按鈕標簽,單擊緊挨Index框的向左或向右箭頭以選擇一個按鈕序號。出現(xiàn)在工具欄最左邊的按鈕序號為1。
6). 在Image框里輸入一個數(shù),輸入為1,則顯示剛才ImageList控件里的第一個圖形,輸入為2,則顯示剛才ImageList控件里的第二個圖形。
7). 為每個按鈕重復(fù)第6步, 單擊確定按鈕,現(xiàn)在Visual Basic就會在工具欄上顯示精美的圖形了。
(3)為工具欄添加文本信息
在ToolBar屬性對話框中選擇按鈕標簽,在標題框里輸入想顯示在按鈕上的文本。
(4)添加ToolTips
ToolTips是一種當點到工具按鈕時彈出的小標簽。ToolTips很方便,可以告訴那些新手每個按鈕是干什么用的。在ToolBar屬性對話框中選擇按鈕標簽,在工具提示文本框里輸入想作為ToolTip的文本。
(5)編寫代碼
雙擊工具欄,以下面的格式輸入代碼就可以了:
Private Sub Toolbar1_ButtonClick(ByVal Button As Button)
Select Case Button.Index
Case 1
<要執(zhí)行的代碼>
Case 2
<要執(zhí)行的代碼>
……
End Select
End Sub
StatusBar 控件由 Panel(窗格) 對象組成,最多能被分成 16 個 Panel 對象,每一個 Panel 對象能包含文本和/或圖片??刂苽€別窗格的外觀屬性包括 Width、Alignment(文本和圖片的)和 Bevel(斜面)。此外,能使用 Style 屬性七個值中的一個自動地顯示公共數(shù)據(jù),諸如日期、時間和鍵盤狀態(tài)等。
2. 創(chuàng)建狀態(tài)欄
先在窗體上畫出一個StatusBar對象,再右擊該對象,從快捷菜單中選擇“屬性”,進入屬性頁設(shè)置窗口,進行下面的設(shè)置:
(1) 選擇窗格形狀
在屬性窗口里選擇通用標簽,在樣式列表框里選擇多窗格(缺省形式)或單窗格簡單文本形式。
(2) 添加或刪除狀態(tài)欄窗格
在屬性窗口里選擇窗格標簽,單擊插入窗格按鈕添加一個窗格,或單擊刪除窗格按鈕刪除一個窗格。
(3) 在單窗格里顯示文本
在屬性窗口里選擇通用標簽,在簡單文本框里輸入想顯示在狀態(tài)欄窗格里的文本。用代碼顯示的方式是:
StatusBar1.SimpleText = "要顯示的內(nèi)容"
(4) 在多窗格里顯示文本或圖形
1). 在屬性窗口里選擇窗格標簽,用索引旁的按鈕選擇窗格序號。
2). 在文本框里輸入想顯示在狀態(tài)欄窗格里的文本。用代碼顯示的方式是:
StatusBar1.Panels(x).Text = "要顯示的內(nèi)容"
3). 如果想加入圖形,單擊瀏覽按鈕打開一個圖形選擇對話框,選擇想加入的圖形,然后單擊打開按鈕。
(5) 編寫代碼
如果是一個單窗格狀態(tài)欄,當用戶單擊狀態(tài)欄時,只需用下面的事件過程來響應(yīng):
Private Sub StatusBar1_Click()
<要執(zhí)行的代碼>
End Sub
如果是一個多窗格狀態(tài)欄,就需要鑒別用戶單擊的是哪一個窗格,可用下面的事件過程來識別用戶所單擊的窗格:
Private Sub StatusBar1_PanelClick(ByVal Panel As Panel)
Select Case Panel.Index
Case 1
<要執(zhí)行的代碼>
Case 2
<要執(zhí)行的代碼>
……
End Select
End Sub
3.創(chuàng)建工具欄
(1).建立工具欄
1) 在工具箱里單擊工具欄圖標,拖到窗體的任何位置,Visual Basic自動將ToolBar移到頂部。再右擊該對象,從快捷菜單中選擇“屬性”,進入屬性頁設(shè)置窗口;
2) 選擇按鈕標簽,單擊插入按鈕,Visual Basic就會在工具欄上顯示一個空按鈕,重復(fù)此步插入多個按鈕;
3) 單擊確定按鈕。如果想把按鈕分組,首先插入一個分隔的按鈕,再在對話框里將這個按鈕的樣式屬性改為3-Separator。
(2) 為工具欄增加圖畫
1). 在Visual Basic工具箱里單擊ImageList圖標,并將它拖到窗體的任何位置(位置不重要,因為它總是不可見的),再右擊該對象,從快捷菜單中選擇“屬性”,進入屬性頁設(shè)置窗口;
2). 選擇圖象標簽,單擊插入圖片,在選定圖形對話框里選擇想使用的位圖或圖標,然后單擊打開按鈕。為每個想添加圖形的工具欄按鈕重復(fù)此步。
3). 單擊確定按鈕。
4). 進入ToolBar屬性對話框,選擇通用標簽,在圖象列表框里選擇剛才添加的ImageList控件。
5). 選擇按鈕標簽,單擊緊挨Index框的向左或向右箭頭以選擇一個按鈕序號。出現(xiàn)在工具欄最左邊的按鈕序號為1。
6). 在Image框里輸入一個數(shù),輸入為1,則顯示剛才ImageList控件里的第一個圖形,輸入為2,則顯示剛才ImageList控件里的第二個圖形。
7). 為每個按鈕重復(fù)第6步, 單擊確定按鈕,現(xiàn)在Visual Basic就會在工具欄上顯示精美的圖形了。
(3)為工具欄添加文本信息
在ToolBar屬性對話框中選擇按鈕標簽,在標題框里輸入想顯示在按鈕上的文本。
(4)添加ToolTips
ToolTips是一種當點到工具按鈕時彈出的小標簽。ToolTips很方便,可以告訴那些新手每個按鈕是干什么用的。在ToolBar屬性對話框中選擇按鈕標簽,在工具提示文本框里輸入想作為ToolTip的文本。
(5)編寫代碼
雙擊工具欄,以下面的格式輸入代碼就可以了:
Private Sub Toolbar1_ButtonClick(ByVal Button As Button)
Select Case Button.Index
Case 1
<要執(zhí)行的代碼>
Case 2
<要執(zhí)行的代碼>
……
End Select
End Sub