Vb.net drag window without titlebar

Public Const WM_NCLBUTTONDOWN As Integer = &HA1 
Public Const HT_CAPTION As Integer = &H2 

<DllImportAttribute("user32.dll")> _ 
Public Shared Function SendMessage(ByVal hWnd As IntPtr, ByVal Msg As Integer, ByVal wParam As Integer, ByVal lParam As Integer) As Integer
End Function

<DllImportAttribute("user32.dll")> _ 
Public Shared Function ReleaseCapture() As Boolean
End Function

Private Sub Form1_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles Me.MouseDown, Panel1.MouseDown 
    If e.Button = Windows.Forms.MouseButtons.Left Then
        ReleaseCapture() 
        SendMessage(Handle, WM_NCLBUTTONDOWN, HT_CAPTION, 0) 
    End If
End Sub

Source: stackoverflow.com

Similar codes

0 vote327 views1 answer
Android jaca how to pass a imageurl in a recyclerview adapter
C#
4 votes320 views1 answer
Change textbox location C#
C#
0 vote315 views1 answer
How to convert pdfdocument to binary in c#
C#
3 votes345 views1 answer
New color unity
C#Unity
4 votes318 views1 answer
Changing euler angles unity
C#
-2 votes351 views1 answer
Unity multiplayer Photon
C#Unity
0 vote353 views1 answer
C# ip address to string
C#
1 vote313 views1 answer
Unity round to x decimals
C#
0 vote311 views1 answer
C# write to lines without extra line
C#
1 vote317 views1 answer
How to convert from hexadecimal to binary in c#
C#