以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- treeview控件快捷菜单 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=109893) |
-- 作者:yxliang2012 -- 发布时间:2017/11/22 12:42:00 -- treeview控件快捷菜单 请教如何实现右键点击treeview不同支点,能弹出不同快捷菜单。 [此贴子已经被作者于2017/11/22 12:43:13编辑过]
|
-- 作者:有点蓝 -- 发布时间:2017/11/22 14:25:00 -- mouseup事件 If e.Sender.Selectednode IsNot Nothing Then If e.Sender.Selectednode.text = "a" Dim m As RibbonMenu.ContextMenu = ContextMenus("快捷菜单1") m.Show(e.Sender,e.x,e.y) Else Dim m As RibbonMenu.ContextMenu = ContextMenus("快捷菜单2") m.Show(e.Sender,e.x,e.y) End If End If |
-- 作者:yxliang2012 -- 发布时间:2017/11/22 14:35:00 -- ok 谢谢 |