Asc 函式

傳回對應字串中第一個字母的 ANSI 字元代碼。

語法

ASC(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 " "