Simone易语言汉字转unicode源码，谁给我个！！！！！！！！
的有关信息介绍如下：
.版本 2.支持库 commobj.子程序 _按钮1_被单击编辑框2.内容 ＝ 字节集到十六进制文本 (A2W (编辑框1.内容)).子程序 A2W, 字节集.参数 参数_Ansi文本, 文本型.参数 参数_代码页, 整数型, 可空, 默认为：#CP_ACP = 0.局部变量 局部_Ansi长度, 整数型.局部变量 局部_Unicode长度, 整数型.局部变量 ret, 字节集局部_Ansi长度 ＝ 取文本长度 (参数_Ansi文本) ＋ 1局部_Unicode长度 ＝ MultiByteToWideChar (参数_代码页, 0, 参数_Ansi文本, 局部_Ansi长度, ret, 0) × 2ret ＝ 取空白字节集 (局部_Unicode长度).如果真 (MultiByteToWideChar (参数_代码页, 0, 参数_Ansi文本, 局部_Ansi长度, ret, 局部_Unicode长度) ＝ 0) 返回 ({ 0, 0 }).如果真结束返回 (ret).子程序 字节集到十六进制文本, 文本型.参数 字节集, 字节集.局部变量 变量, 整数型.局部变量 临时文本, 文本型.局部变量 长度, 整数型.局部变量 文本, 快速文本对象.局部变量 a, 整数型长度 ＝ 取字节集长度 (字节集).计次循环首 (长度, 变量) 临时文本 ＝ 取十六进制文本 (字节集 [变量]) 文本.添加 (“ ”) 文本.添加 (取重复文本 (2 － 取文本长度 (临时文本), “0”)) 文本.添加 (临时文本) .如果真 (变量 ％ 16 ＝ 0) ' 一行显示16字节 文本.添加 (#换行符) .如果真结束 处理事件 () .计次循环尾 ()返回 (文本.取文本 (, )).DLL命令 MultiByteToWideChar, 整数型, "kernel32.dll", "MultiByteToWideChar", , 将多媒体字符串映像为通配字符串 .参数 代码页, 整数型 .参数 标志, 整数型 .参数 双字节文本, 文本型 .参数 双字节文本长度, 整数型 .参数 宽字符文本, 字节集 .参数 宽字符文本长度, 整数型
