Ιδιότητα Printer

Ισχύει για

Επιστρέφει ή ορίζει ένα αντικείμενο 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