Brig to front picturebox Résolu

Question

Bonjour

j'ai 10 picturebox couleur bleu de taille x 
et aussi 10 picturebox couleur rouge de taille x/2
je place les picturebox rouge au milieu de chaque
picturebox bleu ,le problème est que les picturesbox rouges restent invisibles

 Private listpic As New List(Of PictureBox)
 Private Sub test()
     For iter As Integer = 0 To 9
         Dim pic As New PictureBox
            With pic
                .Width = 40
                .Height = 40
                .Location = New Point(10 + iter * (.Width + 40), 420)
                .BackColor = Color.Blue
            End With
            listpic.Add(pic)
            Me.Controls.Add(pic)
        Next
        For iter As Integer = 0 To 9
            Dim pic As New PictureBox
            With pic
                .Width = 20
                .Height = 20
                .Location = New Point(listpic(iter).Left + 20, listpic(iter).Top + 20)
                .BackColor = Color.Red
                .BringToFront()
            End With
            Me.Controls.Add(pic)
        Next
    End Sub

merci

Utilisateur anonyme · Accepted Answer

Bonsoir ShayW,

C'est tout simplement parce que tu n'as pas encore incorporé tes contrôles au formulaire donc BringToFront ne sert à rien.

En résumé, Me.Controls.Add doit être placé avant BringToFront.

Brig to front picturebox

1 réponse

Votre réponse

Discussions similaires