jmfmarques
Messages postés7666Date d'inscriptionsamedi 5 novembre 2005StatutMembreDernière intervention22 août 201427 29 oct. 2006 à 18:14
Ne mets pas ton image de fond dans une PictureBox mais directement sur ta Form (propriété Picture de ta form)
Sur ta Form : place un cadre nommé Frame1 (à cheval sur ton image de fond ou complètement sur l'image)
dans ce cadre : place un contrôle image nommé image1
mets 2 ou 3 contrôles de ton choix dans le cadre (pour voir l'effet)
Code :
Option Explicit
Private Sub Form_Initialize()
Me.ScaleMode = 3
frame_transparent Frame1, Me, Image1
End Sub
Sub frame_transparent(cadre As Frame, f As Form, imaj As Image)
With cadre
.BorderStyle = 0
.ZOrder
.BackColor = f.BackColor
End With
With imaj
.ZOrder 1
.Picture = f.Picture
.Move -cadre.Left * Screen.TwipsPerPixelX, -cadre.Top * Screen.TwipsPerPixelY
End With
End Sub