Discussion :

[shayw]

Bonjour

J'ai une list of string que je parcours avec une boucle for.
Mais aussi je retire de la liste tous les items contenant un substring
le bug est que la liste est modifié et le for ne plus ètre effectué.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
 Private worddelete As String
     For Each item In listwords
              if ...... then
                 worddelete = item
                listwords.RemoveAll(AddressOf Removefromlist)
            End If
    next
 
   Private Function Removefromlist(str As String) As Boolean
        If str.Contains(worddelete) Then
            Return True
        End If
        Return False
    End Function

Merci

[tomlev]

Il faut créer une liste temporaire où tu mets tous les éléments à supprimer. Ensuite tu parcoures la liste temporaire, et tu supprimes chaque élément de listWords.

En l'occurrence tu pourrais faire quelque chose comme ça :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
    Dim wordsToDelete As New List(Of String)
    For Each item In listwords
            If ...... Then
                wordsToDelete.Add(item)
            End If
    Next
 
    For Each word In wordsToDelete
        listWords.RemoveAll(Function (str) str.Contains(word))
    Next

Au passage, l'utilisation d'une expression lambda évite de passer par un champ comme tu le faisais