Retorna uma Cadeia que contém o caractere associado ao código do caractere especificado.
Sintaxe
Chr(códigodocar)
O argumento charcode necessário é um Long que identifica um caráter.
Comentários
Os números de 0 a 31 são iguais aos códigos ASCII padrão e não imprimíveis. Por exemplo, Chr(10) devolve um caráter de avanço de linha. O intervalo normal para charcode é 0 – 255. No entanto, em DBCSsystems, o intervalo real para charcode é -32768 a 65535.
Observação
A função ChrB é usada com dados de byte contidos em uma String. Em vez de devolver um caráter, que pode ser um ou dois bytes, ChrB devolve sempre um único byte. A função ChrW retorna uma String contendo o caractere Unicode, exceto em plataformas onde o Unicode não é suportado, caso em que o comportamento é idêntico à função Chr .
Observação
Visual Basic para o Macintosh não suporta cadeias de caracteres Unicode. Portanto, ChrW(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, ChrW(n) tenta uma "melhor suposição" para valores Unicode n maiores que 127. Portanto, você não deve usar ChrW no ambiente Macintosh.
Exemplos de consulta
| Expressão. | Resultados |
|---|---|
| SELECT Chr(97) COMO Expr1 FROM ProductSales GROUP BY Chr(97); | Devolve o valor "Character" para o código ASCII "97". Resultado: "a". |
| SELECT Chr(90) COMO ChrValue FROM ProductSales GROUP BY Chr(90); | Devolve o valor "Character" para o código ASCII "90" na coluna ChrValue. Resultado: "Z". |
Exemplo do VBA
Observação
Os exemplos seguintes demonstram a utilização desta função num módulo Visual Basic for Applications (VBA). Para obter mais informações sobre como trabalhar com o VBA, selecione Referência para Programadores na lista pendente junto a Pesquisar e introduza um ou mais termos na caixa de pesquisa.
Este exemplo utiliza a função Car para devolver o caráter associado ao código do caráter especificado.
Dim MyChar
MyChar = Chr(65) ' Returns A.
MyChar = Chr(97) ' Returns a.
MyChar = Chr(62) ' Returns >.
MyChar = Chr(37) ' Returns %.