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

PaperSource.SourceName

<source lang="vbnet"> 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

 </source>