I couldn't get it to work with the Public [Shared[lt]DllImportAttribute] declaration. I imported System.Runtime.InteropServices. It kept saying declaration expected on the less-than symbol after shared :( I don't know what I missed... Anyway what you gave me led me to find the following that did work for me. These are the only two lines that changed.

Declare Auto Function ReleaseCapture Lib "user32.dll" () As Boolean
Declare Auto Function SendMessage Lib "user32.dll" (hWnd As IntPtr, Msg As Integer, wParam As Integer, lParam As Integer) As Integer


Thanks again,
Joe.

>Hi Joe,
>
>You don't need to change too much of your original code. Here are the revisions:
>
>

>' Import
>Imports System.Runtime.InteropServices
>
>' Under Programming space
>Const WM_NCLBUTTONDOWN As Integer = &HA1
>Public Const HTCAPTION As Integer = &H2
>
>Public Shared<DllImportAttribute("user32.dll")>  _
>Function SendMessage(hWnd As IntPtr, Msg As Integer, wParam As Integer, lParam As Integer) As Integer
>
>Public Shared<DllImportAttribute("user32.dll")>  _
>Function ReleaseCapture() As Boolean
>
>' On Mouse Down (object where you want to drag)
>ReleaseCapture()
>SendMessage(Handle, WM_NCLBUTTONDOWN, HTCAPTION, 0)
>

>
>
>>Previously I used the following code to move the form. I don't know how to do this in .NET? Anyone know how?
>>
>>

>>' Declarations
>>    Public Declare Function ReleaseCapture Lib "user32" () As Long
>>    Public Declare Function SendMessage Lib "user32" Alias "SendMessageA" _
>>                              (ByVal hWnd As Long, ByVal wMsg As Long, _
>>                              ByVal wParam As Long, ByVal lParam As Long) As Long
>>
>>' In the form or object that can be used to move the form
>>    Private Sub object_MouseDown()
>>        ReleaseCapture()
>>        SendMessage(Me.hwnd, &HA1, 2, 0&)
>>    End Sub
>>