Visual Basic - Mover un control en tiempo de ejecución

Me gustaría saber qué código debo utilizar, o cómo se puede conseguir que un usuario mueva un control de un sitio a otro de un formulario, estando colocado el control previamente en el formulario.
Gracias de antemano.

Hola que tal.
Con este código se puede mover un boton en tiempo de ejecución
Private Declare Function SendMessage Lib "user32" Alias "SendMessageA" (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, lParam As Any) As Long
Private Declare Function ReleaseCapture Lib "user32" () As Long

Private Sub Command1_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
ReleaseCapture
SendMessage Command1.hwnd, &H112&, &HF012&, 0
End Sub
Pero el evento Click no responde. No se si es esto lo qu andas buscando.
Un saludo

Muchas gracias, es lo que necesito.

hola, he probado el codigo en vb6 y funciona bien con muchos controles, pero otros como label o image no tienen esa propiedad, como podria hacerse para mover cualquier control. gracias