Devolve uma Cadeia que contém o caráter associado ao código do caráter especificado.
Sintaxe
Chr ( código de carateres )
O código de carateres necessárioargumento é um Valor Longo que identifica um caráter.
Observações
Os números de 0 a 31 são os mesmos que os códigos ASCII padrão e não imprimíveis. Por exemplo, Chr(10) devolve um caráter de linefeed. O intervalo normal para o código de carateres é 0 a 255. No entanto, nos sistemas DBCS, o intervalo real para o código de carateres é -32768 a 65535.
Nota: A função ChrB é utilizada com dados de bytes contidos numa Cadeia. Em vez de devolver um caráter, que pode ser um ou dois bytes, ChrB devolve sempre um único byte. A função ChrW devolve uma Cadeia que contém o caráter Unicode, exceto em plataformas em que Unicode não é suportado, caso em que o comportamento é idêntico à função Chr .
Nota: O Visual Basic para Macintosh não suporta cadeias Unicode. Por conseguinte, o ChrW(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, ChrW(n) tenta uma "melhor estimativa" para valores Unicode n superiores a 127. Por conseguinte, não deve utilizar ChrW no ambiente Macintosh.
Exemplos de consulta
|
Expressão |
Resultados |
|
SELECT Chr(97) AS Expr1 FROM ProductSales GROUP BY Chr(97); |
Devolve o valor "Caráter" para o código ASCII "97". Resultado: "a". |
|
SELECT Chr(90) AS ChrValue FROM ProductSales GROUP BY Chr(90); |
Devolve o valor "Caráter" para o código ASCII "90" na coluna ChrValue. Resultado: "Z". |
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 Chr para devolver o caráter associado ao código de carateres especificado.
Dim MyCharMyChar = Chr(65) ' Returns A.MyChar = Chr(97) ' Returns a.MyChar = Chr(62) ' Returns >.MyChar = Chr(37) ' Returns %.
