有没有可以退出winword的方法
编号：QA004245
建立日期: 2001年6月7日 最后修改日期：2001年6月7日
所属类别：
杨过:
我使用下面这段代码可以新建写入一个WORD文件，但无法从内存中退出winword，我原本想从对象库中寻找一下有没有可以退出winword的方法，可是我发现对象库中根本没有Word.Basic这个对象，请问我该怎么办？谢谢。
Private Sub CmdWriteWord_Click()
Dim wd As Object
Dim sFileName As String
CommonDialog1.Flags = &H4
CommonDialog1.ShowSave
If Err <> 0 Then Exit Sub
sFileName = CommonDialog1.FileName
If sFileName = "" Then Exit Sub
Set wd = CreateObject("Word.Basic")
wd.FileNewDefault
wd.FontSize 20
wd.Insert "Hello,World" + Chr(13)
wd.Insert "012346789"
wd.FileSaveAs (sFileName)
wd.FileClose
Set wd = Nothing
End Sub
另：我打开你们主页上的提问页面并将问题填写完毕后，总是无法发送成功。
回答:
你可以使用wd.Quit来退出Word。不过我建议不要再使用Word.Basic对象了，因为从Word 95起，Word Basic就完全被VBA取代了。你应该使用CreateObject("Word.Application")，虽然Word Basic和VBA不完全不同，但Word本身的帮助中有大量介绍，你很容易掌握。
相关问题：
QA002334 "在VB6中如何调用WORD97中的宏"
QA003726 "用CreateOleObject的方法调用EXCEL，结束时无法从内存中把EXCEL卸掉"
此问题由李海回答。
| |
|
|
| |
|
|
