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

2 votes240 views2 answers
C# dictionary values to list
C#
0 vote252 views1 answer
Unity 2D mouse look at cursor
C#Unity
9 votes266 views3 answers
3d perlin noise unity
C#Unity
0 vote230 views1 answer
Winforms C# code cross thread operation is not valid
C#
0 vote269 views1 answer
C# remove numericUpDown white space
C#
0 vote238 views2 answers
GridViewColumn url wpf
C#
0 vote274 views2 answers
How to loop through a list and skip first element in c#
C#
1 vote252 views2 answers
C# 2d list
C#
1 vote274 views1 answer
Unity add addressables
C#Unity
0 vote260 views1 answer
Replace index in string c#
C#