0

我正在使用PrintForm将当前表单的快照打印到点阵打印机。它打印得很好,但是打印机在打印后会滚动整个纸卷。它应该在打印结束时停止。

打印表格的代码:

PrintForm1.Print()

打印完成后如何让打印机停止进纸?

4

1 回答 1

0

使用 PrintForm 的 PrinterSettings 属性,我们可以将纸张大小更改为我们想要的方式。一旦达到上述高度,打印机将停止进纸。

        Dim customSize As New PaperSize("Custom", 500, Me.Height)
        PrintForm1.PrinterSettings.DefaultPageSettings.PaperSize = customSize
        PrintForm1.PrinterSettings.DefaultPageSettings.Margins.Top = 0
        PrintForm1.PrinterSettings.DefaultPageSettings.Margins.Right = 0
        PrintForm1.PrinterSettings.DefaultPageSettings.Margins.Bottom = 50
        PrintForm1.PrinterSettings.DefaultPageSettings.Margins.Left = 0
        PrintForm1.Print()
于 2012-12-16T08:59:10.143 回答