VB6中toolbar控件的“按钮菜单”如何非点击调用?

发布网友发布时间：2022-05-18 20:23

共1个回答

热心网友时间：2023-10-31 00:05

这个好像实现不了，vb只提供一个下拉菜单触发后的事件Toolbar1_ButtonDropDown，建议变通实现一下：用vb菜单（例：名字为 mnumain），button的style仍然是 tbdropdown，但不加ButtonMenu，然后利用ButtonDropDown事件：
'通过Toolbar调用
Private Sub Toolbar1_ButtonDropDown(ByVal Button As MSComctlLib.Button)
If Button = Toolbar1.Buttons(1) Then
PopupMenu mnumain
End If
End Sub
'通过按钮调用
Private Sub Command1_Click()
PopupMenu mnumain
End Sub

声明：本网页内容为用户发布，旨在传播知识，不代表本网认同其观点，若有侵权等问题请及时与本网联系，我们将在第一时间删除处理。E-MAIL:11247931@qq.com