Mega Code Archive

 

Categories / VB.Net by API / System Drawing Printing

 

PageSettings PaperSource

Imports System Imports System.Drawing.Printing Module Client     Sub Main()         Dim pd As PrintDocument = New PrintDocument()         Dim pg As PageSettings = pd.DefaultPageSettings                   Console.WriteLine("PaperSize = " + pg.PaperSize.PaperName)         Console.WriteLine("PaperSource = " + pg.PaperSource.SourceName)         Console.WriteLine("PrinterResolution = " + _                           pg.PrinterResolution.Kind.ToString())         Console.WriteLine("PrinterResolution X = " + _                           pg.PrinterResolution.X.ToString())         Console.WriteLine("PrinterResolution Y = " + _                           pg.PrinterResolution.Y.ToString())          End Sub End Module