printPreviewから誰かが印刷したかどうかはどうすればわかりますか？

Question

Using printPreview As New PrintPreviewDialog() 
     ' Dim x As New Printing.PrintDocument() 
     ' AddHandler x.PrintPage, AddressOf PrintData 
     printPreview.Document = Me.CurrentDocument 
     If ShowPrinterSetup Then 
      Dim x As New PrintDialog() 
      x.Document = CurrentDocument 
      x.ShowDialog(Anchor) 
     End If 
     whichPage = 0 
     Return printPreview.ShowDialog(Anchor) 
End Using 

printpreviewで何をクリックしても、showdialogはキャンセルを返しますか？ ユーザーが印刷を行ったかどうかを確認するにはどうすればよいですか？実際にプリンタに印刷した場合や、クリアする必要があるかどうかを尋ねる場合は、実際に何かを印刷した場合に限り、アイテムのプリントキューをクリアしたいと思います。

Answer 1

あなたはCurrentDocument EndPrintイベントからの印刷ジョブの結果を取得することができます

Private WithEvents CurrentDocument As New PrintDocument 

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click 
    Using printPreview As New PrintPreviewDialog() 
     printPreview.Document = Me.CurrentDocument 
     printPreview.ShowDialog() 
    End Using 
End Sub 

Private Sub document_EndPrint(ByVal sender As Object, ByVal e As PrintEventArgs) Handles CurrentDocument.EndPrint 
    If e.PrintAction = PrintAction.PrintToPrinter Then 
     MsgBox("Document Printed to Printer") 
    End If 
End Sub