Form transparent?

[lpeek]

how would i set the form transparent? (but i still want to be able to see the forms picture which is a transparent GIF image, i just want the bits of the form i can see to be transparent.
please give in detail as this need to be done very quickly and im not that advanced in VB.
cheers

[ober0330]

search the forums. This has been asked before.

[adzzzz]

This has been answered many times before, but here ya go anyway.

Const LWA_COLORKEY = &H1
Const LWA_ALPHA = &H2
Const GWL_EXSTYLE = (-20)
Const WS_EX_LAYERED = &H80000
Private Declare Function GetWindowLong Lib "user32" Alias "GetWindowLongA" (ByVal hWnd As Long, ByVal nIndex As Long) As Long
Private Declare Function SetWindowLong Lib "user32" Alias "SetWindowLongA" (ByVal hWnd As Long, ByVal nIndex As Long, ByVal dwNewLong As Long) As Long
Private Declare Function SetLayeredWindowAttributes Lib "user32" (ByVal hWnd As Long, ByVal crKey As Long, ByVal bAlpha As Byte, ByVal dwFlags As Long) As Long
Private Sub Form_Load()
    'KPD-Team 2000
    'URL: [url]http://www.allapi.net/[/url]
    'E-Mail: [email][email protected][/email]
    Dim Ret As Long
    'Set the window style to 'Layered'
    Ret = GetWindowLong(Me.hWnd, GWL_EXSTYLE)
    Ret = Ret Or WS_EX_LAYERED
    SetWindowLong Me.hWnd, GWL_EXSTYLE, Ret
    'Set the opacity of the layered window to 128
    SetLayeredWindowAttributes Me.hWnd, 0, 128, LWA_ALPHA
End Sub

[lpeek]

thanks but that sets the whole form translucent, how would i set just the form backcolor transparent but still be able to see the forms picture Opaque?
(the forms backcolor is &H8000000F& if that helps?)

[ober0330]

again, search the forum.

[Andy]

maybe he has searched the forums. instead of taking time to say someone has a fault, why don't you take that same time and maby give a link to the thread that YOU know exists? Why not give this man a fishing rod instead of shutting the door in his face? It's possible the threads you all have seen arent being pulled by his search methods. I for one don't have all night to search so that's why I take advantage to the reason forums were created: to ask questions.

My opinion is you shouldn't answer at all if you're not going to help.