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 Printer
Set Application.Printer = Application.Printers(0) Set prtDefault = Application.Printer With prtDefault MsgBox "Device name: " & .DeviceName & vbCr _ & "Driver name: " & .DriverName & vbCr _ & "Port: " & .Port End With