送分100:在VB6中如何动态的控制工具栏图标的显示与隐藏
在VB6中如何动态的控制工具栏图标的显示与隐藏 --------------------编程问答--------------------'显示--------------------编程问答-------------------- 工具栏的显示与隐藏:
tbOperate.Buttons.Item("add").Visible = True
'隐藏
tbOperate.Buttons.Item("add").Visible = False
Option Explicit--------------------编程问答--------------------
Dim flagBar As Boolean
Private Sub Command1_Click()
If flagBar Then
tbToolBar.Visible = True
Else
tbToolBar.Visible = False
End If
flagBar = Not flagBar
End Sub
Ding............
--------------------编程问答-------------------- 顶。。。。 --------------------编程问答-------------------- `````````````````` --------------------编程问答--------------------
顶这个,另一种方法:也可以用空图片替代 --------------------编程问答-------------------- 在网络上你只要虚心、肯问、不吝啬,你就会有大收获。 --------------------编程问答-------------------- 此法只能隐藏一个按钮,而不是全部
显然LZ没说是全部还是一个
--------------------编程问答-------------------- 单个图标,谢谢大家。
--------------------编程问答-------------------- 看来问题已经解决了 --------------------编程问答--------------------
补充:VB , 网络编程