VB.Net by API/System.Windows.Forms/PageSetupDialog

PageSetupDialog.AllowMargins

  
Imports System.IO
Imports System.Windows.Forms
public class PageSetupDialogSettings
   public Shared Sub Main
        Dim PageDB As New PageSetupDialog()
        PageDB.Document = New System.Drawing.Printing.PrintDocument()
        If (PageDB.ShowDialog() = DialogResult.OK) Then
            Console.WriteLine("Allow Margins: " & PageDB.AllowMargins)
            Console.WriteLine("Allow Orientation: " & PageDB.AllowOrientation)
            Console.WriteLine("Allow Paper: " & PageDB.AllowPaper)
            Console.WriteLine("Allow Printer: " & PageDB.AllowPrinter)
            Console.WriteLine("Minimum Margins: " & PageDB.MinMargins.ToString())
            Console.WriteLine("Show Network: " & PageDB.ShowNetwork)
            Console.WriteLine("Printer Settings: " & PageDB.PrinterSettings.ToString())
        End If
   End Sub
End class

PageSetupDialog.AllowOrientation

  
Imports System.IO
Imports System.Windows.Forms
public class PageSetupDialogSettings
   public Shared Sub Main
        Dim PageDB As New PageSetupDialog()
        PageDB.Document = New System.Drawing.Printing.PrintDocument()
        If (PageDB.ShowDialog() = DialogResult.OK) Then
            Console.WriteLine("Allow Margins: " & PageDB.AllowMargins)
            Console.WriteLine("Allow Orientation: " & PageDB.AllowOrientation)
            Console.WriteLine("Allow Paper: " & PageDB.AllowPaper)
            Console.WriteLine("Allow Printer: " & PageDB.AllowPrinter)
            Console.WriteLine("Minimum Margins: " & PageDB.MinMargins.ToString())
            Console.WriteLine("Show Network: " & PageDB.ShowNetwork)
            Console.WriteLine("Printer Settings: " & PageDB.PrinterSettings.ToString())
        End If
   End Sub
End class

PageSetupDialog.AllowPaper

  
Imports System.IO
Imports System.Windows.Forms
public class PageSetupDialogSettings
   public Shared Sub Main
        Dim PageDB As New PageSetupDialog()
        PageDB.Document = New System.Drawing.Printing.PrintDocument()
        If (PageDB.ShowDialog() = DialogResult.OK) Then
            Console.WriteLine("Allow Margins: " & PageDB.AllowMargins)
            Console.WriteLine("Allow Orientation: " & PageDB.AllowOrientation)
            Console.WriteLine("Allow Paper: " & PageDB.AllowPaper)
            Console.WriteLine("Allow Printer: " & PageDB.AllowPrinter)
            Console.WriteLine("Minimum Margins: " & PageDB.MinMargins.ToString())
            Console.WriteLine("Show Network: " & PageDB.ShowNetwork)
            Console.WriteLine("Printer Settings: " & PageDB.PrinterSettings.ToString())
        End If
   End Sub
End class

PageSetupDialog.AllowPrinter

  
Imports System.IO
Imports System.Windows.Forms
public class PageSetupDialogSettings
   public Shared Sub Main
        Dim PageDB As New PageSetupDialog()
        PageDB.Document = New System.Drawing.Printing.PrintDocument()
        If (PageDB.ShowDialog() = DialogResult.OK) Then
            Console.WriteLine("Allow Margins: " & PageDB.AllowMargins)
            Console.WriteLine("Allow Orientation: " & PageDB.AllowOrientation)
            Console.WriteLine("Allow Paper: " & PageDB.AllowPaper)
            Console.WriteLine("Allow Printer: " & PageDB.AllowPrinter)
            Console.WriteLine("Minimum Margins: " & PageDB.MinMargins.ToString())
            Console.WriteLine("Show Network: " & PageDB.ShowNetwork)
            Console.WriteLine("Printer Settings: " & PageDB.PrinterSettings.ToString())
        End If
   End Sub
End class

PageSetupDialog.MinMargins

  
Imports System.IO
Imports System.Windows.Forms
public class PageSetupDialogSettings
   public Shared Sub Main
        Dim PageDB As New PageSetupDialog()
        PageDB.Document = New System.Drawing.Printing.PrintDocument()
        If (PageDB.ShowDialog() = DialogResult.OK) Then
            Console.WriteLine("Allow Margins: " & PageDB.AllowMargins)
            Console.WriteLine("Allow Orientation: " & PageDB.AllowOrientation)
            Console.WriteLine("Allow Paper: " & PageDB.AllowPaper)
            Console.WriteLine("Allow Printer: " & PageDB.AllowPrinter)
            Console.WriteLine("Minimum Margins: " & PageDB.MinMargins.ToString())
            Console.WriteLine("Show Network: " & PageDB.ShowNetwork)
            Console.WriteLine("Printer Settings: " & PageDB.PrinterSettings.ToString())
        End If
   End Sub
End class

PageSetupDialog.PrinterSettings

  
Imports System.IO
Imports System.Windows.Forms
public class PageSetupDialogSettings
   public Shared Sub Main
        Dim PageDB As New PageSetupDialog()
        PageDB.Document = New System.Drawing.Printing.PrintDocument()
        If (PageDB.ShowDialog() = DialogResult.OK) Then
            Console.WriteLine("Allow Margins: " & PageDB.AllowMargins)
            Console.WriteLine("Allow Orientation: " & PageDB.AllowOrientation)
            Console.WriteLine("Allow Paper: " & PageDB.AllowPaper)
            Console.WriteLine("Allow Printer: " & PageDB.AllowPrinter)
            Console.WriteLine("Minimum Margins: " & PageDB.MinMargins.ToString())
            Console.WriteLine("Show Network: " & PageDB.ShowNetwork)
            Console.WriteLine("Printer Settings: " & PageDB.PrinterSettings.ToString())
        End If
   End Sub
End class

PageSetupDialog.ShowNetwork

  
Imports System.IO
Imports System.Windows.Forms
public class PageSetupDialogSettings
   public Shared Sub Main
        Dim PageDB As New PageSetupDialog()
        PageDB.Document = New System.Drawing.Printing.PrintDocument()
        If (PageDB.ShowDialog() = DialogResult.OK) Then
            Console.WriteLine("Allow Margins: " & PageDB.AllowMargins)
            Console.WriteLine("Allow Orientation: " & PageDB.AllowOrientation)
            Console.WriteLine("Allow Paper: " & PageDB.AllowPaper)
            Console.WriteLine("Allow Printer: " & PageDB.AllowPrinter)
            Console.WriteLine("Minimum Margins: " & PageDB.MinMargins.ToString())
            Console.WriteLine("Show Network: " & PageDB.ShowNetwork)
            Console.WriteLine("Printer Settings: " & PageDB.PrinterSettings.ToString())
        End If
   End Sub
End class