7,789
社区成员
发帖
与我相关
我的任务
分享一个字符转换问题，谢谢！
对于一个中文字符串，如：“四川省”，我现在知道的是它的ASCII码。这三个字对应的ASCII码为：203 196 180 168 202 161
我怎么把这些数字转换成文字，即：“四川省”
谢谢！
我怎么把这些数字转换成文字，即：“四川省”
谢谢！
...全文
请发表友善的回复…
发表回复
juge 2003-05-25
- 打赏
- 举报
Chr(52164)我用提示参数错误。能用的是ChrW(22235)，怎样转化前者位后者。谢谢！
polarwyp 2003-05-24
- 打赏
- 举报
就像上面说的。Chr(Asc("四"))="四"
icedot 2003-05-24
- 打赏
- 举报
UP
northwolves 2003-05-24
- 打赏
- 举报
Chr(52164)="四"
tiande 2003-05-24
- 打赏
- 举报
等待答案，很关注！
juge 2003-05-24
- 打赏
- 举报
203*256+196 结果也就是：52164
这样用：
Chr(52164)，不对。而这样用：ChrW(52164)，结果为“?”
而这样用：ChrW(22235)，结果就是“四”
我想22235和52164之间一定存在某些联系。如果知道这两个数之间的联系，也就是怎么转换的，那么问题就可以解决了！
大家帮忙想想，谢谢！
这样用：
Chr(52164)，不对。而这样用：ChrW(52164)，结果为“?”
而这样用：ChrW(22235)，结果就是“四”
我想22235和52164之间一定存在某些联系。如果知道这两个数之间的联系，也就是怎么转换的，那么问题就可以解决了！
大家帮忙想想，谢谢！
juge 2003-05-23
- 打赏
- 举报
大家帮帮忙呀！
jacezhang 2003-05-23
- 打赏
- 举报
right way!
juge 2003-05-23
- 打赏
- 举报
我不用VBA，就用VB不同的函数。怎么实现，谢谢！
of123 2003-05-23
- 打赏
- 举报
高！
IMHELLFIRE 2003-05-23
- 打赏
- 举报
试一试这：
Dim ss(1 To 6) As Byte
ss(1) = 203
ss(2) = 196
ss(3) = 180
ss(4) = 168
ss(5) = 202
ss(6) = 161
Debug.Print VBA.StrConv(ss, vbUnicode)
Dim ss(1 To 6) As Byte
ss(1) = 203
ss(2) = 196
ss(3) = 180
ss(4) = 168
ss(5) = 202
ss(6) = 161
Debug.Print VBA.StrConv(ss, vbUnicode)
