VB6.0 ActiveBar菜单事件

Posted

tags:

篇首语:本文由小常识网(cha138.com)小编为大家整理,主要介绍了VB6.0 ActiveBar菜单事件相关的知识,希望对你有一定的参考价值。

我用ActiveBar了菜单,可是里面没有按钮的点击事件,只有整个菜单的点击事件
Private Sub ActiveBar21_ToolClick(ByVal Tool As ActiveBar2LibraryCtl.Tool)
end sub
也就是无论点击这个菜单里哪一个按钮,都是触发同样的事件。
请问我该如何为菜单中不同的按钮分别添加单独事件呢?

参考技术A Private Sub ActiveBar1_Click(ByVal Tool As ActiveBarLibraryCtl.Tool)
Select Case Tool.Name
Case "mutopen"
msgbox "..."
End Select
end sub

以上是关于VB6.0 ActiveBar菜单事件的主要内容,如果未能解决你的问题,请参考以下文章

VB6.0控件toolbar相关

在VB6.0中,运行一个窗体时,放大该窗体的尺寸时将触发的事件是

VB6.0 获取WebBrowser当前打开页面的网址

VB6.0使用汇总

VB子菜单问题

如何引用VB6.0编 用户自定义控件