help

akshita fauzdar

hi this is apiece of code on whch iam working. can anyone tell me wht is function chrw doing here

Private Function half_forms(ByVal c As Integer, ByRef isfoctouni
As String) As String
           Dim temp As String
           temp = ""
           Select Case c
               Case &H81
                   temp = temp + ChrW(&H915) + ChrW(&H94D) + ChrW(&H937)
+ ChrW(&H94D) + ChrW(&H200D)
               Case &H82
                   temp = temp + ChrW(&H950)
               Case &H83
                   temp = temp + ChrW(&H93D)
               Case &H84
                   temp = temp + ChrW(&H903)
               Case &H85
                   temp = temp + ChrW(&H964)

3 Replies

Know the answer? Post it — somebody with the same question will find it here.

Alan19y ago
Hi again:

1. Yes, it can be used for any unicode character between 0 and 65,535. For example ChrW(2) represents the non-printing character which in the single byte ASCII system is called STX (start of text).

2. No, it's not compulsory to use hexadecimal for the argument - it's more usual to use a decimal integer.
akshita fauzdar19y ago
hi thanks aneway 1.can this function convert any other char code to unicode eg. isfoc to unicode 2. and is it compulsory to give hexadecimal as input , cant we give simple number! :(
Alan19y ago
The ChrW function returns the unicode character with the same number as its Integer argument.

For example:

Dim c As Char = ChrW(65) 'assigns the variable c the character 'A '

This line does the same except the argument this time is expressed as a hexadecimal number:

Dim c As Char = ChrW(&H41)