Retourneert een tekenreeks die het teken bevat dat is gekoppeld aan de opgegeven tekencode.
Syntaxis
Chr ( tekencode )
De vereiste tekencodeargument is een Lange waarmee een teken wordt geïdentificeerd.
Opmerkingen
Getallen van 0 - 31 zijn hetzelfde als standaard, niet-afdrukbare ASCII-codes. Zo resulteert Chr(10) in het teken voor een nieuwe regel. Het normale bereik voor tekencode is 0 - 255. Op DBCS-systemen is het werkelijke bereik voor tekencode -32768 tot 65535.
Opmerking: De functie ChrB wordt gebruikt met bytegegevens in een tekenreeks. In plaats van een teken te retourneren, dat één of twee bytes kan zijn, retourneert ChrB altijd één byte. De functie ChrW retourneert een tekenreeks die het Unicode teken bevat, behalve op platforms waar Unicode niet wordt ondersteund. In dat geval is het gedrag identiek aan de functie Chr .
Opmerking: Visual Basic voor de Mac biedt geen ondersteuning voor Unicode-tekenreeksen. Daarom kan ChrW(n) niet alle Unicode-tekens retourneren voor n waarden in het bereik van 128-65.535, zoals dit wel kan in de Windows-omgeving. In plaats daarvan geeft ChrW(n) een 'schatting' voor Unicode-waarden n groter dan 127. U moet ChrW daarom niet gebruiken in een Mac-omgeving.
Queryvoorbeelden
|
Expression |
Resultaten |
|
SELECT Chr(97) AS Expr1 FROM ProductVerkoop GROUP BY Chr(97); |
Retourneert de waarde 'Teken' voor de ASCII-code '97'. Resultaat: "a". |
|
SELECT Chr(90) AS ChrValue FROM ProductSales GROUP BY Chr(90); |
Retourneert de waarde 'Teken' voor de ASCII-code '90' in de kolom ChrValue. Resultaat: "Z". |
VBA-voorbeeld
Opmerking: In de volgende voorbeelden wordt het gebruik van deze functie in een VBA-module (Visual Basic for Applications) toegelicht. Meer informatie over het werken met VBA vindt u door in de vervolgkeuzelijst naast Zoeken de optie Referentie voor ontwikkelaars te selecteren en een of meer termen in het zoekvenster te typen.
In dit voorbeeld wordt de functie Chr gebruikt om het teken te retourneren dat hoort bij de opgegeven tekencode.
Dim MyCharMyChar = Chr(65) ' Returns A.MyChar = Chr(97) ' Returns a.MyChar = Chr(62) ' Returns >.MyChar = Chr(37) ' Returns %.
