Discussion :

[Miska59]

Bonjour a tous, dans mon fichier texte à plusieurs langue . je voudrais exclure les autres langues.

exemple :

FR blabla....etc
ES blabla....etc
IT blabla....etc
blabla....etc
blabla....etc
FR blabla....etc

je voudrais garder juste c'est mots :

FR blabla....etc
blabla....etc
blabla....etc
FR blabla....etc

mon code regex :

Code :

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

Regex.Matches(str, "(FR.*?)", RegexOptions.IgnoreCase)

avez-vous une idée comment fait pour garder que la langue française et les autres mots qui sont comment pas une langue étrangère comme blabla....etc? merci d'avance

[chrismonoye]

Bonjour,
à tester :

Code :

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

1
2
        Dim pattern = "FR.*?(?=IT|ES|US)"
        Dim matches As MatchCollection = Regex.Matches(str, pattern, RegexOptions.Singleline)

"." Caractère générique : correspond à n’importe quel caractère à l’exception de \n.

Pour cela on traite le document comme une seule ligne : Singleline

(?=sous-expression) est une assertion de préanalyse positive ; c'est-à-dire que le ou les caractères situés après la position actuelle doivent correspondre à la sous-expression.

On pourra y intégrer les retours chariot, sauts de ligne et espaces :

Code :

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

Dim pattern1 As String = "FR.*?(?=\r*\n*\s*(IT|ES|US))"

Bonne journée à vous.

[Miska59]

Bonjour, merci d’avoir répondu mais le problème que j'utilise ReadToEnd pour lire le fichier texte.

avec RegexOptions.Singleline ne fonctionne pas avec ReadToEnd.

au sinon je peux faire deux actions un pour langue français qui commence par FR....etc et une actions qui à pas de langue en majuscule FR,ES,IT.
le code :

Code :

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

Regex.Matches(str, If(CheckBox1.CheckState = CheckState.Checked, "([A-Z]{2}.*?)", "(FR.*?)"), RegexOptions.IgnoreCase)