如何把汉字转换成十六进制,请哪位大侠指点一二!
如何把汉字转换成十六进制,请哪位大侠指点一二!非常感谢!
程序代码:
Clear lcString = '中华人民共和国' *!* GB2312 For i = 1 To Lenc(lcString) ?Substrc(lcString, i, 1), Strconv(Substrc(lcString, i, 1), 15) Next ? *!* Unicode(cjk) For i = 1 To Lenc(lcString) m.Hex = Strconv(Strconv(Substrc(lcString, i, 1), 5), 15) ? Substrc(lcString, i, 1), Right(m.Hex, 2) + Left(m.Hex, 2) Next