如何使用system.drawing.printing.printdocument vb.net打印副本號

Question

例如，我有一個要打印的標簽，如下面的示例所示，現在，如果要復印3張，如何在要打印的標簽中的某處打印副本編號？

樣例代碼：

Private Sub btnPrintProcLabel_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnPrintProcLabel.Click
        If ValidateData() Then
            AddHandler PrintDocument1.PrintPage, AddressOf PrintProcLabel

            Try
                PrintDocument1.PrinterSettings.PrinterName = SinglePrinter.PrinterSettings.PrinterName
                PrintDocument1.PrinterSettings.Copies = CInt(txtCopies.Text)
                PrintDocument1.Print()
            Catch ex As Exception
                MsgBox(ex.Message)
            End Try
        End If
    End Sub

Public Sub PrintProcLabel(ByVal sender As Object, ByVal e As System.Drawing.Printing.PrintPageEventArgs)
        Dim g As Graphics = e.Graphics
        Dim br As Brush = New SolidBrush(Color.Black)
        Dim pn As Pen = New Pen(br)

        g.DrawString(Today.Month & "/" & Today.Day & "/" & Today.Year, Arial, br, 250, 3)

End Sub

Answer 1

   PrintDocument1.PrinterSettings.Copies = CInt(txtCopies.Text)

這告訴打印機驅動程序生成副本，它們將完全相同。 如果要編號，則需要自己創建“副本”。 它們不再是真正的副本，因為它們都稍有不同。 只需在PrintPage事件處理程序中使用DrawString（）的值重復使用該計數器重復調用Print（）方法即可。