我做了一个小工具,用于打印之前,以下男女同校将弹出连接/安装在计算机上的打印机,你可以选择你需要的一个。您需要的打印对话框添加到窗体,并做到这一点(你将不得不选择对话框中的PDF打印机)
Dim dlgPrint As New PrintDialog
If dlgPrint.ShowDialog() = Windows.Forms.DialogResult.OK Then
Dim objPrinterName As New PrinterSettings
objPrinterName.PrinterName = dlgPrint.PrinterSettings.PrinterName
UpdateLabel(objPrinterName.PrinterName.ToString, objPrinterName.DefaultPageSettings.PaperSize.ToString)
End If
我有一个标签的形式来显示所选择的打印机。然后我用这个
printFont = New Font("Courier New", 10)
Dim pd As New PrintDocument()
AddHandler pd.PrintPage, AddressOf Me.pd_PrintPage
pd.PrinterSettings.PrinterName = Label2.Text
pd.Print()
打印页面哪些格式的页面,你可以忽略现在用户要求另一个事件打印页面。
请参阅http://stackoverflow.com/questions/37714760/how-to-print-pdf-with-not-default-printer-with-code-vb-net – SSS