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 vote114 views1 answer
Show Form on Second Monitor
C#
1 vote135 views1 answer
Nested dictionary c#
C#
0 vote122 views1 answer
C# oracle transaction commit example
C#
0 vote117 views1 answer
C# Change color
C#
1 vote114 views3 answers
Sort a dictionary by value in c#
C#
1 vote107 views1 answer
What is namespace in c#
C#
3 votes124 views2 answers
C# open file
C#
1 vote119 views1 answer
C# remove accents
C#
14 votes128 views5 answers
Modal dismiss
C#
0 vote111 views1 answer
Unity c# public all codes
C#