2014-03-03
Private Sub 命令0_Click() Dim Wkword As New Word.Application Dim WkDoc As Word.Document Set WkDoc = WkWord.Application.Documents.Open("c:my documents文档.doc") WkDoc.PrintOut False WkDoc.Close WkWord.Quit End Sub
在printout后面加上FLASE，会等打完之后再关闭。
… http://www.wfuyu.com/access/6298.html
