2014年计算机二级VB基础教程(37):创建状态条

来源:计算机等级考试    发布时间:2014-04-06    计算机等级考试视频    评论

选中状态条,按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

如果是一个多面板状态条,就需要鉴别用户单击的是哪一个面板,可用下面的事件过程来识别用户所单击的面板:

 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


热门推荐:学起来比较困难吗?来报个辅导班一起学习吧,仅需100元,2个月通过国家计算机二级考试!点击进入

视频学习

我考网版权与免责声明

① 凡本网注明稿件来源为"原创"的所有文字、图片和音视频稿件,版权均属本网所有。任何媒体、网站或个人转载、链接转贴或以其他方式复制发表时必须注明"稿件来源:我考网",违者本网将依法追究责任;

② 本网部分稿件来源于网络,任何单位或个人认为我考网发布的内容可能涉嫌侵犯其合法权益,应该及时向我考网书面反馈,并提供身份证明、权属证明及详细侵权情况证明,我考网在收到上述法律文件后,将会尽快移除被控侵权内容。

最近更新

社区交流

考试问答