2015-06-25 3 views
1

Здравствуйте я хочу, чтобы переместить курсор в X, Y координаты в коробке изображения я получаю мои координаты от моего Sub Как этоVb.Net Перемещение мыши внутри PictureBox

Private Sub Timer1_Tick(sender As Object, e As EventArgs) Handles Timer1.Tick 
    LocalMousePosition = PictureBox1.PointToClient(Cursor.Position) 

    txt_MouseLoc.Text = ("X=" & LocalMousePosition.X & "," & "Y= " & LocalMousePosition.Y) 
End Sub 

теперь говорят, х = 100 и Y = 100

я хочу, чтобы нажать на кнопку и переместите мышь, чтобы ... как вы уже догадались X100 Y100

, но я использую это, чтобы переместить мышь

Windows.Forms.Cursor.Position = New Point(x, y) 
     Thread.Sleep(2000) 
     Do_LMouseClick() 
     Thread.Sleep(2000) 

перемещает мышь x100 и Y100 в соответствии с экрана и не picturebox1

я не пытался

MouseLocation = picturebox1.pointtoscreen(x,y) 

но не идут какие-нибудь идеи? заранее спасибо!

+0

Да! .. Это получилось. теперь мышь движется немного ближе, она находится в диапазоне, она около нескольких пикселей, но определенно ближе, чем раньше. – db35m

+0

ОК, извините за удаление комментария по ошибке ... Хм, смещение может быть оконной строкой заголовка в верхней части –

+0

да .. также у меня есть MenuStrip ... я добавил +24, чтобы компенсировать Y, и теперь это выстраивается! Благодарю человека! – db35m

ответ

1

расположению необходимо добавить местоположение формы и местоположение PictureBox в:

Windows.Forms.Cursor.Position = New Point(x + Me.Location.X + PictureBox1.Location.X, _ 
              y + Me.Location.Y + PictureBox1.Location.Y) 

ОБНОВЛЕНИЕ:

строки заголовка формы в должна быть компенсирована путем добавления его высоты в уравнении Y.

Смежные вопросы