Urgente. Arrastrar formulario

Añade a tu formulario un control cualquiera, un label con bordes, por
ejemplo con este código:

Private pos As Point

Private Sub Label1_MouseMove(ByVal sender As Object, ByVal e As
System.Windows.Forms.MouseEventArgs) Handles Label1.MouseMove
If e.Button = MouseButtons.Left Then
Me.Location = New Point(e.X - pos.X + Me.Left, e.Y - pos.Y + Me.Top)
End If
End Sub

Private Sub Label1_MouseDown(ByVal sender As Object, ByVal e As
System.Windows.Forms.MouseEventArgs) Handles Label1.MouseDown
pos = New Point(e.X, e.Y)
End Sub

Juan Carlos Badiola
MVP - C#