Problème suppression objet dans une collection
Bonjour, Je suis débutant en VB.NET et j'ai un problème avec un programme que je mets en place.
Je m'explique: j'ai créer une collection de films et j'aimerais supprimer un film de cette collection en cliquant sur un bouton lorsque le "dit" film est sélectionné. Avec mon bout de code j'arrive à le supprimer mais l'appli plante dès qu'il a été supprimé en invoquant: InvalidOperationException
Voici le code:
Code:
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17
| Private Sub Supprimer_Click(sender AsObject, e AsEventArgs) Handles Supprimer.Click
For Each Film As Films In ListeDeFilms
'For i As Integer = 0 To Liste.Items.Count - 2
Dim Rep AsInteger
If Liste.SelectedItem = Film.Name Then
Rep = MsgBox("Voulez-vous vraiment supprimer ce film?", 0, "Confirmation de Suppression")
If Rep = 1 Then
Liste.Items.Remove(Liste.SelectedItem)
ListeDeFilms.Remove(Film)
MsgBox("Votre film a été supprimé", 0, "Confirmation")
'i = i - 1
MiseAJour()
EndIf
EndIf
'Next
Next
End Sub |