编写VB打印控制程序的几点心得
phgt = obj.ScaleY(phgt, vbTwips, obj.ScaleMode) / s
本文链接地址:http://www.oyaya.net/fanwen/view/141418.html
‘将打印机的尺寸转换成obj的坐标系统 / 缩放因子
x_mid = obj.ScaleLeft + obj.ScaleWidth / 2
y_mid = obj.ScaleTop + obj.ScaleHeight / 2‘设置打印区域的中心点坐标
Printer.Scale (x_mid - pwid / 2, y_mid - phgt / 2)-(x_mid + pwid / 2, y_mid + phgt / 2)
‘ 设置打印机中新的ScaleWidth和ScaleHeight
End Sub
⑹ 坐标定位
《编写VB打印控制程序的几点心得(第8页)》