首先你要在VB的“工程”->“引用”中引用“MicrosoftWord9.0ObjectLibraryPrivateSubCommand1_Click()"開啟指定的Word檔案DimwdAppAsWord.ApplicationDimaDocAsDocumentSetwdApp=NewWord.ApplicationSetaDoc=wdApp.Documents.Open(FileName:="你要開啟的Word檔案路徑及檔名")wdApp.Visible=True"設定Word物件可見EndSub不過你要關閉word檔案時要釋放物件aDoc.Close"關閉檔案wdApp.Quit"退出Word程式SetaDoc=Nothing"釋放物件SetwdApp=Nothing你可以再放一個按鈕，將上面程式碼放進去，用這個按鈕來關閉Word並釋放物件。如果你直接在Word程式中關閉檔案的話，就將word物件定義在一個類模組中PublicWithEventswdAppAsWord.Application，再在wdApp_Quit()事件中加入釋放物件的程式碼。如果關閉word檔案而沒有釋放物件的話，你只有重新執行剛才用來開啟word檔案的程式才能再次開啟word檔案。