rsx1 = " [0-9]*[0-9]*:[1-9]+[0-9]*[,-]?[1-9]+[0-9]*"
PrintLine(ff2, rsx1)
Dim rgx1 As New Regex(rsx1)
' ==========================
rr = LineInput(1)
Dim mat1 As Match = rgx1.Match(rr)
If mat1.Success Then
PrintLine(ff2, "Match1 ", mat1.Value)
End If
Monday, February 12, 2007
Subscribe to:
Post Comments (Atom)


No comments:
Post a Comment