求助：怎么用VB程序打开一个指定路径的word文件。急！

Question

不嵌入，就直接打开就可以。

Answer 1

Private Sub Command1_Click()    Dim oWord As Word.Application
    Dim oDoc As Word.Document
    
    Set oWord = New Word.Application
    
    oWord.Visible = True
    
    With oWord
        .WindowState = wdWindowStateMaximize        
        Set oDoc = .Documents.Add(App.Path & "\fred.doc")
    End WithEnd Sub详情请参阅：
Application Object
http://msdn.microsoft.com/library/default.asp?url=/library/en-us/office97/html/output/F1/D6/S5B4A5.asp
Documents Property
http://msdn.microsoft.com/library/default.asp?url=/library/en-us/office97/html/output/F1/D6/S5B4A5.asp
Document Object
http://msdn.microsoft.com/library/default.asp?url=/library/en-us/office97/html/output/F1/D6/S5B4A5.asp

Answer 2

用shell行不行？
用api shellexecute（）行不行？
感觉这两上简单

Answer 3

Dim xlapp As New Word.Application
Set xlapp = New Word.Application'然后，可以用这些变量来访问在word应用程序中的从属对象、以及这些对象的属性和方法。例如：
Set xlapp = CreateObject("word.Application")
'激活word应用程序
xlapp.Visible = TURE
'打开word应用程序窗口
xlapp.Documents.Open (strDestination)‘strDestination是你要打开的文件路径，用字符串表示。