Поделиться через


Свойство Application.Printers (Access)

Возвращает коллекцию Принтеры , представляющую все доступные принтеры в текущей системе. Коллекция принтеров только для чтения.

Синтаксис

expression. Принтеры

выражение: переменная, представляющая объект Application.

Пример

В следующем примере отображаются сведения обо всех принтерах, доступных в текущей системе.

Dim prtLoop As Printer 
 
For Each prtLoop In Application.Printers 
 With prtLoop 
 MsgBox "Device name: " & .DeviceName & vbCr _ 
 & "Driver name: " & .DriverName & vbCr _ 
 & "Port: " & .Port 
 End With 
Next prtLoop 

Поддержка и обратная связь

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.