更改打印的默认页面大小

Question

我有一个vb.net应用程序，它使用2个水晶报告来打印报告。第一份报告是A4，第二份是A5。

我的代码如何访问打印机默认设置，并且每次都可以将默认纸张尺寸更改为A4和A5，而无需手动执行。

由于

Answer 1

这有效但不适用于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