Parsing a String using Regular Expressions

[piscis]

Gentlemen:


I have this kind of strings coming from the RS232 port into a RichTextBox1. I'm only interested in the numbers right after the equal sign "="

I need to extract this numbers in the same line order shown and place the value into textboxes, each value will go into its own textbox

(there are 110 lines in the final rs232 file). Any idea? I'm using VBNet 2003.

Thanks everyone.

Rs232 file

Sel. 1
Pago = 119
Libre = 0
Test = 0
Desc.= 0
Sel. 2
Pago = 9
Libre = 0
Test = 0
Desc.= 0
Sel. 3
Pago = 322
Libre = 0
Test = 0
Desc.= 0

[DevGrp]

I dont know too much about regular expressions but you might find what you are looking for here. http://www.regxlib.com

[trisuglow]

Can you try something like this pseudocode?
You may need to truncate result to strip of the carriage return character(s) but I think you may be able to use Strip() to do this.

Dim i as Integer
    Dim line as String
    Dim result as String
 
    for each line in file
        i = instr( line, "=" )
        if i <> 0 then
            result = mid( line, i + 1 )
            'put result into appropriate text box
        endif
    next line

[VictorB212]

Simply replace the variable sInput with whatever your variable is named that contains the text you want to extract the numbers from. This will match negative numbers, integers, and reals.

Dim reg As New System.Text.RegularExpressions.Regex("(?<==\s+)-?\d+\.?\d*")
        Dim M As System.Text.RegularExpressions.Match
 
 
        For Each M In reg.Matches(sInput)
            Console.WriteLine(M.Value)
        Next