Gets or sets the kind of paper to be used to print the report.

Syntax

Visual Basic (Declaration)
Public Property PaperKind As PaperKind

Visual Basic (Usage)	Copy Code
`Dim instance As Printer Dim value As PaperKind instance.PaperKind = value value = instance.PaperKind`

C#
public PaperKind PaperKind {get; set;}

Return Value

A System.Drawing.Printing.PaperKind enumeration value that determines the paper size to use.

Example

C# Copy Code

C#	Copy Code
private void arv_Load(object sender, System.EventArgs e) { ActiveReport1 rpt = new ActiveReport1(); System.Drawing.Printing.PaperSize p = new System.Drawing.Printing.PaperSize("Custom Paper Size", 400, 900); //hundredths of an inch rpt.Document.Printer.PrinterName = ""; //use the virtual print driver for paper sizes not supported by the local printer rpt.Document.Printer.PaperKind = System.Drawing.Printing.PaperKind.Custom; rpt.Document.Printer.PaperSize = p; rpt.Document.Printer.Landscape = true; rpt.Run(); arv.Document = rpt.Document; }

private void arv_Load(object
sender, System.EventArgs e)

{

   ActiveReport1 rpt = new ActiveReport1();

   System.Drawing.Printing.PaperSize p = new System.Drawing.Printing.PaperSize("Custom Paper Size", 400, 900); //hundredths of an inch

   rpt.Document.Printer.PrinterName = ""; //use the virtual print driver for paper sizes not supported by the local printer

   rpt.Document.Printer.PaperKind = System.Drawing.Printing.PaperKind.Custom;

   rpt.Document.Printer.PaperSize = p;

   rpt.Document.Printer.Landscape = true;

   rpt.Run();

   arv.Document = rpt.Document;

}

Visual Basic Copy Code

Visual Basic	Copy Code
Private Sub arv_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles arv.Load Dim rpt As New ActiveReport1 Dim p As New System.Drawing.Printing.PaperSize("Custom Paper Size", 400, 900) 'hundredths of an inch With rpt.Document.Printer .PrinterName = "" 'use the virtual print driver for paper sizes not supported by the local printer .PaperKind = Printing.PaperKind.Custom .PaperSize = p .Landscape = True End With rpt.Run() arv.Document = rpt.Document End Sub

Private Sub arv_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles arv.Load

    Dim rpt As New ActiveReport1

    Dim p As New System.Drawing.Printing.PaperSize("Custom Paper Size", 400, 900) 'hundredths of an inch

    With rpt.Document.Printer

        .PrinterName = "" 'use the virtual print driver for paper sizes not supported by the local printer

        .PaperKind = Printing.PaperKind.Custom

        .PaperSize = p

        .Landscape = True

    End With

    rpt.Run()

    arv.Document = rpt.Document

End Sub

ActiveReports.Viewer3	Request technical support
PaperKind Property
See Also Example

Syntax

Return Value

Example

See Also

Reference