Função Asc
Devolve um Número Inteiro que representa o código do caráter correspondente à primeira letra numa cadeia.
Sintaxe
Asc(cadeia)
O argumentode cadeia necessário é qualquer expressão de cadeia válida. Se a cadeia não contiver carateres, ocorrerá um erro de tempo de execução .
Comentários
O intervalo de devoluções é 0-255 em sistemas não DBCS, mas -32768-32767 em sistemas DBCS .
Observação
A função AscB é utilizada com dados de bytes contidos numa cadeia. Em vez de devolver o código do caráter para o primeiro caráter, AscB devolve o primeiro byte. A função AscW devolve o código de carateres Unicode , exceto nas plataformas em que o Unicode não é suportado. 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. Por conseguinte, o AscW (n) não pode devolver todos os carateres Unicode para n valores no intervalo de 128–65.535, tal como acontece no ambiente do Windows. Em vez disso, o AscW (n) tenta uma "melhor estimativa" para valores Unicode n superiores a 127. Por conseguinte, não deve utilizar o 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 número inteiro numa cadeia de carateres.
Exemplo
Este exemplo utiliza a função Asc para devolver um código de carateres correspondente à primeira letra na cadeia.
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.