用printer对象打印表格VB 电脑资料

用printer对象打印表格VB电脑资料 用printer对象打印表格用msflexgrid控件显示的表格，要将 它打印出来，最简单的方法是用printform方法，然而这只适合于 数据正好能被屏幕显示的，即数据量少的，而且这种打印效果很 差， 用printer对象打印表格 下面我就用一实例来说明: 打印的内容是一张数据表，这里就只有两列数据，包括标题，副标 题。(用A4纸打印) 假设数据处在CDataArray(),和RDataArray()中CName与RName分 别为两数据项的字段名 PublicSubPrinttable() 注释：初始化 Dimprinter1asPrinter Dimpageheader Dimpagefooter Dimpageleft Dimpageright Dimusewidth Dimuseheight Dimi,j,kAsInteger DimwordAsString Dimstartx Dimstarty Dimstartyline‘用来纪录打印竖线的起点