如何由两个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)

 

上一个：如何转换C代码中的高字和低字
下一个：如何使用未安装的字体？