VB6.0控件toolbar相关

Posted 2023-05-03

因为我们的新的课本上面增加了“菜单编辑器”的内容
把Toolbar相关的东西去掉了
谁能忙帮讲讲它的各个属性还有事件及方法
最好有几个个例子，连接地址也可以

参考技术A Private Sub Toolbar1_ButtonClick(ByVal Button As MSComctlLib.Button)
On Error Resume Next
Select Case Button.Key
Case "新建"
Call 语句１
Case "打开"
Call 语句２
Case "保存"
Call　　语句３
Case "复制"
Call　　语句４
Case "粘贴"
Call　　语句５
Case "删除"
Call　　语句６
Case "帮助"
Call　　语句７
End Select
End SubCallCallCall 参考技术B toolbar的属性主要是：image，就是按钮上要显示的小图标。其它的可以不用管了，在toolbar上ADD按钮，点击事件由按钮来写

delphi的 ToolBar1控件增加个按扭，为啥在CAPTION属性上写字不显示呢》

delphi的 ToolBar1控件增加个按扭，为什么在CAPTION属性上写字不显示呢》

因为TOOLBAR它是一个快捷工具条，所以你不可以在上面打汉字，一般它上面是一张图片，你可以使用imangelist这个控件，然后双击它，点击ADD，把你要选的图案加进来，然后把TOOLBAR的imange属性设为imangelist1，则你的TOOLBAR就有图案了，虽然你要让它当鼠标放到TOOLBAR上时，可以显示汉字，则在TOOLBAR的Hint里打上汉字，然后把ShowHint设为TRUE，这样当你运行时，你把鼠标放到TOOLBAR上时，它就会出现你刚才打的汉字。 参考技术A 如果要在按钮上显示汉字的话,就不要使用快捷键中的 New Button选项来产生Toolbar的button按钮.
你可以在Additional面版中直接拖SpeedButton,或者其它的button控件到你的Toolbar控件上,这样产生的button可以显示汉字,speedbutton还可以加载图片. 参考技术B ToolBar1有个属性showcaption你把它选上就可以了