Zwraca ciąg zawierający znak skojarzony z określonym kodem znaku.
Składnia
Chr(kod_znaku)
Wymaganym argumentem kodu_znaku jest wartość długa, która identyfikuje znak.
Uwagi
Liczby od 0 do 31 są takie same jak standardowe, niedrukowalne kody ASCII. Na przykład funkcja Chr(10) zwraca znak wysuwu wiersza. Normalny zakres dla charcode to 0 – 255. Jednak w systemach DBCS rzeczywisty zakres kodów znaków wynosi od -32768 do 65535.
Uwaga
Funkcja ChrB jest używana z danymi bajtowymi zawartymi w ciągu. Zamiast zwracania znaku, który może mieć jeden lub dwa bajty, ChrB zawsze zwraca jeden bajt. Funkcja ChrW zwraca ciąg znaków zawierający znak Unicode, z wyjątkiem platform, na których Unicode nie jest obsługiwany, w którym to przypadku zachowanie jest identyczne jak w przypadku funkcji Chr .
Uwaga
Program Visual Basic dla komputerów Macintosh nie obsługuje ciągów znaków Unicode. Z tego powodu funkcja ChrW(n) nie może zwrócić wszystkich znaków Unicode dla n wartości z zakresu 128 – 65 535, jak to ma miejsce w środowisku systemu Windows. Zamiast tego funkcja ChrW(n) podejmuje próbę "najlepszego przypuszczenia" wartości Unicode n większych niż 127. Z tego powodu nie należy używać funkcji ChrW w środowisku Macintosh.
Przykłady kwerend
| Wyrażenie | Rezultat |
|---|---|
| SELECT Chr(97) AS Wyr1 FROM ProductSales GROUP BY Chr(97); | Zwraca wartość "Character" dla kodu ASCII "97". Wynik: "a". |
| SELECT Chr(90) AS ChrValue FROM ProductSales GROUP BY Chr(90); | Zwraca wartość "Character" dla kodu ASCII "90" w kolumnie ChrValue. Wynik: "Z". |
Przykład kodu VBA
Uwaga
Poniższe przykłady przedstawiają sposób użycia tej funkcji w module języka Visual Basic for Applications (VBA). Aby uzyskać dodatkowe informacje na temat pracy w języku VBA, wybierz pozycję Dokumentacja dewelopera z listy rozwijanej obok przycisku Wyszukaj i wprowadź odpowiednie terminy w polu wyszukiwania.
W tym przykładzie zastosowano funkcję Chr w celu zwrócenia znaku skojarzonego z określonym kodem znaku.
Dim MyChar
MyChar = Chr(65) ' Returns A.
MyChar = Chr(97) ' Returns a.
MyChar = Chr(62) ' Returns >.
MyChar = Chr(37) ' Returns %.