Δημιουργήστε μια " StreamReader " μεταβλητή , η οποία έχει σε κάθε μέρος του εγγράφου να στείλετε στον εκτυπωτή . Ο παρακάτω κώδικας δημιουργεί τη μεταβλητή :
Dim ρεύμα Όπως StreamReaderstream = Νέα StreamReader ( " C : \\ FileToPrint.doc " ) 2
Δημιουργήστε το " PrintDocument " μεταβλητή . Αυτό προετοιμάζει την κατηγορία που χρησιμοποιείται για να εκτυπώσετε το έγγραφο . Ο παρακάτω κώδικας δημιουργεί τη μεταβλητή :
Dim εκτύπωσης ως νέο PrintDocument ( )
εικόνων 3
Δημιουργήστε το χειρισμό που απαιτεί τα προγράμματα οδήγησης συσκευής του εκτυπωτή . Ο χειριστής αλληλεπιδρά με το λειτουργικό σύστημα και τα προγράμματα οδήγησης , ώστε να μπορείτε να εκτυπώσετε ένα ή περισσότερα έγγραφα στον εκτυπωτή . Ο παρακάτω κώδικας δημιουργεί το χειριστή :
AddHandler print.PrintPage , AddressOf Me.printer_PrintPage
Η 4
Εκτυπώστε τη σελίδα . Ο κώδικας που ακολουθεί καλεί τη συνάρτηση "Print" , που στείλετε το έγγραφο στον εκτυπωτή :
print.Print ( )
5
Κλείστε το αντικείμενο εκτύπωσης . Αυτό απελευθερώνει τη μνήμη του υπολογιστή , και ελευθερώνει το αρχείο από το να κλειδωθεί από το λειτουργικό σύστημα . Η ακόλουθη δήλωση συμπληρώνει τον κωδικό εκτύπωσης :
stream.Close ( )
Η
εικόνων
Πνευματικά δικαιώματα © Γνώση Υπολογιστών Όλα τα δικαιώματα κατοχυρωμένα