windows_lock_vb/Yjpp36/service/StringHelper.vb

Public Class StringHelper
    ' 判断是否全字母数字（Unicode 支持）
    Public Shared Function IsAllLetterOrDigit(input As String) As Boolean
        For Each ch As Char In input
            If Not Char.IsLetterOrDigit(ch) Then Return False
        Next
        Return True
    End Function
End Class