在VB中使用WORD时出现的问题

Question

我在VB中用语句来控制WORD，
用下列语句：
Set wd = CreateObject("Word.Basic")
……
……
Set wd = Nothing
当程序结束后我发现WINWORD.EXE进程仍在运行。请问一下高手，用什么语句可以将WORD完全关闭。

Answer 1

一般说来如果你应该先创建一个word.application对象，然后再操作完成后将在这个application上打开的所有对象都关闭，然后application退出（使用quit方法）。然后再设置为nothing就OK了。

Answer 2

Dim wdApp As Application
Dim wdDoc As Word.Document
Dim OpenFile As StringSet wdApp = CreateObject("Word.application")
Set wdDoc = wdApp.Documents.Open(OpenFile, , True)
...
...
wdDoc.Close
wdApp.Quit
Set wdDoc = Nothing
Set wdApp = Nothing

Answer 3

word对象我很少用，我想可能就是像楼上说的，你没有将对象nothing掉。
另外，如果你是在Class中调用对象，需要注意的是，不要让word产生对话框，比如退出的时候word询问是否保存的对话框等，因为在这个时候，这个对话框是不会出现在屏幕上，但是会一直在后台中等待输入，这种情况也会造成word、excel对象等无法退出的现象。

Answer 4

同意come2000(come2000) 的说法

Answer 5

Word 2000高级教程(PDF)　
http://www.chinaz.com/download/download.asp?LINK=102248841128752&Url=115
关于microsft word 对象
http://club.excelhome.net/viewfile.asp?id=7987

Answer 6

dim mApp As Word.Application
Dim mDoc As Word.Document
Set mApp = CreateObject("word.application")
Set mDoc = mApp.Documents.Open("d:\" & "文本文件\" & "www.doc")
mApp.WindowState = wdWindowStateMaximize
mApp.Visible = True

Answer 7

Dim wdApp As Application
Dim wdDoc As Word.DocumentSet wdApp = CreateObject("Word.application")
Set wdDoc = wdApp.Documents.Open("你的文件路径")
...
...
wdDoc.Close
wdApp.Quit
Set wdDoc = Nothing
Set wdApp = Nothing