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

1 vote256 views1 answer
Urlreferrer in asp.net core
C#
0 vote323 views1 answer
Missing integer c#
C#
0 vote276 views1 answer
.net form binding why cant i skip index
C#
5 votes276 views2 answers
Regions unity
C#Unity
0 vote259 views1 answer
Close an open form when you open it again c#
C#
0 vote255 views1 answer
Arabic lorem ipsum
C#
29 votes276 views3 answers
Online embedded c compiler
C#
0 vote267 views1 answer
Add-migration is not recognized
C#
2 votes245 views1 answer
GetMousebuttonDown unity
C#
1 vote237 views1 answer
Xamarin picker item
C#