应用程序窗体的PrintForm方法时,Visual Basic把窗体的位图送到当前打印机。该方法的优点在于它几乎不需要任何编程,但也有很大缺陷。最为突出的是当低分辨率图形在高分辨率打印机上打印时,其结果令人无法满意,会产生锯齿。下面代码将在打印机上打印窗体。 Private Sub Command1_Click() '用PrintForm打印 Me.PrintForm '打印窗体的可见区域 End Sub 直接打印窗体 在FORM1中增加命令按钮(command),CAPTION属性设为直接打印, 再写入下列代码: Sub command_click Form1.printform End sub 这样即可通过打印窗体FORM1的方法把GRID1的数据打印出来。这 种方法的缺点是只能打印GRID1中显示的数据部分,显示不出来的则无 法打印,而且这种打印方法很像屏幕硬拷贝,而且不能灵活地控制字体 等。
Me.PrintForm '打印窗体的可见区域
End Sub
直接打印窗体
在FORM1中增加命令按钮(command),CAPTION属性设为直接打印, 再写入下列代码:
Sub command_click
Form1.printform
End sub
这样即可通过打印窗体FORM1的方法把GRID1的数据打印出来。这 种方法的缺点是只能打印GRID1中显示的数据部分,显示不出来的则无 法打印,而且这种打印方法很像屏幕硬拷贝,而且不能灵活地控制字体 等。
为什么我用commondialog控件,
CommonDialog1.ShowPrinter
点打印按钮却不行!是不是要选打印的对象和内容!