Ok j'ai corrigé ça !
J'ai du mal à assimiler pour le string builder. Il s'agit d'une espece de boite où je vais ajouter au fur et à mesure des strings grâce à Append, et à la fin j'ajoute la boite à ma liste ? C'est ça ?
J'ai fais ça, mais j'imagine que j'ai rien compris, vu que ça empire de 4 secondes .
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18 Shared Function IdentifierLog(ByVal CheminFichier As String, ByVal Regex As Regex) As List(Of String) Dim listeRecomposee As New List(Of String) Dim listeDeString As List(Of String) = LogManager.LireFichier(CheminFichier) Dim builder As New StringBuilder("") For Each ligne In listeDeString ' Si la ligne est un nouveau log, alors on ajoute ce que contenait jusque là le buider. If Regex.Match(ligne).Success Then listeRecomposee.Add(builder.ToString()) builder.Length = 0 builder.Append(ligne) ' Sinon la ligne n'est pas un nouveau log, on l'ajoute au builder Else builder.Append(ligne) End If Next listeRecomposee.RemoveAt(0) Return listeRecomposee End Function
Partager