Drag 'n drop

It's represented by Source.

Private Sub Form_DragDrop(Source As Control, X As Single, Y As Single)
    'Move the "Source" to a new location
    Source.Move X, Y
End Sub