读书人

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

发布时间: 2012-01-15 22:57:48 作者: rapoo

十六进制转换中文字符串
如题,请问如何将读取的十六进制转换为中文字符.
十六进制字符串: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)

读书人网 >VB

热点推荐