用vbs把asc码:-15133转为汉字,要源代码

如果不能转为汉字就转为英文

msgbox chr(-15133)

这个不用代码,内置函数 chr 就可以


chr(-15133)="你"



追问

可是我当初输入的是“”你好啊

可是我当初输入的是“”你好啊

追答

asc("你好") 只取了 第一个字符的 ascii 码

如果你要取 你好两个字的代码,


a = "你好"
For i = 1 To Len(a)
MsgBox Asc(Mid(a, i, 1))
Next


用这个代码,已经测试

追问

谢谢,很有用

温馨提示:答案为网友推荐,仅供参考

相关了解……

你可能感兴趣的内容

本站内容来自于网友发表,不代表本站立场,仅表示其个人看法,不对其真实性、正确性、有效性作任何的担保
相关事宜请发邮件给我们
© 非常风气网