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 vote240 views1 answer
Unity slider not empty
C#Unity
0 vote172 views1 answer
Base64 decode how used in c#
C#
15 votes226 views3 answers
C# get today's date
C#
92 votes234 views5 answers
C# random number between
C#
0 vote156 views1 answer
Mvc session key exists
C#
-1 vote159 views1 answer
C# unhandled exception in thread
C#
11 votes203 views1 answer
Unity to integer
C#Unity
0 vote165 views7 answers
C++ convert to assembly language
C#
3 votes158 views2 answers
C# get path without filename
C#
0 vote219 views1 answer
EF will not create columns RULE
C#