‘プリンタ名の取得
Dim pd As New System.Drawing.Printing.PrintDocument
dim PRINTER_NAME as string
PRINTER_NAME = pd.PrinterSettings.PrinterName
‘プリンタ名の取得
Dim pd As New System.Drawing.Printing.PrintDocument
dim PRINTER_NAME as string
PRINTER_NAME = pd.PrinterSettings.PrinterName