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

VB.NET中右键出现新窗口的问题

上面的回答不完美，在窗口的任意地方右击都会弹出窗口，所以要力求完美，必须先判断红框的坐标，在红框范围内再弹出窗口 If e.Button = Windows.Forms.MouseButtons.Right Then If e.X 153 And e.X 601 And e.Y 1 And e.Y 25 Then '红框的坐标范围，在这个范围内右击有效（获取的技巧见下面） Form2.ShowDialog() End If End If 小技巧： 如何获取你限定的红色框的范围？ 用mousemove事件和一个label控件做测试： Private Sub Form1_MouseMove(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles Me.MouseMove Label1.Text = e.X "=" e.Y End Sub 记录下坐标即可！

相关问答

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，我有一个鼠标右键点击的事件，我想在这个事件里面加入鼠标左键点击的动作，

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

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

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

这条语句改成

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

就可以了！

^_^

Q3: vb.net如何写在form1上右键被单击的事件?

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

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

'这里写vb.net右击事件你要的代码

End If

End Sub

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

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