我有一个vb.net应用程序,它使用2个水晶报告来打印报告。第一份报告是A4,第二份是A5。
我的代码如何访问打印机默认设置,并且每次都可以将默认纸张尺寸更改为A4和A5,而无需手动执行。
由于
答案 0 :(得分:0)
这有效但不适用于MS Word:
Dim pp As New System.Drawing.Printing.PrintDocument
For i = 0 To pp.DefaultPageSettings.PrinterSettings.PaperSizes.Count - 1
If pp.DefaultPageSettings.PrinterSettings.PaperSizes.Item(i).Kind = System.Drawing.Printing.PaperKind.A4 Then
pp.DefaultPageSettings.PaperSize = pp.DefaultPageSettings.PrinterSettings.PaperSizes.Item(i)
Exit For
End If
Next