Attiecas uz
|
Objekts Application |
|
Formas objekts |
|
Atskaites objekts |
Atgriež vai iestata objektu Printer, kas atspoguļo noklusējuma printeri pašreizējā sistēmā. Lasāms/rakstāms.
izteiksme.Printer
expression Obligāti. Izteiksme, kas atgriež vienu no objektiem sarakstā Attiecas uz.
Piemērs
Tālāk esošajā piemērā pirmais printeris kolekcijā Printeri tiek padarīts par noklusējuma printeri sistēmai, kā arī pēc tam tiek norādīts tā nosaukums, draivera informācija un porta informācija.
Dim prtDefault As PrinterSet Application.Printer = Application.Printers(0)Set prtDefault = Application.PrinterWith prtDefault MsgBox "Device name: " & .DeviceName & vbCr _ & "Driver name: " & .DriverName & vbCr _ & "Port: " & .PortEnd With