Dim Subject as String = _ Regex.Match(TestStr, "^subject: (?.*)", _ RegexOptions.IgnoreCase).Groups("Subj").Value If Subject <> "" Console.WriteLine("Subject is: " & Subject) End If ----------------------------------------------------------------------------- Copyright 1997-2024 Jeffrey Friedl