ChrW Function [VBA]

Gibt das zum angegebenen Zeichencode gehörige Unicode-Zeichen zurück.

warning

Diese Konstante, diese Funktion oder dieses Objekt wird durch Platzierung der Anweisung Option VBASupport 1 vor dem auszuführenden Programmcode des Moduls aktiviert.


Syntax:


ChrW(charcode As Integer) As String

Rückgabewert:

Zeichenkette

Parameter:

charcode: Numeric expression that represent a valid 16 bit Unicode value (0-65535). (To support expressions with a nominally negative argument like ChrW(&H8000) in a backwards-compatible way, values in the range −32768 to −1 are internally mapped to the range 32768 to 65535.) An empty value returns error code 5. A value out of the range [0 to 65535] returns error code 6.

Fehlercodes:

5 Ungültiger Prozeduraufruf

6 Überlauf

Beispiel:


Sub ExampleChrW
    ' Dieses Beispiel fügt die griechischen Buchstaben Alpha und Omega in eine Zeichenkette ein.
    MsgBox "From " + ChrW(913) + " to " + ChrW(937)
    ' Bei der Ausgabe erscheint im Dialog: Von Α bis Ω
    MsgBox ChrW(charcode := 116) ' "t" lowercase T letter
End Sub