VBGood网站全文搜索 Google

搜索VBGood全站网页(全文搜索)
首页 - 经验之谈 - 如何由两个ASC码(区位码)复原成一个汉字?
发表评论(0)作者:不详, 平台:VB6.0+Win98, 阅读:10709, 日期:2001-10-29
如何由两个ASC码(区位码)复原成一个汉字?


Dim bArr(1) As Byte
Dim sMe as String
bArr(0) = 206
bArr(1) = 210
sMe = StrConv(bArr, vbUnicode)

此方式还可用于COM口通讯时汉字的还原。

另外还有一种还原方法:

Dim sMe as String
Dim PutCode As String
PutCode = "CED2"
sMe = Chr("&H" + PutCode)