VB.Net by API/System.Drawing.Printing/PaperSource

PaperSource.SourceName

  
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