Integer variable &HA1

[Roseholmes]

       
 Me.Capture = False
        Dim msg As Message = Message.Create(Me.Handle, &HA2, New IntPtr(2), IntPtr.Zero)
        Me.DefWndProc(msg)

this is the code of moving form in mousemove event.,but how it is work?