vb.net鼠标右击事件的简单介绍

VB.NET鼠标自动右击代码

调用api

在镇原等地区，都构建了全面的区域性战略布局，加强发展的系统性、市场前瞻性、产品创新能力，以专注、极致的服务理念，为客户提供成都网站制作、成都网站建设网站设计制作按需定制制作,公司网站建设,企业网站建设,品牌网站制作,全网营销推广,成都外贸网站建设,镇原网站建设费用合理。

在Visual Baisc.net中的声明：

Declare Sub mouse_event Lib "user32" (ByVal dwFlags As Long, ByVal dx As Long, ByVal dy As Long, ByVal cButtons As Long, ByVal dwExtraInfo As Long)

Public Const MOUSEEVENTF_LEFTDOWN = H2 '模拟鼠标左键按下

Public Const MOUSEEVENTF_LEFTUP = H4 ’模拟鼠标左键释放

Public Const MOUSEEVENTF_MIDDLEDOWN = H20 '模拟鼠标中间键按下

Public Const MOUSEEVENTF_MIDDLEUP = H40 '模拟鼠标中间键释放

Public Const MOUSEEVENTF_RIGHTDOWN = H8 '模拟鼠标右键按下

Public Const MOUSEEVENTF_RIGHTUP = H10 '模拟鼠标右键释放

Public Const MOUSEEVENTF_MOVE = H1 '模拟鼠标指针移动

例：

mouse_event MOUSEEVENTF_LEFTDOWN,10,10,0,0

'在（10，10）模拟鼠标左键按下

你已经有了“鼠标右键点击的事件”

说明你肯定已经有了if e.button=windows.forms.mousebuttons.right then

你只需要找到这条语句，通常这句话应该在你的mouseclick事件中。

这条语句改成

if e.button=windows.forms.mousebuttons.left or e.button=windows.forms.mousebuttons.right then

就可以了！

^_^

你是想使用右键菜单吧？

例如给picturebox添加右键菜单可以这样：

从工具箱拖一个ContextMenuStrip到窗体上，然后自己添加你喜欢的菜单项，然后把PictureBox的ContextMenuStrip属性设置为你你刚添加的哪个ContextMenuStrip，下拉列表里会有你刚刚添加的控件的！

如果是窗体右键单击事件，是

Private Sub Form1_MouseClick(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles Me.MouseClick

If e.Button = Windows.Forms.MouseButtons.Right Then

'这里写你要的代码

End If

End Sub

但是如果只是右键单击就弹出菜单的话没必要这样，只需要在窗体上放置一个ContextMenuStrip控件，然后在Form的ContextMenuStrip属性中绑定这个控件就可以了。

本文题目：vb.net鼠标右击事件的简单介绍
URL标题：http://cdiso.cn/article/docepgs.html