VB编程步步高－打印篇（二）

快速打印多份。

用TrueType字体打印文档时，系统会下载打印机需要的字体，这需要很长时间。通过在一个打印机文档中打印所有副本，您可以快速打印多个副本:

对于i = 1到num_copies
注意:在此打印文档...

Printer.newpage
接下来我
printer.enddoc
打印灰色线条和区域。

打印机不能黑白打印灰色线条，但可以通过抖动创建灰色区域。要在一个区域周围创建一个灰色边框，用DrawStyle=vbInvisible(5)画一个窄的灰色框，这样就没有边框了。

设置打印边界。

使用打印的熟悉度来设定界限。设置该属性后，坐标(0，0)被映射到需要添加边的地方。例如，下面的代码将左边距设置为0.5英寸，上边距设置为0.75英寸。然后乘以1440以转换成缇。

打印机。scale left =-0.5 * 1440
打印机。scale top =-0.75 * 1440
打印机。CurrentX = 0
打印机。CurrentY = 0

遗憾的是，打印机无法完全按照您的要求打印。尝试使用以下命令在左上角打印一个1英寸的正方形:

打印机。行(1440，1440)-步骤(1440，1440)

看偏差。尝试打印几次。如果发现打印机有规律的偏移，可以按照一定的差异进行增减，达到效果。

提供打印预览。

在设置打印程序时，首先将一个要绘制的对象设置为参数，然后将其作为打印对象传递给程序。

要实现预览效果，向程序传递一个隐藏的PictureBox。然后，根据需要的比例，使用PaintPicture将这个隐藏的图形复制到一个可见的PictureBox中。在hidden PictureBox上全尺寸绘制图形首先让你按比例决定字体，也实现了对其他图形的无失真描述。