标题:printer对象打印问题
只看楼主
suofeiya
Rank: 1
等 级:新手上路
帖 子:12
专家分:0
注 册:2010-10-15
结帖率:100%
已结贴  问题点数:20 回复次数:4 
printer对象打印问题
本人VB6新手上路,请教大家一个问题,先表示感谢!
command1是打印按钮,原是想点击该按钮后打印图片,可是只有把程序退出后才能打印。怎么样才能不退出程序就能实现打印呢?
private sub command1_click()
    Printer.ScaleMode = 6
    Printer.ScaleWidth = 102
    Printer.ScaleHeight = 152
    Printer.CurrentX = 0
    Printer.CurrentY = 0
    Printer.PaintPicture Image1.Picture, 5, 5, 80, 60
    Printer.PaintPicture Image1.Picture, 5, 75, 80, 60
    Printer.PaintPicture Image2.Picture, 10, 10, 5, 5
    Printer.PaintPicture Image2.Picture, 10, 80, 5, 5
end Sub
搜索更多相关主题的帖子: printer 对象 打印 
2010-10-15 22:52
jack10141
Rank: 11Rank: 11Rank: 11Rank: 11
来 自:陕西西安
等 级:小飞侠
威 望:6
帖 子:706
专家分:2271
注 册:2010-8-10
得分:5 
好久没玩VB了!呵呵,先顶一个再说!

Coding就像一盒巧克力,你永远不会知道你会遇到什么BUG
别跟我说你是不能的,这让我愤怒,因为这侮辱了你的智慧
2010-10-15 23:49
Artless
Rank: 19Rank: 19Rank: 19Rank: 19Rank: 19Rank: 19
等 级:贵宾
威 望:103
帖 子:4211
专家分:28888
注 册:2009-4-8
得分:5 
enddoc

无知
2010-10-16 00:32
风吹过b
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
等 级:贵宾
威 望:364
帖 子:4912
专家分:29900
注 册:2008-10-15
得分:10 
Printer.enddoc  所有的打印都结束了,告诉打印机开始输出。
Printer.KILLdoc 放弃刚才那一页的打印,
Printer.newdoc  开始新的一页。

随手写的,如果有错,就自己查书。
打印结束后,一定要用一个 enddoc 来结束打印,打印机才会开始动作。否则,打印机还认为还要数据需要打印,就一直会等待中,直到程序结束。

授人于鱼,不如授人于渔
早已停用QQ了
2010-10-16 09:03
suofeiya
Rank: 1
等 级:新手上路
帖 子:12
专家分:0
注 册:2010-10-15
得分:0 
谢谢
2010-10-16 09:39



参与讨论请移步原网站贴子:https://bbs.bccn.net/thread-323021-1-1.html




关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.508362 second(s), 8 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved