Dim M as Match = Regex.Match(SampleText, "\d+\w+") 'Check pattern against string. ----------------------------------------------------------------------------- Copyright 1997-2024 Jeffrey Friedl