如何直接打印而不在vb.net中打印对话框？

Question

我正在尝试使用默认值打印文档，而无需转到打印对话框。

即使我指定了850、1300的值，我下面的代码也会以标准字母大小（850、1100）的文档进行打印。

Dim defaultsize As New Printing.PaperSize("Long Bond Paper", 850, 1300)
Dim pd = PrintDocument1
Dim ppd = PrintDialog1
ppd.Document = pd
pd.PrinterSettings.DefaultPageSettings.PaperSize = defaultsize

但是，如果我使用下面的代码，它将通过“打印”对话框，然后从组合框中选择纸张尺寸，它将在850、1300纸张上打印文档。

If comboPaperSize.SelectedIndex <> -1 Then
   PrintDocument1.DefaultPageSettings.PaperSize = _
   PrintDocument1.PrinterSettings.PaperSizes.Item(comboPaperSize.SelectedIndex)
End If

如何在不通过打印对话框的情况下直接打印850、1300的文档？