是否存在已用于指示文本字符大小写的SYSTEM枚举器？

Question

Function CaseCompress(str As String, Optional strCase As String = "lower") As String
    Select Case strCase
        Case "lower"
            Return New String(str.ToLower.ToCharArray().Where(Function(c) Not Char.IsWhiteSpace(c)).ToArray())
        Case "upper"
            Return New String(str.ToUpper.ToCharArray().Where(Function(c) Not Char.IsWhiteSpace(c)).ToArray())
        Case Else
            Return New String(str.ToCharArray().Where(Function(c) Not Char.IsWhiteSpace(c)).ToArray())
    End Select
End Function

简而言之，上述函数只删除所有空格并标准化文本大小写。我主要用它来进行文本指纹识别比较（我的描述）。 :-)我想＆＃34;打扮＆＃34;这个函数，就是我想让可选择的选项成为更加标准化的选择，希望使用枚举器而不是＆＃34;字符串＆＃34;选择 - 像这样：

Function CaseCompress(str As String, Optional strCase As TextCase = TextCase.Lower) As String

我意识到我可能必须删除CaseElse，但我会处理它。