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
