代码:
Dim a As New Word.Application
Dim b As New Word.Document Set b = a.Documents.Add(StrFileName1)
a.Visible = True
b.PrintOut a.Quit Set oc = Nothing
Set ow = Nothing这段程序还没有打印就退出Word,假如把a.Quit去掉,则没有关闭word,怎样才能判断打印完成,在关闭word.
Dim a As New Word.Application
Dim b As New Word.Document Set b = a.Documents.Add(StrFileName1)
a.Visible = True
b.PrintOut a.Quit Set oc = Nothing
Set ow = Nothing这段程序还没有打印就退出Word,假如把a.Quit去掉,则没有关闭word,怎样才能判断打印完成,在关闭word.
解决方案 »
- 一个关于透明画图的难题,给出我最后100分,请帮忙看看!在线等。。
- 怎么样将从XML里面读出来的数据绑定或者是插入到MSHFlexGrid里面呢?
- 100分求助:我想写一个数据导航按钮控件,可以吗?
- 帮我看看该段代码
- 新年好!放假了,散分!另有一事相求,完成马上结贴,最迟今日12:30分结贴
- QQ被盗气死我了有??? 有帮忙的吗??有高分???10010
- 谁能告诉我tabstrip的用法?
- 又是关于msflexgrid的问题,高手请进
- 請教各位,如何創建遠程對象。
- 帮帮我吧!非常感激您。(Vb录音方面)
- 诚心求购或交换:商场或超市管理系统源代码
- 超难!!来看看啊!解决了给200分!!!!在线等待!
前加一个DoEvents试试