Taikoma
|
Objektas Application |
|
Objektas Form |
|
Objektas Report |
Pateikia arba nustato objektą Spausdintuvas, nurodantį dabartinės sistemos numatytąjį spausdintuvą. Skaityti/rašyti.
reiškinys.Printer
reiškinys Būtina. Reiškinys, kuris pateikia vieną iš sąrašo „Taikoma“ objektų.
Pavyzdys
Toliau pateiktame pavyzdyje pirmasis spausdintuvas iš rinkinio Spausdintuvai padaromas numatytuoju sistemos spausdintuvu, o tada nurodomas jo pavadinimas,tvarkyklės ir prievado informacija.
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
