• Home
 · 
• Custom Controls/Forms/Menus
 · 
• Drag & Move any form with or without CaptionBar by dragging it form any place on form.Very simple c

Drag & Move any form with or without CaptionBar by dragging it form any place on form.Very simple c

Drag & Move any form with or without CaptionBar by dragging it form any place on form.Very simple code, without any complicated declarations

Rate Drag & Move any form with or without CaptionBar by dragging it form any place on form.Very simple c

• 1
• 2
• 3
• 4
• 5

(1(1 Vote))

'That's all !!

Public xMeLeft, xMeTop

Private Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
xMeLeft = X - Me.Left: xMeTop = Y - Me.Top
End Sub

Private Sub Form_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single)
Me.Move X - xMeLeft, Y - xMeTop
End Sub