首页 诗词 字典 板报 句子 名言 友答 励志 学校 网站地图
当前位置: 首页 > 教程频道 > 开发语言 > VB >

十六进制转换中文字符串,该怎么处理

2012-01-15 
十六进制转换中文字符串如题,请问如何将读取的十六进制转换为中文字符.十六进制字符串:A3A8C4D0D3C3A3A9对

十六进制转换中文字符串
如题,请问如何将读取的十六进制转换为中文字符.
十六进制字符串:A3A8C4D0D3C3A3A9
对应中文字符串:   (男用)

[解决办法]
Dim x As String
Dim xb() As Byte

x = "A3A8C4D0D3C3A3A9 "
ReDim xb(Len(x) \ 2 - 1)

Dim i As Long
For i = 0 To UBound(xb)
xb(i) = Val( "&H " & Mid(x, i * 2 + 1, 2))
Next

MsgBox StrConv(xb, vbUnicode)

热点排行