VB.NET如何打开word文档？

[paulqingxue1]

RT，最好有代码，谢谢

[paulqingxue1]

有人木有？

[paulqingxue1]

斑竹救我，别沉了。。。

[paulqingxue1]

没人。。。。。。。。。

[hztltgg]

如果机器上没装office的话，你可以下载Aspose.Word，就在csdn上有破解

    Sub Main()

        Dim a As New Aspose.Words.Document("D:\A.doc")
        Debug.Print(a.ToTxt())

    End Sub

[jhonsonzhang]

在程序里面添加引用com类,找到microsft word **.0
然后在类定义前面：
Imports Microsoft.Office.Interop.word
具体到方法或过程里面：
dim wapp as new word.application
dim wdoc as document=wapp.documents.open(DocFilePath)

然后就可以对wdoc这个文档进行各种操作了。

[wuyq11]

using Word = Microsoft.Office.Interop.Word;
Microsoft.Office.Interop.Word.ApplicationClass app = new Microsoft.Office.Interop.Word.ApplicationClass();
object nothing = System.Reflection.Missing.Value;
object optional = System.Reflection.Missing.Value;
string sFile= "";
Microsoft.Office.Interop.Word._Document Doc = app.Documents.Open(ref sFile, ref optional, ref docreadonly, ref optional, ref optional, ref optional, ref optional, ref optional, ref optional, ref optional, ref optional, ref visible, ref optional, ref optional, ref optional, ref optional);

[paulqingxue1]

这位大哥说的不错，但是我是想显示，相当于双击！不是要打开操作。我是小菜，您看能不能说的详细点啊。
[Quote=引用 5 楼 jhonsonzhang 的回复:]
在程序里面添加引用com类,找到microsft word **.0
然后在类定义前面：
Imports Microsoft.Office.Interop.word
具体到方法或过程里面：
dim wapp as new word.application
dim wdoc as document=wapp.documents.open(DocFilePath)

然后就可以对wdoc……
[/Quote]

[paulqingxue1]

有office怎么办？
[Quote=引用 4 楼 hztltgg 的回复:]
如果机器上没装office的话，你可以下载Aspose.Word，就在csdn上有破解


VB.NET code

Sub Main()

Dim a As New Aspose.Words.Document("D:\A.doc")
Debug.Print(a.ToTxt())

End Sub
[/Quote]

[paulqingxue1]

哎，为什么每次都是我知道了答案你们都没有人能够解决我的问题。我很纠结啊，还有某些人总是搞些乱七八糟的东西想混分。哎，，，，结贴吧。答案是这样的
Dim word As New Microsoft.Office.Interop.Word.Application
Dim wdoc As Document = word.Documents.Open("c:\\1.doc")
wdoc.Activate()
word.Visible = True
这么简单的东西，知道的人一句话就答对。