返回与字符串中的第一个字母对应的 ANSI 字符代码。
语法
ASC(string)
注释
string 参数是任何有效的字符串表达式。如果 string 不包含字符，则会出现运行时错误。
在以下示例中，ASC 返回每个字符串第一个字母的 ANSI 字符代码。以下示例说明了 ASC 函数的用法：
示例 1：单个大写字母
Dim MyNumber
MyNumber = Asc("A") ' Returns 65
'MyNumber has value 65 ANSI Character Code of "A"
示例 2：单个小写字母
Dim MyNumber
MyNumber = Asc("a") ' Returns 97
'MyNumber has value 97 ANSI Character Code of "a"
示例 3：以大写字母开头的单词
Dim MyNumber
MyNumber = Asc("Apple") ' Returns 65
'MyNumber has value 65 ANSI Character Code of "A"
示例 4：以小写字母开头的单词
Dim MyNumber
MyNumber = Asc("banana") ' Returns 98
'MyNumber has value 98 ANSI Character Code of "b"
示例 5：特殊字符
Dim MyNumber
MyNumber = Asc("!") ' Returns 33
'MyNumber has value 33 ANSI Character Code of "!"
示例 6：字符串中的数字
MyNumber = Asc("12345") ' Returns 49 (ANSI code for '1')
'MyNumber has value 49 ANSI Character Code of "1"
示例 7：空格字符
Dim MyNumber
MyNumber = Asc(" ") ' Returns 32
'MyNumber has value 32 ANSI Character Code of " "