cs_casy
Messages postés7741Date d'inscriptionmercredi 1 septembre 2004StatutMembreDernière intervention24 septembre 201440 28 sept. 2006 à 22:28
Avec les différentes réponses que l'on t'a donné depuis quelques jours, tu aurais pu trouver.
Dim PBCollection As New Collection
Dim PBTemp As PictureBox
For i As Integer = 1 To 50
PBCollection.Add(New PictureBox)
PBTemp = PBCollection(i)
PBTemp.Location = New Point(i - 1) * 10, 0)
PBTemp.Size = New Size(10, Me.Height)
PBTemp.BackColor = Color.FromArgb(i * 5, i * 5, i * 5)
PBTemp.Visible = True
PBTemp.Parent = Me
Next
<small>Coloration syntaxique
automatique</small>
---- Sevyc64 (alias Casy) ----<hr size="2" width="100%" /># LE PARTAGE EST NOTRE FORCE #