Funkcja ChrW [VBA]

Zwraca znak Unicode, który odpowiada określonemu kodowi znaków.

warning

Ta stała, funkcja lub obiekt włączane są przez instrukcję Option VBASupport 1 umieszczoną w module przed programem wykonywalnym.


Składnia:


ChrW(charcode As Integer) As String

Zwracana wartość:

Łańcuch

Parametry:

charcode: Wyrażenie numeryczne, które reprezentują prawidłową 16-bitową wartość Unicode (0-65535). (Aby wspierać wyrażenia z nominalnie negatywnym argumentem, takim jak ChrW(&H8000) w sposób kompatybilny wstecz, wartości w zakresie −32768 na −1 są wewnętrznie odwzorowane na zakres 32768 do 65535.) Pusta wartość zwraca kod błędu 5. Wartość poza zakresem [0 do 65535] zwraca kod błędu 6.

Kody błędów:

5 Nieprawidłowe wywołanie procedury

6 Przepełnienie

Przykład:


Sub ExampleChrW
    ' Ten przykład wstawia greckie litery alfa i omega w ciągu znaków.
    MsgBox "Od " + ChrW(913) + " do " + ChrW(937)
    ' Wynik pojawia się w oknie dialogowym jako: Od Α do Ω
    MsgBox ChrW(charcode := 116) ' "t", tj. mała litera T
End Sub

Prosimy o wsparcie!