作者virrkw (城市涂鸦糖果地图)
看板Visual_Basic
标题[VB6 ] 关於WORD列印
时间Mon Dec 25 22:11:01 2006
Set WORD = CreateObject("Word.Application")
WORD.Documents.Add Template:=App.Path & "\WORD.dot",
NewTemplate:=False, DocumentType:=0 '载入样板档
Set Report = WPORD.ActiveDocument
'上列步骤大致上是呼叫WORD
'之後会把资料写入样版档里
'接着开始准备列印文件
dialog1.CancelError = False
dialog1.ShowPrinter '呼叫印表机视窗介面
Report.PrintOut
Set Report = Nothing
Set WORD = Nothing
以上是我的WORD文件列印程式码
但是呼叫出列印对话後
不管是按确定或取消
它都会很勤劳帮你列印orz
目前判定是因为 Report.PrintOut 会造成列表机必定列印出此文件来
但是不知道该怎麽修改
或是改用其他方法
希望给予指教 感激^^
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 140.115.231.91
1F：推 fumizuki:你 CancelError 要设为 True 不然怎麽知道有没有按取消 12/26 12:33
2F：推 fumizuki:去查看看 on error goto [label] 语法吧 12/26 12:33