Visual Basic - ¿CÓMO HAGO UN FORMULARIO TRANSPARENTE?

¿Cómo puedo colocar un formulario transparente?...
Agradecería de antemano me pudieran guiar...

Si tienes alguna duda escribeme ...

Private Declare Sub SetWindowPos Lib "user32" (ByVal hwnd As Integer, _
ByVal hWndInsertAfter As Integer, ByVal X As Integer, ByVal Y As Integer, _
ByVal cx As Integer, ByVal cy As Integer, ByVal wFlags As Integer)

Private Declare Function SetWindowLong Lib "user32" Alias "SetWindowLongA" _
(ByVal hwnd As Long, ByVal nIndex As Long, ByVal dwNewLong As Long) As Long

Private Sub Form_Load()

Const GWL_EXSTYLE = (-20)
Const WS_EX_TRANSPARENT = &H20&
Const SWP_FRAMECHANGED = &H20
Const SWP_NOMOVE = &H2
Const SWP_NOSIZE = &H1
Const SWP_SHOWME = &H23
Const HWND_NOTOPMOST = -2

SetWindowLong Me.hwnd, GWL_EXSTYLE, WS_EX_TRANSPARENT
SetWindowPos Me.hwnd, HWND_NOTOPMOST, 0&, 0&, 0&, 0&, SWP_SHOWME

End Sub

Me da error de desbordamiento en esta linea:
SetWindowPos Me.hwnd, HWND_NOTOPMOST, 0&, 0&, 0&, 0&, SWP_SHOWM

¿Qúe esta malo?..

Yo creo que no está mal ...
Pon las declaraciones en el propio formulario si las declaras como privadas.

Ya están en el propio formulario, Papito...
pero me da el error número: 6 en tiempo de ejecución,
descripcion: Desbordamiento.
y se para en la última línea.

No creo que sea porque tengo el Windows 2000.

Vamos a ver:
El signo & que poneis detrás del 0 es un signo de declaración implicita de tipo. Esto significa que los ceros los estais declarando como Longs.
En el enunciado están declarados como integer.
Simplemente quítale los & a los ceros o en declara los parámetros de la función como Long en vez de Integer.

Estimada amiga:
En www.ambsoftware.com encontrarás varios ejemplos que te muestran cómo hacerlo.
Para localizarlos te recomiendo que utilices el buscador de recursos de la página principal y escribas en la casilla la palabra "transparente".
Espero que esta información te sirva de ayuda.
Fdo.- Alvaro Marín