or
Public Shared Function CheckForAlphaCharacters(ByVal StringToCheck As String) As Boolean Try Dim i As Integer = 0 For i = 0 To StringToCheck.Length - 1 If Char.IsLetter(StringToCheck.Chars(i)) Then Return True End If Next Return False Catch ex As Exception Return False End TryEnd Function= MIR.Web.ZinsCheck.Hilfsfunktion.CheckForAlphaCharacters(CStr(Fields.Beschäftigungsverhältnis2)) = True = = True