我使用print函数在窗体上显示字体,好像只是GB2312的编码,请问如何显示通用UNICODE编码的文字?我是读的textbox中的文字,是UNICODE编码的。会不会是读的问题呢,我试过复制粘贴进textbox中的文字可以是unicode的,但是我打开一个unicode编码的tex文件进去就会是乱码?如何读一个unicode编码的文本文件到textbox中?请各位高手不吝赐教,在线等,比较急

解决方案 »

  1.   

    http://topic.csdn.net/u/20080918/22/50cfecd1-28d3-465c-8e00-e9d353d0dd05.html下面再节选一下贴子里面的方法.'调用实例:
    'MsgBox strUcodeToCh("\u4f31\u7ba1\u6211\u5436\u4e48\u591a")
    Private Function strUcodeToCh(strUCode$) As String
        Dim v, i&, l&, strResult$
        strUCode = Mid(strUCode, 2)
        v = Split(strUCode, "\")
        For i = 0 To UBound(v)
            l = CLng("&H" & Mid(v(i), 2, 2)) * 256 + CLng("&H" & Mid(v(i), 4))
            strResult = strResult & ChrW(l)
        Next
        strUcodeToCh = strResult
    End Function
      

  2.   

    http://support.microsoft.com/kb/193540/zh-cn
    看看这个