关于使用AscW读取字符编码的有关问题
关于使用AscW读取字符编码的问题我给大家一个例子，请教看看如何解决？Dim str As Stringstr ChrW(&H2480)
关于使用AscW读取字符编码的问题
我给大家一个例子，请教看看如何解决？
Dim str As String
str = ChrW(&H2480)'对应一个男人图案
RichTextBox1.SelFontName = "Webdings"'这是字库文件
SendMessage RichTextBox1.hwnd, EM_REPLACESEL, 0, ByVal str '发送按键字符
RichTextBox1.SelStart = RichTextBox1.SelStart - 1
RichTextBox1.SelLength = 1
MsgBox Hex(AscW(RichTextBox1.SelText))
上边的程序，按理MsgBox显示的应该是2480，但是出来的是3F，注意如果读取&H4E00以后的汉字部分，是没有问题的。
如果将上边程序中的2480换成2481(对应女人图案)，在RICHTEXTBOX中显示是没有问题的，关键是MsgBox读取出来的还是3F，这是为何？
请问如果要想得到2480这个编码，最简单的方法是什么？谢谢!
[解决办法]你必须使用 GB 码。不要直接用区位码。
&H3f 是问号 ？。中文系统对于无法解析的 Unicode 码，一律替换为问号。
[解决办法]GB2312
