חל על
| אובייקט יישום |
|---|
| אובייקט טופס |
| אובייקט Report |
החזרה או הגדרה של אובייקט Printer המייצג את מדפסת ברירת המחדל במערכת הנוכחית. קריאה/כתיבה.
ביטוי.Printer
ביטוי הנדרש. ביטוי שמחזיר אחד מהאובייקטים ברשימה חל על.
דוגמה
הדוגמה הבאה הופכת את המדפסת הראשונה באוסף מדפסות למדפסת ברירת המחדל עבור המערכת, ולאחר מכן מדווחת על שמה, פרטי מנהל ההתקן ופרטי היציאה שלה.
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