الخاصية "طابعة"

ينطبق على

يقوم بإرجاع أو تعيين عنصر Printer الذي يمثل الطابعة الافتراضية على النظام الحالي. قراءة/كتابة.

expression.Printer

expression Required. تعبير يُرجع أحد العناصر في قائمة "ينطبق على".

مثال

يُعيّن المثال التالي الطابعة الأولى في مجموعة الطابعات كالطابعة الافتراضية للنظام، ثم يقوم بالإبلاغ عن اسمها ومعلومات برنامج التشغيل ومعلومات المنفذ الخاصة بها.

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