锐客网

  1. 首页 > 睿知 > it技术 > >

vb.net鼠标单击 vb 鼠标

IT技术鼠标

如何在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）模拟鼠标左键按下
vb.net 如何获取鼠标单击的控件名称这个简单 。
在VB.net中，每个事件都对应有两个参数：sender 和 e。提取 sender 参数信息就可以获取控件名称 。如果不理解其中机制，你直接 msgbox(sender) 将其输出 ， 就能查看其中玄机 。
获取控件名称代码：CType(sender, Control).Name 。
vb.net 怎样获取鼠标单击点的坐标通过窗体vb.net鼠标单击的MouseDown事件vb.net鼠标单击的e.X和e.Y属性获取 。通过e.Location属性获取Point类型vb.net鼠标单击的坐标 。
下面的代码示例使用 Location 属性跟踪鼠标左键单击vb.net鼠标单击 ， 并绘制一系列直线段作为对用户输入的响应 。如果隐藏窗体然后重新显示它，此示例不保留已绘制的线段，该代码为简单起见而被省略了 。
Dim FirstPoint As Point
Dim HaveFirstPoint As Boolean = False
【vb.net鼠标单击 vb 鼠标】Sub Form1_MouseDownDrawing(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles Me.MouseDown
If HaveFirstPoint Then
Dim g As Graphics = Me.CreateGraphics()
g.DrawLine(Pens.Black, FirstPoint, e.Location)
HaveFirstPoint = False
Else
FirstPoint = e.Location
HaveFirstPoint = True
End If
End Sub
vb.net中,如何实现鼠标在listbox控件上移动时,鼠标所到的条目背景变黑、字变白；移开后还原?复杂的不会，来点儿简单的，借用在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
关于vb.net鼠标单击和vb 鼠标的介绍到此就结束了，不知道你从中找到你需要的信息了吗 ？如果你还想了解更多这方面的信息 ， 记得收藏关注本站 。

    推荐阅读


    上一篇：辽源专注sap维护服务，辽源专注sap维护服务有限公司

    下一篇：关于ent还是net的冒险解谜游戏的信息