Question

我正在使用PrintForm将当前表单的快照打印到Dot Matrix Printer。它打印正常，但打印机在打印后滚动整个纸卷。它应该在打印结束时停止。

打印表格的代码：

PrintForm1.Print()

打印完成后，如何告诉打印机停止进纸？

Answer 1

使用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()

使用PrintForm进行打印时如何停止进纸

1 个答案: