|
-
Apr 2nd, 2019, 12:56 PM
#17
Thread Starter
Member
Re: [RESOLVED] Draggable Form
 Originally Posted by .paul.
Code:
Private Sub Control_MouseMove(sender As Object, e As System.Windows.Forms.MouseEventArgs) _
Handles PictureBox1.MouseMove
Static lpos As Point
If e.Button = Windows.Forms.MouseButtons.Left Then
me.Location += New Size(e.X - lpos.X, e.Y - lpos.Y)
Else
lpos = e.Location
End If
End Sub
Ah Me.MouseMove was the problem. I'm not familiar with Me. at all. Thanks a bunch paul!
Tags for this Thread
Posting Permissions
- You may not post new threads
- You may not post replies
- You may not post attachments
- You may not edit your posts
-
Forum Rules
|
Click Here to Expand Forum to Full Width
|