-- 作者:don
-- 发布时间:2011/8/21 17:12:00
--
DirectPrint
直接打印表。
语法:
DirectPrint(Preview, ShowDialog)
Preview:
是否打印预览,设为True预览,设为False直接打印。 ShowDialog:是否显示打印对话框。
例如:
With
CurrentTable.PrintInfo
.PaperKind = 0
\'纸张类型设为自定义
.PaperWidth = 250
\'宽度设为250毫米
.PaperHeight = 120
\'高度设为120毫米 End
With CurrentTable.DirectPrint(True,False) \'打印预览
|