作者fumizuki (小狮子)
看板Visual_Basic
标题Re: [VB6 ] 不用Crystal Report做出列印预览
时间Fri Jul 22 09:39:27 2005
※ 引述《saap (saap)》之铭言:
: 请教各位网友,
: 我有四张图片利用printer指令可做到列印效果,
: 但若我想做预览的功能要如何做呢?
: 之前尝试过贴在form上然後用form.printform,
: 但因为四张图加起来长度为A4纸张大小,
: 而form的长度无法那麽大因此此方法只好作罢,
: 不知是否还有其它方式可以办到,
: 谢谢。
我会选择用picturebox
For x = 0 To Picture1.ScaleWidth
For y = 0 To Picture1.ScaleHeight
Printer.PSet (x, y), Picture1.Point(x, y)
Next
Next
--
VB 程式设计 仓木麻衣 PTT 星爷板 行列输入法
======================================================
Visual_Basic MaiKuraki Stephen Array
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 61.222.155.162