Devolve um Número Inteiro que representa o código do caráter correspondente à primeira letra numa cadeia.
Sintaxe
Asc(cadeia)
O argumento de cadeianecessário é qualquer expressão de cadeia válida. Se a cadeia não contiver carateres, ocorrerá um erro de tempo de execução.
Observações
O intervalo de devoluções é de 0 a 255 em sistemas não DBCS, mas –32768 – 32767 em sistemas DBCS.
Nota
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 .
Nota
O Visual Basic para Macintosh não suporta cadeias 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, AscW(n) tenta uma "melhor estimativa" para valores Unicode n superior a 127. Por conseguinte, não deve utilizar o AscW no ambiente Macintosh.
Exemplos de consulta
| Expressão | Resultados |
|---|---|
| SELECT Asc("a") AS Expr1 FROM ProductSales; | Devolve o código "ASCII" para a cadeia "a". Resultado: "97". |
| SELECT Asc("Z") AS AscCode FROM ProductSales; | Devolve o código "ASCII" para a cadeia "Z" na coluna AscCode. Resultado: "90". |
Exemplo de 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 carateres correspondente à primeira letra na cadeia.
Dim MyNumber
MyNumber = Asc("A") ' Returns 65.
MyNumber = Asc("a") ' Returns 97.
MyNumber = Asc("Apple") ' Returns 65.