1. 取一下SystemInformation.DbcsEnabled 的值. 如果是false, Acs()的方法就不可能在你机器上完成你的目标.
2.
'54936 for GB18030 (Chinese Simplified).
Dim enc As System.Text.Encoding = _
System.Text.Encoding.GetEncoding(54936)
Dim myByte As Byte() = enc.GetBytes("好")
Dim j As Integer
j = myByte(0) * 256 + myByte(1)
MsgBox(enc.GetChars(myByte))
这段代码中. myByte(0), myByte(1) 组合就是你要的汉字编码. 是否就是j我不清楚(我从未接触过汉字编码).
我想你的问题可以解决了吧. 看了之后请作个回复.
2.
'54936 for GB18030 (Chinese Simplified).
Dim enc As System.Text.Encoding = _
System.Text.Encoding.GetEncoding(54936)
Dim myByte As Byte() = enc.GetBytes("好")
Dim j As Integer
j = myByte(0) * 256 + myByte(1)
MsgBox(enc.GetChars(myByte))
这段代码中. myByte(0), myByte(1) 组合就是你要的汉字编码. 是否就是j我不清楚(我从未接触过汉字编码).
我想你的问题可以解决了吧. 看了之后请作个回复.