Question

VB 禁止鼠标右键 怎样实现

VB 禁止鼠标右键 怎样实现
自己解决的谢谢你的回答

我的没你这么长哦。 ,.

Answer 1

两种办法：
1.
Private Function MyWndProc(ByVal hwnd As Long, ByVal message As Long, ByVal wParam As Long, ByVal lParam As Long) As Long
Select Case message
case WM_RBUTTONDOWN:
exit function
End Select

MyWndProc = CallWindowProc(oldWin_proc, hwnd, message, wParam, lParam)
End Function
把要屏蔽的控件的消息处理程序用MyWndProc来取代替
2.如果仅仅是某个控件

可以在mouse的按键时间里面
判断：
如果button=rightbutton
button＝0