Imports System
Imports System.Drawing.Printing
Module Client
Sub Main()
Dim pd As PrintDocument = New PrintDocument()
Dim pg As PageSettings = pd.DefaultPageSettings
Console.WriteLine("Top Margin = " + pg.Margins.Top.ToString())
Console.WriteLine("Bottom Margin = " + pg.Margins.Bottom.ToString())
Console.WriteLine("Left Margin = " + pg.Margins.Left.ToString())
Console.WriteLine("Right Margin = " + pg.Margins.Right.ToString())
Console.WriteLine("Landscape = " + pg.Landscape.ToString())
Console.WriteLine("PaperSize = " + pg.PaperSize.PaperName)
Console.WriteLine("PaperSource = " + pg.PaperSource.SourceName)
End Sub
End Module