Precisando de um formulário Transparente ?

1-) Inicie um novo projeto no Visual Basic e insira um modulo no seu projeto e um botão de comando - Command1.

2-) A seguir copie o código abaixo para o módulo :

Public Const SWP_FRAMECHANGED = &H20
Public Const SWP_NOMOVE = &H2
Public Const SWP_NOSIZE = &H1
Public Const SWP_SHOWME = SWP_FRAMECHANGED Or SWP_NOMOVE Or SWP_NOSIZE
'------------------------------------------------------------
Public Const HWND_NOTOPMOST = -2
'------------------------------------------------------------
Declare Function SetWindowLong Lib "user32" _
Alias "SetWindowLongA" (ByVal hwnd As Long, ByVal nIndex As Long, _
ByVal dwNewLong As Long) As Long
'------------------------------------------------------------
Declare Function SetWindowPos Lib "user32" _
(ByVal hwnd As Long, ByVal hWndInsertAfter _
As Long, ByVal x As Long, ByVal y As Long, _
ByVal cx As Long, ByVal cy As Long, _
ByVal wFlags As Long) As Long
Código do módulo para fazer o formulário transparente

3-) Agora insira o seguinte código no evento click do botão command1 ( dê ao botão um nome sugestivo ...)

Private Sub Command1_Click()

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


End Sub

Código do botão de comando - command1 

4-) Rode o projeto e veja o form ( se puder... :-)))) )

Até a próxima...