Question

求大神指点vb.net 怎么用SendInput来实现鼠标移动到指定位置呢?

求大神指点vb.net 怎么用SendInput来实现鼠标移动到指定位置呢?

Answer 1

您好，建议您使用mouse_event或者 Cursor.Position来实现。例如：

1. 您需要将鼠标移动dx, dy的位置。

Public Sub MouseMoveBy(ByVal dx As Integer, ByVal dy As Integer)
        Cursor.Position = New Point(Cursor.Position.X + dx, Cursor.Position.Y + dy)
    End Sub

或者

Public Sub MouseMoveBy(ByVal dx As Integer, ByVal dy As Integer)
        mouse_event(0, dx, dy, 0, 0)
    End Sub

2. 您需要将鼠标移动到x, y的位置

    Public Sub MouseMoveTo(ByVal x As Integer, ByVal y As Integer)
        Cursor.Position = New Point(x, y)
    End Sub

请您试一下。