Access VBA教程:Printers集合

Application
Printers
Printer

Printers集合包含代表当前系统中所有可用打印机的Printer对象。

使用 Printers集合

使用 Application对象的Printers属性可以返回 Printers集合。使用 For Each...Next 语句,可以循环遍历 Modules集合。下面的示例显示系统所有可用打印机的有关信息。

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

通过按名称或按其在集合中的索引引用打印机,可以引用 Printers集合中的单个 Printer对象。

Printers集合的索引从零开始。如果按其索引来引用打印机,则第一台打印机是 Printers(0),第二台打印机是 Printers(1),以此类推。

不能在 Printers集合中添加或删除 Printer对象。

上页:Access VBA教程:Printer对象 下页:Access VBA教程:Rectangle对象

Access VBA教程:Printers集合

Access VBA教程:Rectangle对象 Access VBA教程:Reference对象
Access VBA教程:Report对象 Access VBA教程:Screen对象
Access VBA教程:Section对象 Access VBA教程:SubForm对象
Access VBA教程:SubReport对象 Access VBA教程:TabControl集合
Access VBA教程:TextBox对象 Access VBA教程:ToggleButton对象
Access VBA教程:WebOptions对象 Access VBA教程:About属性
Access VBA教程:Action属性 Access VBA教程:ActiveControl属性
Access VBA教程:ActiveDataAccessPage属性 Access VBA教程:ActiveDatasheet属性
Access VBA教程:ActiveForm属性 Access VBA教程:ActiveReport属性
Access VBA教程:AddColon属性 Access VBA教程:Address属性
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号