Retorna uma Cadeia de Caracteres que contém o caractere associado ao código de caractere especificado .
Sintaxe
Chr ( charcode )
O argumento de charcode necessário é um Long que identifica um caractere.
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) retorna um caractere de linefeed. O intervalo normal para charcode é 0 a 255. No entanto, em DBCS sistemas, o intervalo real para charcode é -32768 a 65535.
Observação: A função ChrB é usada com dados de bytes contidos em uma Cadeia de Caracteres. Em vez de retornar um caractere, que pode ser um ou dois bytes, ChrB sempre retorna um único byte. A função ChrW retorna uma Cadeia de Caracteres que contém o caractere Unicode, exceto em plataformas em que o Unicode não tem suporte, nesse caso, o comportamento é idêntico à função Chr .
Observação: O Visual Basic para o Macintosh não dá suporte a 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 faz no ambiente Windows. Em vez disso, ChrW(n) tenta um "melhor palpite" para valores Unicode n maior que 127. Portanto, você não deve usar o ChrW no ambiente Macintosh.
Exemplos de consulta
|
Expressão |
Resultados |
|
SELECT Chr(97) AS Expr1 FROM ProductSales GROUP BY Chr(97); |
Retorna o valor "Caractere" para o código ASCII "97". Resultado: "a". |
|
SELECT Chr(90) AS ChrValue FROM ProductSales GROUP BY Chr(90); |
Retorna o valor "Caractere" para o código ASCII "90" na coluna ChrValue. Resultado: "Z". |
Exemplo de VBA
Observação: Exemplos a seguir demonstram o uso dessa função em um módulo VBA (Visual Basic for Applications). Para obter mais informações sobre como trabalhar com o VBA, selecione Referência do Desenvolvedor na lista suspensa ao lado de Pesquisar e insira um ou mais termos na caixa de pesquisa.
Este exemplo usa a função Chr para retornar o caractere associado ao código de caractere especificado.
Dim MyCharMyChar = Chr(65) ' Returns A.MyChar = Chr(97) ' Returns a.MyChar = Chr(62) ' Returns >.MyChar = Chr(37) ' Returns %.
