Supprimer des lignes non spécifiques dans un fichier texte

Question

Je cherche un moyen de supprimer des lignes qui ne répondent pas à un critère dans VB.net. Je vais juste donner un exemple de ce que je veux faire ci-dessous.

Fondamentalement, je veux que le programme passe par un document texte (chaque ligne) et si la ligne ne contient pas une certaine chaîne, il serait effacé.

En gros:

hgfhfghhfo TRUE 

hdfgdfhdfh MAYBE 

tytrteyuet POSSIBLE 

ghjfgjgfjf FALSE 

C'est ce que le document texte ressemblerait, maintenant je veux de ne pas se concentrer sur le « RandomInfo », mais sur le « Vrai/Faux » Si elle dit vrai, je veux aussi garde la ligne. Si la ligne contient autre chose que True, je veux la supprimer. Pouvez-vous m'aider avec ça?

Answer 1

Essayez ceci,

Dim filename = "sample.txt" 

Dim result = From n In System.IO.File.ReadAllLines(filename).Where(Function(s) s.EndsWith("TRUE")) 

System.IO.File.WriteAllLines(filename, result.ToArray())