Regex en VB.net

Bonjour,

Je fais actuellement une application où j'ai besoin de faire des recherches dans des fichiers.
Pour cela je me sers des expressions régulières, mais malgré plusieurs heures de recherches et de lecture je me trouve face à un problème.

Je cherche à récupérer l'information se situant à la suite de "# Carte "

J'ai donc écrit cela :

Code:

---

Dim myRegex = New Regex("^(# Carte [a-zA-Z]+)")

---

Cela me donne # Carte avec la suite que je souhaite.

Je pense qu'il est possible de faire la recherche et d'extraire ce que je souhaite récupérer.

Donc j'aurais besoin de conseils, d'avis, de corrections afin de pouvoir réaliser cela.

J'ai déjà essayé plusieurs choses mais sans grand succès.

Ci dessous le code général :

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12

Do   Dim Text As String = Text_carte.ReadLine()   Dim myRegex = New Regex("^(# Carte [a-zA-Z]+)")   Dim res = myRegex.IsMatch(Text)   Dim r = myRegex.Match(Text).Value   'myRegex.Match(Text) Loop Until Text Is Nothing

---

Nota : Je suis novice dans les expressions régulière.
Pour réaliser le code regex ci dessus j'ai mis à peu près 4h à 5h. (Donc super novice).

Merci d'avance pour votre aide.

Bonsoir ,

Il faut travailler avec les groupes :

Code:

---

1 2 3 4

Dim s = "ABCDEF# Carte GHIJKLM" Dim rx = New Regex("# Carte(.+)$") MsgBox(rx.Match(l).Groups(1).Value)

---

Affiche :

Code:

---

1 2

GHIJKLM

---

A+

Merci wallace1,

Je fais le test au plus vite et je vous tiens au courant.

Cordialement.

Bonsoir,
il est possible, aussi, de faire une post-analyse positive.
Voir ce tuto plus qu'excellent.
La recherche devrait ressembler à cela ( poste 3.8.2):

Code:

---

Dim myRegex = New Regex("^((?<=# Carte )[a-zA-Z]+)")

---

Voir aussi le poste 4.4 pour récupérer toutes les occurrences.

Bonjour,

Un outil très intéressant pour tester les expressions régulières

http://www.ultrapico.com/Expresso.htm

Citation:

---

Envoyé par Hybride76

Merci wallace1,

Je fais le test au plus vite et je vous tiens au courant.

Cordialement.

---

Suite à la modification de mon code tel que proposé par wallace1.
J'arrive a réaliser ce que je recherche.

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15

While (ligne <= nLignes)   Dim Text = Text_carte.ReadLine() Dim myRegex = New Regex("# Carte (.+)$") Dim res = myRegex.IsMatch(Text) Type_Carte = myRegex.Match(Text).Groups(1).Value If (res = True) Then ToolStripComboBox1.Items.Add(Type_Carte) End If ligne = ligne + 1   End While

---

Encore merci.