Public Shared Function DefaultPrinterName() As String
        Dim Doc As New System.Drawing.Printing.PrintDocument
        Return Doc.PrinterSettings.PrinterName
End Function
No comments