Arrastrar form, como?

[cristianceci]

Pues la verdad no entendi nada, pero ya encontre una forma (la encontre provando)

y aqui las dejo por si lo quieren:

Código:

    Dim estabax As Integer
    Dim estabay As Integer
Private Sub Form1_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles Me.MouseDown
        estabax = e.X
        estabay = e.Y
    End Sub

    Private Sub Form1_MouseMove(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles Me.MouseMove
        If estabax <> 0 Then
            Me.Left = Me.Left + (e.X - estabax)
            Me.Top = Me.Top + (e.Y - estabay)
        End If
    End Sub

    Private Sub Form1_MouseUp(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles Me.MouseUp
        estabax = 0
        estabay = 0
    End Sub

Y es muy sencillo, pero gracias de todas maneras.