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