vb.net项目中如何判断文本框是数字还是字母（vb中文本框为粗体代码怎么写）

Dim a As Integer

a = Asc(Text1.Text)

Debug.Print a

If a >= 49 And a <= 57 Then

Print "数字"

ElseIf (a >= 65 And a <= 90) Or (a >= 97 And a <= 122) Then

Print "字母"

End If