ChrB() function Issue...

[Juggler_IN]

In VBA "!" has the same ASC, ASCB, ASCW values ...
?ASC("!")
33
?ASCB("!")
33
?ASCW("!")
33
But € has different ASC, ASCB, ASCW values ...
?ASC("€")
128
?ASCB("€")
172
?ASCW("€")
8364

Which I understand... But the reverse functions Chr, ChrB, and ChrW do not exactly convert back the integer values.
?Chr(128)
€
?ChrW(8364)
€
?StrConv(ChrB(172), vbUnicode)
"¬"

How to get ChrB() to give, for example, € for integer 172? (Note: StrConv(ChrB(33), vbUnicode) gives correct output! So, the Issue seems to be around 2-byte characters.)

 

[Alex Blakenburg]

How to get ChrB() to give, for example, € for integer 172? (Note: StrConv(ChrB(33), vbUnicode) gives correct output! So, the Issue seems to be around 2-byte characters.)

I don't believe you can since ChrB() is only returning the 1 byte of the 2 bytes that make up the character.

Per Microsoft: Chr function (Visual Basic for Applications)
"The ChrB function is used with byte data contained in a String. Instead of returning a character, which may be one or two bytes, ChrB always returns a single byte."

 

[Scott Huish]

Why don't you just use the ChrW function?

 

[Juggler_IN]

@Alex Blakenburg; Thanks...

@Scott Huish; Yes, as an alternate ChrW works fine ... But it was to better understand why ChrB is not a True reverse version of AscB... Like Chr and Asc, and AscW and ChrW.

 

[Alex Blakenburg]

Thanks for getting back to us. Glad it was of some help.