vb.net右击鼠标 vbs 点击鼠标

vb.net 鼠标右键事件

你是想使用右键菜单吧？

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

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

相关问答

Q1: 如何在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）模拟鼠标左键按下

Q2: VB.NET鼠标自动右击代码

调用api

在Visual Baisc.net中vb.net右击鼠标的声明vb.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）模拟鼠标左键按下

Q3: vb.net，我有一个鼠标右键点击的事件，我想在这个事件里面加入鼠标左键点击的动作，

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

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

你只需要找到这条语句vb.net右击鼠标，通常这句话应该在你的mouseclick事件中。

这条语句改成

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

就可以了vb.net右击鼠标！

^_^

vb.net右击鼠标的介绍就聊到这里吧，感谢你花时间阅读本站内容，更多关于vbs 点击鼠标、vb.net右击鼠标的信息别忘了在本站进行查找喔。