Joined
Last Seen
0 Reputation Points
Unknown Quality Score
No one has voted on any posts yet. Votes from other community members are used to determine a member's reputation amongst their peers.
0 Endorsements
Ranked #107.73K
1 Posted Topic
Or just simply add this * Dim xm as integer * Dim ym as integer Private Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single) * if button = 1 then * me.left = me.left + X - xm * me.top = me.top + Y - …
The End.