如何在vb.net中檢查字符串是否包含特殊字符？

Question

我想檢查輸入是否在vb.net中包含特殊字符（@“ [〜`！@＃$％^＆*（）-+ = | {}'：;。，<> /？]”） ？

如何在vb.net代碼中進行檢查？

Answer 1

如果要檢查字符串中是否包含任何上述字符，可以使用以下函數：

Function ContainsSpecialChars(s As String) As Boolean
    Return s.IndexOfAny("[~`!@#$%^&*()-+=|{}':;.,<>/?]".ToCharArray) <> -1
End Function

或者，如果要檢查字符串是否僅包含字母，數字或空格，則可以使用以下功能：

Function ContainsSpecialChars(s As String) As Boolean
    Return s.Any(Function(c) Not (Char.IsLetterOrDigit(c) OrElse Char.IsWhiteSpace(c)))
End Function

Answer 2

如果字符串只能包含字母或數字（0-9）或空格：

Dim noSpecialCharacters = text.
    All(Function(c) Char.IsLetterOrDigit(c) OrElse Char.IsWhiteSpace(c))

Dim containsSpecialCharacters = Not noSpecialCharacters