Réponse acceptée !
Salut,
essai ça :
Private WithEvents NewLabel As Label 'à mettre dans les déclarations
'puis, dans ton code:
Set NewLabel = Controls.Add("VB.Label", "NewLabel")
With NewLabel
.Visible = True
.Text = "met le texte que tu veux"
.Top = xx
.Left = xx
.Width = met la longueur
.Height = met la hauteur
End With
Voilà,
@++
Mortalino
Le Mystérieux Chevalier "Provençal, le Gaulois"
|