如何用汇编语言将汉字转换成Unicode代码

追问：关键问题是在汇编程序中如何将汉字转换成Unicode代码，谢谢！

答案：汉字的常见字库字符集（收录汉字并给于编码）有big5（港台常用），GB2316（移动设备常用），GB180（较新，字库更大更全）
Unicode是一个编码系统，有多种实现方式：utf-7（早期欧美），utf-8（网页常用），utf-16,utf-32等。（都可以收录上面提到的几个汉字字符集）
你所问的估计是在Unicode的几种编码中转换，或者是ANSI编码（微软Windows默认的一种编码实现）转为Unicode吧？

其他：汉字本来就是要用unicode编码的了(你想ASCII行吗)
所以你接收到汉字的那个缓冲区里面就是汉字的unicode码了 汇编 朱班剑濮盟媚冒亘旬芊治垣归荣杯冀泓勖诒果薄

回答补充： 用Chr()函数把ascii码转化成汉字
用ChrW()函数把Unicode码转化成汉字

（还有之前说的
AscW()函数返回值为负的时候，应加上65536 才得到汉字实际的Unicode码）

----------------------------------------------------------------------------------------

求汉字的Unicode代码 用AscW()函数
AscW("汉")=27721

求汉字的ASCII码 用Asc()函数 返回一个负数值
如Asc("汉")=-17734

PS:PS:改进了下 可转化多个汉字
在窗体上建三个text控件，
功能：text1中按个输入汉字后 text2中按个显示汉字的Unicode代码 text3中显示汉字的ASCII码

原代码如下：

Private Function change(s As String) As String
change = AscW(s)
If change < 0 Then
change = change + 65536
End If
End Function

Private Function change2(s As String) As String
change2 = Asc(s)
End Function

Private Sub Text1_Change()
For i = 1 To Len(Text1.Text)
s = s & change(Mid(Text1.Text, i, 1)) & " "
Next
Text2.Text = s

s = ""
For i = 1 To Len(Text1.Text)
s = s & change2(Mid(Text1.Text, i, 1)) & " "
Next
Text3.Text = s
End Sub


补充：a 的ASCII码是97 
Asc函数返回的是字符串首字母的ASCII码（如字符串只一个字符，即返回该字符的ASCII码） 

Asc 函数
      

返回一个 Integer，代表字符串中首字母的字符代码。

语法

Asc(string)

必要的 string 参数可以是任何有效的字符串表达式。如果 string 中没有包含任何字符，则会产生运行时错误。

PSPS: VB里 目前我还没找到能将之转换成 把汉字转换成西欧文编码的函数 不敢断言没有（有估计也很难找 我搜了好多关键字都没找到）

还有 不只是遨游浏览器，一般的IE浏览器 也有此功能

查看——编码——其他——最下面那小三角号——西欧(ISO) 

上一个：谁能给个RC震荡电路的设计图
下一个：寻求一个单片机程序