Asc関数

文字列の最初の文字に対応するANSI文字コードを戻します。

構文

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