vb.net鼠标左键 vb 鼠标移动

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中用程序控制鼠标移动和点击

调用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中,如何实现鼠标在listbox控件上移动时,鼠标所到的条目背景变黑、字变白；移开后还原?

复杂vb.net鼠标左键的不会vb.net鼠标左键，来点儿简单的，借用在listbox里按下鼠标时再移动，会高亮显示选择行，并且会随鼠标移动而变化的这一特点改进的，不足之处是在listbox里，此时处于鼠标左键在按下状态。

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 '模拟鼠标左键按下

Private Sub ListBox1_MouseMove(sender As Object, e As MouseEventArgs) Handles ListBox1.MouseMove

mouse_event(MOUSEEVENTF_LEFTDOWN, 0, 0, 0, 0)

End Sub

Q3: vb.net如何去除光标

改变鼠标位置或让鼠标消失。

Shift + 方向键 vb.net鼠标左键，选择 从当前光标至移动后光标所在位置vb.net鼠标左键的所有文本

Ctrl+Shift+左右方向键，选择 从当前光标至下一(上一)单词首(尾)

Shift + Alt + 方向键，选择 由当前光标与 移动后光标所构成的矩形的区域内所有文本

Ctrl + 单击鼠标左键， 选择 单击位置的整个单词

Shift + 单击鼠标左键，选择 从当前光标至 鼠标单击位置区间的所有文本

Shift + Home(End)， 选择 从当前光标至 行首(尾)的所有文本

Q4: 求大神指点vb.net 怎么实现鼠标左键按住在移动鼠标达到选中文件的效果呀.我用mouse_even没有效果.

看图片背景，我又试了下资源管理器，文件是选中的状态

选中文件和选中文字，背景色是不同的

关于vb.net鼠标左键和vb 鼠标移动的介绍到此就结束了，不知道你从中找到你需要的信息了吗 ？如果你还想了解更多这方面的信息，记得收藏关注本站。