spread 打印示例代码

来源：互联网发布：js alert输出变量编辑：程序博客网时间：2024/06/07 10:04

范例C:/Program Files/FarPoint Technologies/Spread70/samples/ActiveX/VB6/OwnerPrint/Project1.vbp

fpSpread1.PrintUseDataMax = False

Printer.Print "British Open 2001 Best Ball Results"

fpSpread1.PrintHeader = "/cThursday's Results/n"

Call fpSpread1.OwnerPrintDraw(Printer.hDC, 1000, 360, Printer.Width, (Printer.Height / 4), 1)

fpSpread1.PrintHeader = "/cFriday's Results/n"

Call fpSpread1.OwnerPrintDraw(Printer.hDC, 1000, (Printer.Height / 4) + 360, Printer.Width, (Printer.Height / 2), 1)

fpSpread1.PrintHeader = "/cSaturday's Results/n"

Call fpSpread1.OwnerPrintDraw(Printer.hDC, 1000, (Printer.Height / 2) + 360, Printer.Width, ((3 * Printer.Height) / 4), 1)

fpSpread1.PrintHeader = "/cSunday's Results/n"

Call fpSpread1.OwnerPrintDraw(Printer.hDC, 1000, ((3 * Printer.Height) / 4) + 360, Printer.Width, Printer.Height, 1)

Printer.EndDoc

还有一个范例程序，功能似乎很强大，是还有打印预览功能的。
C:/Program Files/FarPoint Technologies/Spread70/samples/ActiveX/VB6/PrintPreview/PrintPreview.vbp
要好好研究一下了。