一个迫切需要高手指教的问题

Question

我用VB编写了个系统，其中有个功能是：从Word文档中读取数据到Richtextbox中，可是读出的却是乱码，我的代码如下：RichTextBox1.FileName = App.Path & "\c++试卷\" & im(rst.Fields(1)) & ".doc"
Set MyDoc = MyWord.Documents.Open(RichTextBox1.FileName)
Set MyWord = Nothing按照网友的答复，引用个word
并定义：
Dim wordname As Stringwordname = CommonDialog1.FileName
Dim wapp As New Word.Application
Dim wdoc As Word.Document
Set wdoc = wapp.Documents.Open(FileName=wordname)
Set wapp = Nothing
可读出来的还是乱码啊？朋友们回复时教我怎么解决乱码问题，前提是我必须要从Word中读出数据到RichTextBox1中。
心急！亟盼回复！谢谢！
或QQ：572221876

Answer 1

字符串转换,StrConv(String,vbUnicode)