Move borderless form.

[DerekM]

Add this and take out all of your moving code:

Protected Overrides Sub WndProc(ByRef e As Message)
         MyBase.WndProc(e)
         If e.Message = &H84 AndAlso e.Result = &H1 Then e.Result = &H2
End Sub

That doesn't really want to work for me. e.message is underlined.