VB打印设置的一些摘要
尺寸：
直接设置打印机 Height 和 Width 属性，会自动地将 PaperSize 设置为vbPRPSUser。
Printer.Height=10*567
Printer.Width=5*567
Printer.ScaleWidth = 210
Printer.ScaleHeight = 297
Printer.ScaleMode = 6 '设置打印的单位
Printer.PaperSize = vbPRPSA4 '定义纸张大小为A4
Printer.FontSize = 11
'如何用printer设置打印方向为横向打印
---------------------------------------------------------------
Printer.Orientation=VbPRORPortrait'纵向打印
Printer.Orientation=VbPRORLandscape'横向打印
---------------------------------------------------------------
Printer.Orientation = VbPRORLandscape
---------------------------------------------------------------
Printer.Orientation = 2
'设置打印页边距
'你可以使用打印机的Scale属性来设置打印页边距。下面的代码设置左边距为1/2英寸。右边距为3/4英寸。乘以1440是将英尺转换成twips。
Printer.ScaleLeft = -0.75 * 1440
Printer.ScaleTop = -0.5 * 1440
Printer.CurrentX = 0
Printer.CurrentY = 0
直接设置打印机 Height 和 Width 属性，会自动地将 PaperSize 设置为vbPRPSUser。
Printer.Height=10*567 Printer.Width=5*567 Printer.ScaleWidth = 210 Printer.ScaleHeight = 297 Printer.ScaleMode = 6 '设置打印的单位 Printer.PaperSize = vbPRPSA4 '定义纸张大小为A4 Printer.FontSize = 11 '如何用printer设置打印方向为横向打印 --------------------------------------------------------------- Printer.Orientation=VbPRORPortrait'纵向打印 Printer.Orientation=VbPRORLandscape'横向打印 --------------------------------------------------------------- Printer.Orientation = VbPRORLandscape --------------------------------------------------------------- Printer.Orientation = 2'设置打印页边距 '你可以使用打印机的Scale属性来设置打印页边距。下面的代码设置左边距为1/2英寸。右边距为3/4英寸。乘以1440是将英尺转换成twips。Printer.ScaleLeft = -0.75 * 1440 Printer.ScaleTop = -0.5 * 1440 Printer.CurrentX = 0 Printer.CurrentY = 0
缇是一个与屏幕无关的单位，用来保证屏幕应用程序对屏幕元素的定位和比例在所有的显示系统上的一致性。一缇等价于 1/20 个打印机的磅。一逻辑英寸大约有 1440 缇，一逻辑厘米约 567 缇（打印时的一英寸或一厘米所对应的屏幕上的长度）。
