Support paper size and source
Imports System Imports System.Drawing.Printing Module Client Sub Main() Dim pd As PrintDocument = New PrintDocument() Dim pg As PageSettings = pd.DefaultPageSettings Dim ps As PrinterSettings = pg.PrinterSettings Dim p As PaperSize For Each p In ps.PaperSizes Console.WriteLine("Supports Paper Size: " + p.PaperName) Next Dim p1 As PaperSource For Each p1 In ps.PaperSources Console.WriteLine("Supports Paper Source: " + p1.SourceName) Next End Sub End Module