vb中怎么判断一个字符串中，是否有除了字母和数字以外的字符

在设置密码的时候，只能包含字母和数字，但是怎么样判断一个字符串中只有二者？
请高手指教
解决之后的函数：
Public Function Check_LawlessChar(ByVal Str As String) As Boolean
Check_LawlessChar = False
Dim S_Char As String '有则返回TRUE，否则FALSE
Dim i As Integer
For i = 1 To Len(Str)
S_Char = Mid(Str, i, 1)
If (48 <= Asc(S_Char) And Asc(S_Char) <= 57) Or (65 <= Asc(S_Char) And Asc(S_Char) <= 90) Or (97 <= Asc(S_Char) And Asc(S_Char) <= 122) Then
Else
Check_LawlessChar = True
End If
Next
End Function

vb中判断字符串A是否包含有字符B vb中判断字符串是否相等？ 如何判断一个字符串中是否有逗号 VBS中怎么判断（查找）一个字符串是否在另一个字符串中出现 输入一个英文字符串,判断字符串中是否含有“JiaGeng”。 C#中,怎么判断一个字符串包含是否不包含另一个字符串 VB中怎么判断一个文件夹是否存在？ vb中，如何判断一个form是否有菜单? asp中如何判断一个字符串中是否有非法字符 VB中我怎么监测一个字符串中是否包含所需字符