Visual Basic - Mover ventana

Hola amigos que tal, necesito el codigo para mover una ventana, hice mi propio diseño de ventana(BorderStyle = 0) pero nose que codigo utilizar para moverla, es decir el codigo para mi barra de titulo, me imagino que es en el mousedown y mouseup pero nose que codigo aplicar, gracias.

Pega esto en la parte de declaraciones
Const WM_NCLBUTTONDOWN = &HA1
Const HTCAPTION = 2
Private Declare Function ReleaseCapture Lib "user32" () As Long
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

Y pega esto en el evento MousMove de lo que quieras por donde se mueva.
Call ReleaseCapture
Call SendMessage(Me.hwnd, WM_NCLBUTTONDOWN, HTCAPTION, 0&)

Suerte.