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 vote313 views1 answer
How to destroy bridges animal crossing
C#
0 vote374 views1 answer
Unity deactive all object in list
C#Unity
14 votes322 views2 answers
How to move player with transform. position
C#
0 vote389 views1 answer
Unity change fixed timestep in code
C#Unity
24 votes360 views3 answers
String to date vb
C#
1 vote372 views1 answer
Xamarin forms open new page on button click
C#
-1 vote345 views1 answer
C# fileinfo filename without extension
C#
3 votes357 views1 answer
Unity how to change the text on a button
C#
3 votes389 views1 answer
Unity mouse scroll wheel axis
C#
0 vote440 views1 answer
How to store some variables on the device in unity
C#Unity