Dim R as RegexObj = New Regex("^\s*$") If R.IsMatch(Line) Then ' Line is blank . . . Endif ----------------------------------------------------------------------------- Copyright 1997-2024 Jeffrey Friedl