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.