[VB.NET][Expressions régulières] GroupCollection

**zouhib** · 02/06/2006, 16h27

salut tout le monde .
je traite des chaines de caractères que je lis dans un fichier texte et je les récupère pas ce code:

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
19
20
21
22
23
 
 Dim str As String
 Dim ID As Integer
 
 Public Function Func(ByVal line As String) As String
 Dim r As New RegularExpressions.Regex("BO_[\s][0-9]+[A-Za-z]", RegularExpressions.RegexOptions.Compiled)
        Return r.Match(line).Groups(3).Value
    End Function
 
    Public Sub lecture(ByVal fichier As String)
        Do
            ligne = SR.ReadLine()
 
        Loop Until (str = ligne.IndexOf("BO_"))
        ID = Func(str)
 
        ''pos = ligne.IndexOf("BO_")
        'ID = ligne.Substring(3, str + 5)
 
        SR.Close()
        SW.WriteLine(ID)
        SW.Close()
    End Sub

par contre ce code me genère une exception quand j'appelle la procédure lecture :

Value cannot be null.
Parameter name: input

je crois que sa viens du paramètre que j'ai mis à l'instance Groups, et c'est pour cela j'aimerai savoir quesqu'on met comme paramètres dans cette instance.
merci de votre aide !!

**amin001** · 02/06/2006, 16h39

Salut :
à quel niveau du code tu as cette exception !

**zouhib** · 02/06/2006, 16h41

c'est bon j'ai plus d'exception j'aimerai juste savoir quesqu'on pass comme paramètreà match.Groups[]

**zouhib** · 02/06/2006, 16h49

en fait j'ai une ligne comme sa :

BO_ 257 Trm_CMD

et pour récupérer le nombre (257 dans ce cas ) jutilise la fonction func:

Code :

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

1
2
3
4
5
 
Public Function Func(ByVal line As String) As String
        Dim r As New RegularExpressions.Regex("BO_[\s][0-9]+[A-Za-z]", RegularExpressions.RegexOptions.Compiled)
        Return r.Match(line).Groups(2).Value
    End Function

par contre quand je veux le récupérer et l'afficher je n'ai rien !