更改打印的默认页面大小

时间:2012-04-26 06:04:43

标签: vb.net printing crystal-reports

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

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

由于

1 个答案:

答案 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
相关问题