杭州交通信息网斗战神为什么安装不了:VB，中文字符如何转ascii？
来源：百度文库 编辑：杭州交通信息网 时间：2024/05/09 02:17:51
==========
Private Sub Command1_Click()
Dim a, b
a = Asc("z")
b = Asc("之")
Text1.Text = a
Text2.Text = b
End Sub
==========
我这样输出的结果122和-10578。。。明显“之”的ascii码错了。。。正确的方法应该是怎样？？？
Private Sub Command1_Click()
Dim a, b
a = Asc("z")
b = Asc("之")
Text1.Text = a
Text2.Text = b
End Sub
==========
我这样输出的结果122和-10578。。。明显“之”的ascii码错了。。。正确的方法应该是怎样？？？
Asc() 可以把字符转成 Ascii 码
chr() 可以把 Ascii 转成字符!
另外汉字的 Ascii 码是两个负数,因为汉字占两个字节