怎样自定义鼠标右键？

zwmrp

怎样自定义鼠标右键？向大家学习学习!

zwmrp

没人知道？不可能吧!!!
是不是太过简单？

cxhgc

呵呵,可能这个太简单,让我来告诉你吧.
因为我也是菜鸟!

鼠标右键是指再accessa中的快捷菜单而已!

cxhgc

你随便新建一个菜单栏,然后在属性中将它选为弹出式即可.然后在工具栏中找到快捷菜单栏,选中以后,在出现的菜单栏中找到最后的那个自定义,这样就可以自己定义自己的鼠标右键拉.

另外,定义好以后,如果你在启动项里把默认的快捷菜单选为你自己的,那么所有窗体都是这一个"鼠标右键";如果不选这个,那么可以在某一个窗体的属性中的其他中找到一个快捷菜单的选项,选上自己的就可以拉!

andymark

先建立一个弹出式快捷菜单,用CommandBars("快捷菜单名").ShowPopup 就可以
Private Sub 主体_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
If Button = 2 Then
CommandBars("abcd").ShowPopup
End If

End Sub

aku1

学了点
顶