Display Unicode characters in Rich Text Box
Posted on 2003-03-26
Working with Visual Basic 6.0
I need to display Unicode characters (i.e. chrW(601)) in a Rich Text Box control. I load the characters from an SQLServer database through an RDO Resultset:
Dim Info As rdoResultset
Dim aux As String
aux = Info.rdoColumns("article")
RichTextBox1.Text = aux
When I ask for the value of aux it is OK (i.e. AscW(Mid(aux,1,1)) = 601). But then the value of the same position of RichTextBox1.Text is no longer 601 but 63, and a "?" is displayed.
I guess Rich Text Box does not support Unicode, but then what control can I use? Or is there any trick to make it work?