Dim files As String = ("D:\test.txt") Dim lines As List(Of String) = System.IO.File.ReadAllLines(files).ToList Dim g() As String = File.ReadAllLines(files) For i = lines.Count - 1 To 0 Step -1 If lines(i).Contains("#") Then lines(i) = lines(i).Replace("#", "") End If Next System.IO.File.WriteAllLines(files, lines.ToArray)
# <tabxml>
# <N_x00B0_>1</N_x00B0_>
# <Nom>john</Nom>
# jack
# 12
# </tabxml>
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question. supprimer les lignes de texte dans un fichier texte comprennant le mot x
Dim files As String = ("D:\f.txt") Dim lines As List(Of String) = System.IO.File.ReadAllLines(files).ToList Dim g() As String = File.ReadAllLines(files) ' If lines.Count = 0 Then Continue For For i = lines.Count - 1 To 0 Step -1 If lines(i).Contains("#") Then lines(i).Split("#") End If Next
Peut-on faire cela avec un éditeur de texte comme Office, Excel etc.