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