快捷搜索:  as  2018  FtCWSyGV  С˵  test  xxx  Ψһ  w3viyKQx

八达国际网:VB编程基础教程打印篇



快速打印多个拷贝

当以TrueType字体打印一个八达国际网文档时,系统将下载打印机必要的字体,这样做将花费很长的光阴。你可以经由过程在一个打印机文档中打印所有的拷贝实现快速打印多个拷贝内容:

For i=1 To num_copies

注释:Printthedocumenthere...

Printer.NewPage

Next i

Printer.EndDoc

打印灰色行和区域

诟谇打印机不能打印灰色行,然则能经由过程发抖处置惩罚来创建灰色区域。为了创建环抱一个区域的一个灰色界限,应用DrawStyle=vbInvisible(5)来绘制一个窄灰色框,这样就没有了界限。

设置打印的界限

应八达国际网用打印的scale认识来设置界限。设置了这个属性后,坐标(0,0)就映射到你必要加边的地方。比如,下面的代码设置左界限为0.5英寸,上界限为0.75英寸。然后再乘以1440转换为twip。

Printer.ScaleLeft=-0.5*1440

Printer.ScaleTop=-0.75*1440

Printer.CurrentX=0

Printer.CurrentY=0

很遗憾,打印机不能正确地按照你所想的进行打印。试一试应用下面的敕令在左上角打印一个1英寸大年夜小的方块:

Printer.Line(1440,1440)-Step(1440,1440)

看看偏离了若干。试一试多打印几回,假如发明打印机有必然规律的偏离,你就可以按八达国际网照必然的差额进行增减来达到最佳的效果。

供给打印预览

建立打印法度榜样时,先设置一个要绘制的工具做为参数,然后通报给法度榜样一个打印的工具。

为了实现预览效果,通报给法度榜样一个暗藏PictureBox。然后,根据必要的比例,应用P八达国际网aintPicture拷贝这个暗藏图形到一个可见的 PictureBox。在暗藏PictureBox上按照全尺寸绘制图形,首介绍许你按比例抉择了字体,并且,也实现了不掉八达国际网真地完成其他图形的描述

您可能还会对下面的文章感兴趣: