Отнася се за
Обект Application |
Обект Form |
Обект Report |
Връща или задава обект Printer, представляващ принтера по подразбиране в текущата система. Четене/запис.
израз.Printer
израз Задължително. Израз, който връща един от обектите в списъка "Отнася се за".
Пример
Примерът по-долу задава първия принтер в колекцията Printers като принтер по подразбиране за системата и след това съобщава името му, информация за драйвера и информация за порта.
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