怎样打开一个现有的WORD文档？

Question

怎样打开一个现有的WORD文档，而不是创建一个新的WORD？

Answer 1

dim path as string
Private Declare Function shellexecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, ByVal lpdirectory As String, ByVal nShowCmd As Long) As Long 
Private Const sw_shownormal = 1
Private Const sw_showminimized = 2
path="d:\kpsdf.doc"
Call shellexecute(Me.hwnd, "open", path, vbNullString, vbNullString, sw_shownormal)

Answer 2

Dim Wdapp As Word.Application
            Dim WdDocument As Word.Document
            Dim UserFile As String
            Set Wdapp = New Word.Application
            '先做一个word模板，然后打开
            UserFile = App.Path & "\电子病历模板.doc"
            Set WdDocument = Wdapp.Documents.Open("userfile")

Answer 3

Dim wdApp As Application
Dim wdDoc As Word.Document
Dim OpenFile As StringSet wdApp = CreateObject("Word.application")
Set wdDoc = wdApp.Documents.Open("d:\例.doc")
......wdDoc.Close
wdApp.Quit
Set wdDoc = Nothing
Set wdApp = Nothing