码迷,mamicode.com
首页 > 其他好文 > 详细

vb 添加状态栏

时间:2015-03-06 14:08:16      阅读:130      评论:0      收藏:0      [点我收藏+]

标签:

1.新建一工程
2.添加"部件" ms windows common controls 6.0
3.将StatusBar控件加至窗体中
4.右键点击该控件,选"属性",可设置其外观,窗格数,字体及图片
5.通过代码可改变状态栏中的显示内容


Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
If KeyCode = vbKeyInsert Then
If StatusBar1.Panels(2).Text = "插入" Then
StatusBar1.Panels(2).Text = "改写"
Else
StatusBar1.Panels(2).Text = "插入"
End If
End If
End Sub

/*****************************************/
关于 ms windows common controls 6.0 不能找到,解决方法
下载mscomctl.ocx控件,复制到c:\windows\system32目录下,并注册 开始菜单,运行,输入 regsvr32 mscomctl.ocx
 

vb 添加状态栏

标签:

原文地址:http://www.cnblogs.com/zanglaowei/p/4317888.html

(0)
(0)
   
举报
评论 一句话评论(0
登录后才能评论!
© 2014 mamicode.com 版权所有  联系我们:gaon5@hotmail.com
迷上了代码!