Supprimer des controls de la form
Bonjour
J'ai une liste de pictureboxes ajoutés dynamiquement à me
le name de chacun est "lettres0" , "lettres1"
Code:
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15
| Private listlettre As New List(Of PictureBox)
private sub initialize()
For iter = 0 To 9
Dim thepiclettre As New PictureBox
With thepiclettre
.Name = "lettres" & iter.ToString
listlettre.Add(thepiclettre)
Me.Controls.Add(thepiclettre)
End With
next
end sub
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
initialize()
end sub |
Ce que je voudrais c'est de supprimer de la form les picturesbox nommés
lettres0 à lettres9
Code:
1 2 3 4 5 6 7 8 9
| Dim x As Integer = 10
For Each ctlr As Control In Me.Controls
If TypeOf ctlr Is PictureBox Then
If ctlr.Name.StartsWith("lettres") Then
x -= 1
ctlr.Dispose()
End If
End If
Next |
bizarre à la sortie de la boucle x =5 ? et pas tous les picturebox sont supprimés :?
merci