Asc Function

Returns the ANSI character code corresponding to the first letter in a string.

Syntax

ASC(string)

Remarks

The string argument is any valid string expression. If the string contains no characters, a run-time error occurs.

In the following example, ASC returns the ANSI character code of the first letter of each string. The following example illustrates the use of the ASC Function:

Example 1: Single uppercase letter

Dim MyNumber
MyNumber = Asc("A")       ' Returns 65
'MyNumber has value 65 ANSI Character Code of "A"

Example 2: Single lowercase letter

Dim MyNumber
MyNumber = Asc("a")       ' Returns 97
'MyNumber has value 97 ANSI Character Code of "a"

Example 3: Word starting with an uppercase letter

Dim MyNumber
MyNumber = Asc("Apple")   ' Returns 65
'MyNumber has value 65 ANSI Character Code of "A"

Example 4: Word starting with a lowercase letter

Dim MyNumber
MyNumber = Asc("banana")  ' Returns 98
'MyNumber has value 98 ANSI Character Code of "b"

Example 5: Special character

Dim MyNumber
MyNumber = Asc("!")       ' Returns 33
'MyNumber has value 33 ANSI Character Code of "!"

Example 6: Number in a string

MyNumber = Asc("12345")   ' Returns 49 (ANSI code for '1')
'MyNumber has value 49 ANSI Character Code of "1"

Example 7: Space character

Dim MyNumber
MyNumber = Asc(" ")       ' Returns 32
'MyNumber has value 32 ANSI Character Code of " "