VB基础教程：第二章第五节设计状态条、工具栏、进程条等

1． 创建状态条

选中状态条，按F4键进入属性窗口，双击（Custom）可以进入主要的设置窗口SBarCtrl属性窗口。

（1） 选择面板形状

　在SBarCtrl属性窗口里选择General标签，在Style列表框里选择多面板（缺省形式）或单面板简单文本形式。

（2） 添加或删除状态条面板

　在SBarCtrl属性窗口里选择Panels标签，单击Insert按钮添加一个面板，或单击Remove按钮删除一个面板。

（3） 在单面板里显示文本

　在SBarCtrl属性窗口里选择General标签，在SimpleText框里输入想显示在状态条面板里的文本。用代码显示的方式是：

　StatusBar1.SimpleText = "New string to appear"

（4） 在多面板里显示文本或图形

　　1). 在SBarCtrl属性窗口里选择Panels标签，用Index旁的按钮选择面板序号。

　　2). 在Text框里输入想显示在状态条面板里的文本。

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

　　4). 最后按确定按钮。

　　5). 用代码显示的方式是：StatusBar1.Panels(x).Text = "New string to appear"

　　6). 编写代码　

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

　　Private Sub StatusBar1_Click()

　　End Sub