StatusBar控件提供窗体。StatusBar最多能被分成16个Panel对象，这些对象包含在Panels集合中。  该控件是ActiveX控件，在使用该控件前需要先将其添加到工具箱中。选择“工程/部件”命令，在“部件”对话框中选中Microsoft Windows Common Controls 6.0（SP6）项，即可添加一组控件到工具箱中。 4.1 在状态栏中显示日期、时间  将StatusBar控件添加到窗体上，用鼠标右键单击该控件，在弹出的快捷菜单中选择“属性”命令，即可弹出“属性页”对话框。选择“窗格”选项卡，默认会自动创建一个窗格，设置第1个窗格的“样式”为6-sbrDate，显示当前系统的日期。  单击“插入窗格”按钮，插入一个窗格，设置第2个窗格的“样式”为5-sbrTime，用于显示时间。

状态栏的作用与组成

　　StatusBar 控件由 Panel（窗格） 对象组成，最多能被分成 16 个 Panel 对象，每一个 Panel 对象能包含文本和/或图片。控制个别窗格的外观属性包括 Width、Alignment（文本和图片的）和 Bevel(斜面)。此外，能使用 Style 属性七个值中的一个自动地显示公共数据，诸如日期、时间和键盘状态等。

　　2． 创建状态栏

　　先在窗体上画出一个StatusBar对象，再右击该对象，从快捷菜单中选择“属性”，进入属性页设置窗口，进行下面的设置：

　　（1） 选择窗格形状

　　在属性窗口里选择通用标签，在样式列表框里选择多窗格（缺省形式）或单窗格简单文本形式。

　　（2） 添加或删除状态栏窗格

　　在属性窗口里选择窗格标签，单击插入窗格按钮添加一个窗格，或单击删除窗格按钮删除一个窗格。

　　　　（4） 在多窗格里显示文本或图形

　　1). 在属性窗口里选择窗格标签，用索引旁的按钮选择窗格序号。

　　2). 在文本框里输入想显示在状态栏窗格里的文本。用代码显示的方式是：

　　StatusBar1.Panels(x).Text = "要显示的内容"

　　3). 如果想加入图形，单击浏览按钮打开一个图形选择对话框，选择想加入的图形，然后单击打开按钮。

　　（5)  编写代码

　　如果是一个单窗格状态栏，当用户单击状态栏时，只需用下面的事件过程来响应：

　　　Private Sub StatusBar1_Click()
　　　　　　　 <要执行的代码>
　　　End Sub

　　如果是一个多窗格状态栏，就需要鉴别用户单击的是哪一个窗格，可用下面的事件过程来识别用户所单击的窗格：

　　　Private Sub StatusBar1_PanelClick(ByVal Panel As Panel)
　　　　　 Select Case Panel.Index
　　　　　　　　　 Case 1
　　　　　　　　　　　　　　　 <要执行的代码>
　　　　　　　　　 Case 2
　　　　　　　　　　　　　　　　 <要执行的代码>
　　　　　　　　　　 ……
　　　　　 End Select
　　　End Sub

Private Sub StatusBar1_PanelClick(ByVal Panel As MSComctlLib.Panel)
Select Case Panel.Index
Case 1
StatusBar1.Panels(1).Text = "1111111111"
Case 2
StatusBar1.Panels(2).Text = "22222222222"
Case 3
StatusBar1.Panels(3).Text = "333333333333"
End Select
End Sub