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

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

就可以了！

^_^

相关问答

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

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

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属性中绑定这个控件就可以了。

Q2: vb.net 鼠标右键事件

你是想使用右键菜单吧？

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

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

Q3: vb鼠标右键双击事件

先说明几点:

1.不是所有的对象,都有双击事件(zhangfeizimo在前面说过了)

2.支持双击事件的对象,在触发这个事件时,并不识别是不是右键

3.能识别右键的事件,不区分是单击还是双击

所以,如果用系统的自带单一事件,是不能直接完成你想的目的

不过,可以变通,将几个事件结合起来,就可以实现,看看下面的方法:

Dim

LastButton

As

Integer

Private

Sub

Form_DblClick()

If

LastButton

=

2

Then

Text1.Text

=

2

End

If

End

Sub

Private

Sub

Form_MouseUp(Button

As

Integer,

Shift

As

Integer,

X

As

Single,

Y

As

Single)

LastButton

=

Button

End

Sub

Q4: vb中如何响应鼠标右击事件

Private Sub Label1_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)

Select Case Button

Case 1

Label1.Caption = " 左"

Case 2

Label1.Caption = " 右"

Case 4

Label1.Caption = " 中"

End Select

End Sub

button 返回一个整数，用来标识该事件的产生是按下 ( MouseDown ) 或者释放 ( MouseUp ) 按钮引起的。button 参数是具有相应于左按钮（位 0），右按钮（位 1），以及中间按钮（位 2）的一个位字段。这些位的值分别等于 1，2，和 4。其中仅有一位被设置，指示出引起该事件的那个按钮。

Q5: 我在用VB.NET集成了一个带界面.OCX的控件，怎么修改它的鼠标事件？我想修改它的右键菜单？

楼主不要生气，由于百度在其它地方答题无法累加到团队答题中。我只想保卫我的小团队，所以灌水了。

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