请教一个问题! 怎么响应工具条上下拉按钮的点击事件? 急啊急得我抓心挠肺的快来帮帮我啊!

fly_higher 2004-10-31 10:19:59

嗯~~~ 就像IE浏览器上面后面的那个小三角. 怎么响应下拉按钮里面事件?

...全文

93 11 打赏收藏转发到动态举报

写回复

用AI写文章

11 条回复

切换为时间正序

请发表友善的回复…

发表回复

fly_higher 2004-11-01

打赏
举报

谢谢各位了~ 结贴!

wwqna 2004-10-31

打赏
举报

没见过，帮你UP

hellobcb 2004-10-31

打赏
举报

给每个按钮添加关键词（右健->属性）
Private Sub Toolbar1_ButtonMenuClick(ByVal ButtonMenu As MSComctlLib.ButtonMenu)
Select Case ButtonMenu.Key
Case "Key1":
Case "Key2":
End Select
End Sub

fly_higher 2004-10-31

打赏
举报

???
嗯~~~
是下拉按钮中的选项.我该怎么响应?

luler 2004-10-31

打赏
举报

XXXX.

不是有一大堆东西出来备选了？

fly_higher 2004-10-31

打赏
举报

对了~ 还有怎么对菜单选项进行索引啊?
一个一个写代码太麻烦了!

tj123 2004-10-31

打赏
举报

Private Sub Toolbar1_ButtonMenuClick(ByVal ButtonMenu As MSComctlLib.ButtonMenu)
Select Case ButtonMenu.Key
Case "Key1":
Case "Key2":
End Select
End Sub

daisy8675 2004-10-31

打赏
举报

Private Sub Toolbar1_ButtonMenuClick(ByVal ButtonMenu As MSComctlLib.ButtonMenu)
Select Case ButtonMenu.Key '关键子
Case "NewContact"
msgbox "NewContact"
Case "NewOrder"
msgbox "NewOrder"
End Select
End Sub

czwwh 2004-10-31