简单问题：如何在VB中显示一个WORD文档的全部内容？

Question

方法1：用shell；
方法2：用Createobject；
方法3：在工程中引用word对象，然后在要打开word文档的地方定义一些变量来打开word文档。

Answer 1

TO: zhsu(做人Bata版)用richTextBox吗？可以保证读取各种版本的WORD文档吗？具体如何做？谢谢！

Answer 2

Documents.Open FileName:=dot, _
            ConfirmConversions:=False, ReadOnly:=True, AddToRecentFiles:=False, _
                PasswordDocument:="", PasswordTemplate:="", Revert:=False, _
                WritePasswordDocument:="", WritePasswordTemplate:="", Format:= _
                0
dot就是你的word文件路径及文件名称

Answer 3

','''╭⌒╮⌒╮.',''',,',.'',,','',.
 ╱◥██◣''o┈随风潜入夜┄o.'',,',.
︱田︱田田|  '',,',.o┈润物细无声┄o
╬╬╬╬╬╬╬╬╬╬╬╬╬╬╬╬╬╬

Answer 4

这样获得了一个document对象，该如何把它显示出来呢？（用什么控件）

Answer 5

怎么没有下文了啊lxcc大哥，小弟还是一头雾水啊

Answer 6

'不用控件
'先引用word对象库，声明一个word的applicationdim wrdApp as word.applicationOn Error Resume Next '忽略错误
    Set wrdApp = GetObject(, "Word.Application") '查找一个正在运行的Word拷贝
If Err.Number <> 0 Then '如果 Excel 没有运行则
    Set wrdApp = CreateObject("Word.Application") '运行它
End IfErr.Clear '清除发生错误的 Err 对象
On Error GoTo 0 Documents.Open FileName:="11.doc", ConfirmConversions:=False, ReadOnly:= _
        False, AddToRecentFiles:=False, PasswordDocument:="", PasswordTemplate:= _
        "", Revert:=False, WritePasswordDocument:="", WritePasswordTemplate:="", _
        Format:=wdOpenFormatAuto'在 FileName:="11.doc"处改你的文件所在的位置,就可以用word自己打开word文档

Answer 7

office坏掉，没时间继续整了，只好用RichText搞定。功能影响不大。
不管怎样，多谢各位，问题基本解决了：)