Chr Function

Devolve o carácter que corresponde ao código do carácter especificado.

Sintaxe:


      Chr[$](charcode As Integer) As String

Valor de retorno:

String

Parâmetros:

charcode: a numeric expression that represents a valid 8-bit ASCII value (0-255) or a 16-bit Unicode value. (To support expressions with a nominally negative argument like Chr(&H8000) in a backwards-compatible way, values in the range −32768 to −1 are internally mapped to the range 32768 to 65535.)

When VBA compatibility mode is enabled (Option VBASupport 1), charcode is a numeric expression that represents a valid 8-bit ASCII value (0-255) only.

Utilize a função Chr$ para enviar sequências especiais de controlo para uma impressora ou qualquer outra fonte de saída. Também pode ser utilizada para inserir aspas numa expressão em caracteres.

Códigos de erro

5 Chamada de procedimento inválido

6 Excedida a capacidade

An overflow error will occur when VBA compatibility mode is enabled and the expression value is greater than 255.

Exemplo:


        Sub ExampleChr
            ' Este exemplo insere aspas (valor ASCII 34) numa expressão.
            MsgBox "A " + Chr$(34) + "short" + Chr(34) + " trip."
            ' A impressão aparece na caixa de diálogo como: Uma "pequena" viagem.
            MsgBox Chr(charcode := 64) ' "@" sign
        End Sub

Asc Function (BASIC)

AscW Function [VBA]

ChrW Function [VBA]