Dim ps As New System.Drawing.Printing.PrinterSettings
ps.PrinterName = "プリンタ名"

' プリンタがサポートしている用紙サイズを取得
For Each psize As System.Drawing.Printing.PaperSize In ps.PaperSizes
　　If psize.Kind = System.Drawing.Printing.PaperKind.A3 Then
　　　　ps.DefaultPageSettings.PaperSize = psize
　　　　ps.DefaultPageSettings.Landscape = True　' ※C1PrintManagerクラスのPrintメソッドでのみ有効
　　　　Exit For
　　End If
Next

' C1Reportクラス
C1Report1.Print(ps)

' C1PrintDocumentクラス
Dim c1doc As C1.C1Preview.C1PrintDocument = C1Report1.C1Document
c1doc.Print(ps)

' C1PrintManagerクラス
Dim pmng As New C1.C1Preview.C1PrintManager()
pmng.PrintOptions.PageScaling = C1.C1Preview.PageScalingEnum.None
pmng.PrintOptions.AutoRotate = False
pmng.Document = C1Report1
pmng.Print(ps)

var ps = new System.Drawing.Printing.PrinterSettings();
ps.PrinterName = "プリンタ名";

// プリンタがサポートしている用紙サイズを取得
foreach (System.Drawing.Printing.PaperSize psize in ps.PaperSizes)
{
　　if (psize.Kind == System.Drawing.Printing.PaperKind.A3)
　　{
　　　　ps.DefaultPageSettings.PaperSize = psize;
　　　　ps.DefaultPageSettings.Landscape = true;　// ※C1PrintManagerクラスのPrintメソッドでのみ有効
　　　　break;
　　}
}

// C1Reportクラス
c1Report1.Print(ps);

// C1PrintDocumentクラス
C1.C1Preview.C1PrintDocument c1doc = c1Report1.C1Document;
c1doc.Print(ps);

// C1PrintManagerクラス
var pmng = new C1.C1Preview.C1PrintManager();
pmng.PrintOptions.PageScaling = C1.C1Preview.PageScalingEnum.None;
pmng.PrintOptions.AutoRotate = false;
pmng.Document = c1Report1;
pmng.Print(ps);