在VB中使用皮肤控件SkinH 但是在TOOLbar 中地下的文字出不来,请问怎么处理?
在VB中使用皮肤控件SkinH但是在TOOLbar中地下的文字出不来,请问怎么处理?不好意思我的财富值没有了,希望大家能给个回答,非常感谢!!!!TOOLBAR的使用方法...
在VB中使用皮肤控件SkinH 但是在TOOLbar 中地下的文字出不来,请问怎么处理?不好意思我的财富值没有了,希望大家能给个回答,非常感谢!!!!
TOOLBAR的使用方法我知道,用了SKINH皮肤控件后就出现字体不见的问题,不过我现在已经解决了。
还是非常感谢回答者! 展开
TOOLBAR的使用方法我知道,用了SKINH皮肤控件后就出现字体不见的问题,不过我现在已经解决了。
还是非常感谢回答者! 展开
展开全部
1 添加部件 或
前者是 Microsoft Windows Common Contools 6.0 (sp6) (有向导,按提示做即可)
后者是 Microsoft Windows Common Contools 5.0 (sp2)
两者使用方法基本相同。
2 在窗体添加一个控件(以后者为例)
3 鼠标右键点击该控件,打开属性页
4 点击页,点击标题: 打开 关键字:功能1
点击标题: 关闭 关键字:功能2
点击标题: 退出 关键字:功能3
5 点击退出属性设置
6 鼠标双击控件,事件中,贴代码
Private Sub Toolbar1_ButtonClick(ByVal Button As ComctlLib.Button)
'======================================================
'功能: 工具条按钮控制示例
'======================================================
Select Case Button.Key
Case "功能1"
MsgBox "点击了"
Case "功能2"
MsgBox "点击了"
Case "功能3"
MsgBox "点击了"
End Select
End Sub
如果使用的是,一样的,控件把代码放入:
Private Sub Toolbar1_ButtonClick(ByVal Button As MSComctlLib.Button)
''''''''''''''''''''''''''''''''''''''
'''''''''''''''''''''''''''''''''''''
End Sub
至于其他参数设置(比如按钮的样式等等),你摸索着来吧,不会出大问题的,
这个学习过程,或许比向他人求教更有趣。
前者是 Microsoft Windows Common Contools 6.0 (sp6) (有向导,按提示做即可)
后者是 Microsoft Windows Common Contools 5.0 (sp2)
两者使用方法基本相同。
2 在窗体添加一个控件(以后者为例)
3 鼠标右键点击该控件,打开属性页
4 点击页,点击标题: 打开 关键字:功能1
点击标题: 关闭 关键字:功能2
点击标题: 退出 关键字:功能3
5 点击退出属性设置
6 鼠标双击控件,事件中,贴代码
Private Sub Toolbar1_ButtonClick(ByVal Button As ComctlLib.Button)
'======================================================
'功能: 工具条按钮控制示例
'======================================================
Select Case Button.Key
Case "功能1"
MsgBox "点击了"
Case "功能2"
MsgBox "点击了"
Case "功能3"
MsgBox "点击了"
End Select
End Sub
如果使用的是,一样的,控件把代码放入:
Private Sub Toolbar1_ButtonClick(ByVal Button As MSComctlLib.Button)
''''''''''''''''''''''''''''''''''''''
'''''''''''''''''''''''''''''''''''''
End Sub
至于其他参数设置(比如按钮的样式等等),你摸索着来吧,不会出大问题的,
这个学习过程,或许比向他人求教更有趣。
本回答被网友采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
怎么解决的呢?我现在也遇到这个问题了O(∩_∩)O~,谢谢
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询