Rendre transparent une picturebox

bonjour,
je cherche à rendre transparant une picturebox.
J'y arrive avec une form mais pas avec une picturebox dans une form.

Code:

---

1 2 3 4 5 6

Public Function TransRegion(frm As Form, TranslucenceLevel As Byte, Crk As Long) As Boolean SetWindowLong frm.hWnd, GWL_EXSTYLE, WS_EX_LAYERED SetLayeredWindowAttributes frm.hWnd, Crk, TranslucenceLevel, &H3   TransRegion = Err.LastDllError = 0 End Function

---

Code:

---

1 2 3

Private Sub CacheRouge_Change() Call TransRegion(Moteur.CacheRouge, 200, RGB(255, 0, 0)) End Sub

---

Une idée ?
merci

Salut

Tu es sûr que c'est du code VB6? ou plutôt du vb.net ?

Bonjour ProgElecT
C'est bien du VB6 :)

En complément je précise que je lance ma picture box de la facon suivante :

Code:

---

Moteur.CacheRouge.visible = true

---

Re

Ok
Regardes dans mes contributions, repaires entre autre MovAfiTransp.zip : Image, couleur transparente, DragDrop affichage durant déplacement