Devolve um Número Inteiro que representa o código de caráter correspondente à primeira letra numa cadeia.
Sintaxe
Asc(cadeia)
O argumento de cadeia necessárioé qualquer expressão de cadeia válida. Se a cadeia não contiver carateres, ocorre um erro em tempo de execução.
Observações
O intervalo para devoluções é de 0 – 255 em sistemas que não sejam DBCS, mas –32768 – 32767 em sistemas DBCS.
Nota
A função AscB é usada com dados de byte contidos em uma cadeia de caracteres. Em vez de devolver o código do caráter para o primeiro caráter, AscB devolve o primeiro byte. A função AscW retorna o código do caractere Unicode, exceto em plataformas onde o Unicode não é suportado, caso em que o comportamento é idêntico à função Asc .
Nota
Visual Basic para o Macintosh não suporta cadeias de caracteres Unicode. Portanto, AscW(n) não pode retornar todos os caracteres Unicode para n valores no intervalo de 128 – 65.535, como acontece no ambiente Windows. Em vez disso, AscW(n) tenta uma "melhor suposição" para valores Unicode n maiores que 127. Portanto, você não deve usar AscW no ambiente Macintosh.
Exemplos de consulta
| Expressão | Resultados |
|---|---|
| SELECT Asc("a") COMO Expr1 FROM ProductSales; | Devolve o código "ASCII" da cadeia de carateres "a". Resultado: "97". |
| SELECT Asc("Z") COMO AscCode FROM ProductSales; | Devolve o código "ASCII" para a cadeia "Z" na coluna AscCode. Resultado: "90". |
Exemplo do VBA
Nota
Os exemplos seguintes demonstram a utilização desta função no módulo VBA (Visual Basic for Applications). Para obter mais informações sobre como trabalhar com o VBA, selecione Referência para Programadores na lista pendente junto a Procurar e introduza um ou mais termos na caixa de pesquisa.
Este exemplo utiliza a função Asc para devolver um código de caráter correspondente à primeira letra da cadeia.
Dim MyNumber
MyNumber = Asc("A") ' Returns 65.
MyNumber = Asc("a") ' Returns 97.
MyNumber = Asc("Apple") ' Returns 65.