How to move borderless form (100% EASY) in VB.Net

Hey guys well form properties with formborderstyle - None is very good option
for customizing your form.
But the problem with this is we can't make our form draggable/movable.
I have a very good solution for this problem

                Borderless Form Example

Just go to your form code & paste this code below public class form1 :

Const WM_NCHITTEST As Integer = &H84 Const HTCLIENT As Integer = &H1 Const HTCAPTION As Integer = &H2 Protected Overrides Sub WndProc(ByRef m As Message) Select Case m.Msg Case WM_NCHITTEST MyBase.WndProc(m) If m.Result = HTCLIENT Then m.Result = HTCAPTION Case Else MyBase.WndProc(m) End Select End Sub

Note  : Here form1 is your form name