Certificación regex Casos

 If System.Text.RegularExpressions.Regex.IsMatch(linea, "^((CASO[ ]{1,})\d+-1)+$") Then
 End If


Dim x As String = "^(CASO[ ]{1,}" & numero_de_atencion & "-1)" & "+$"


fuente