IsCharAlpha

计算机简介:IsCharAlpha是Win32下的一个API函数作用:返回一个真假逻辑值,表示判断一个Ascii码是否为字母的Ascii码VB6.0中的声明:[Public / Private] Declare Function IsCharAlpha Lib "user32" Alias "IsCharAlphaA" (ByVal cChar As Byte) As BooleanVB简例:Dim A As String, B As String, C As String, D As String

'注意首先将要判断的字符用Asc函数转换成Ascii码

A = Asc("1")

B = Asc("A")

C = Asc("1A")

D = Asc("A1")

Print "1 " & IsCharAlpha(A) & " 第一个字符 不是 字母"

Print "A " & IsCharAlpha(B) & " 第一个字符 是 字母"

Print "1A " & IsCharAlpha(C) & " 第一个字符 不是 字母"

Print "A1 " & IsCharAlpha(D) & " 第一个字符 是 字母"

Print "49 " & IsCharAlpha(49) & " 49 这个Ascii码 不是 是字母的Ascii码"

Print "65 " & IsCharAlpha(65) & " 65 这个Ascii码 是 字母的Ascii码"备注:如果转换的字符有两个以上,Asc函数只转换左边第一个,于是IsCharAlpha函数也只判断一个Ascii码