Extract Number

[kservice]

I need to extract a number out of a string.

 

Ex: Session73Number

 

Should I and could I use a regular expression and if so what would it look like.

 

In case you can't tell, I've never written a regular expression. :rolleyes:

 

Thanks in advance.

[Arch4ngel]

[0-9]? will determine that any number will be catched.

 

However... it's been a week or two since I've done Regex... and I'm not a master in that section...

 

Try this :

 

.*([0-9]?).*

 

And see .Capture(...) in your regex. It might have captured "73" somewhere. If it didn't... well... keep working... you are on the right track.

[neodammer]

Dim oldstr As String = "Session73Number"

oldstr = oldstr.Remove(0, 7)

oldstr = oldstr.Remove(2, 6)

MsgBox(oldstr)

 

 

 

That would end you with just 73 ..if that helps any.

[John_0025]

[0-9]{1,} will match the numbers in your string.

 

The code below will return an array of all the numbers in your string.

 

i.e. "Session73Number" will return "73"

"Session73Number532" will return "73" and "532"

 

   Public Shared Function ReturnNumericValues(ByVal Text As String) As ArrayList
       Dim myRegExp As New System.Text.RegularExpressions.Regex("[0-9]{1,}", RegexOptions.IgnoreCase)
       Dim Matches As System.Text.RegularExpressions.MatchCollection
       Matches = myRegExp.Matches(Text)
       Dim myMatch As System.Text.RegularExpressions.Match
       Dim matchedValues As New ArrayList

       For Each myMatch In Matches
           matchedValues.Add(myMatch.Value)
       Next

       return matchedValues
   End Function

[kservice]

Thanks a bunch I kind of figured out the same thing but your example gives me a much cleaner solution.

 

Thanks again! :-\