Função Asc

Retorna o código de caractere ANSI correspondente à primeira letra de uma string.

Sintaxe

ASC(string)

Comentários

O argumento string é qualquer expressão de string válida. Se a string não contiver caracteres, ocorrerá um erro de tempo de execução.

No exemplo a seguir, ASC retorna o código de caractere ANSI da primeira letra de cada string. O exemplo a seguir ilustra o uso da Função ASC:

Exemplo 1: Uma única letra maiúscula

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

Exemplo 2: Uma única letra minúscula

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

Exemplo 3: Palavra começando com letra maiúscula

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

Exemplo 4: Palavra começando com letra minúscula

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

Exemplo 5: Caractere especial

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

Exemplo 6: Número em uma string

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

Exemplo 7: Caractere de espaço

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