Função Asc

Retorna um Inteiro que representa o código de caractere correspondente à primeira letra em uma cadeia de caracteres.

Sintaxe

Asc(string)

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

Comentários

O intervalo de retornos é de 0 a 255 em sistemas não DBCS, mas -32768-32767 em sistemas DBCS .

Observação

A função AscB é usada com dados de bytes contidos em uma cadeia de caracteres. Em vez de retornar o código de caractere para o primeiro caractere, o AscB retorna o primeiro byte. A função AscW retorna o código de caractere Unicode , exceto em plataformas em que o Unicode não tem suporte, nesse caso, o comportamento é idêntico à função Asc .

Observação

O Visual Basic para Macintosh não dá suporte a cadeias de caracteres Unicode. Portanto, o AscW (n) não pode retornar todos os caracteres Unicode para n valores no intervalo de 128 a 65.535, como faz no ambiente Windows. Em vez disso, o AscW (n) tenta um "melhor palpite" para valores Unicode n maior que 127. Portanto, você não deve usar AscW no ambiente Macintosh.

As funções Chr(), ChrB() e ChrW() são o oposto de Asc(), AscB() e AscW(). As funções Chr() convertem um inteiro em uma cadeia de caracteres.

Exemplo

Este exemplo usa a função Asc para retornar um código de caractere correspondente à primeira letra na cadeia de caracteres.

Dim MyNumber
MyNumber = Asc("A")    ' Returns 65.
MyNumber = Asc("a")    ' Returns 97.
MyNumber = Asc("Apple")    ' Returns 65.

Confira também

Suporte e comentários

Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.