'Return True if aIdentName is a valid name for an identifier otherwise return False
Sub IsValidIdentifierName(aIdentName As String) As Boolean
Dim ma As Matcher
ma = Regex.Matcher("^[a-zA-Z][a-zA-Z0-9\_\ ]+$", aIdentName)
If ma.Find Then
Log("String is ok " & aIdentName)
Return True
Else
Log("String not ok " & aIdentName)
Return False
End If
End Sub