1 Κάντε κλικ στο " Αρχείο" στη γραμμή μενού , στη συνέχεια, κάντε κλικ στο " Νέο" και "Project ... " για να ξεκινήσει ένα νέο έργο . Από το παράθυρο διαλόγου "New Project " , κάντε κλικ στην επιλογή " των Windows Form" και , στη συνέχεια, στο "OK " για να ξεκινήσει . 2
Προσθέστε μια βιβλιοθήκη αντικειμένων του Word " Έργο αναφοράς" κάνοντας δεξί κλικ στο " Λύση του έργου Explorer " πάνελ και το κλικ " Προσθέστε μια αναφορά .... " Στο " Add Reference " παράθυρο διαλόγου , κάντε κλικ στην καρτέλα " COM " και μετακινηθείτε προς τα κάτω για να επιλέξετε το " Microsoft Word 14.0 Object Library". Ο αριθμός έκδοσης εμφανίζεται ενδέχεται να διαφέρει , ανάλογα με το ποια έκδοση του Microsoft Office και τη βιβλιοθήκη αντικειμένων που έχετε εγκαταστήσει στον υπολογιστή σας . Κάντε κλικ στο " OK " για να κλείσετε το παράθυρο διαλόγου .
Εικόνων 3
δεξί κλικ στη φόρμα , στη συνέχεια, κάντε κλικ στην επιλογή " Προβολή κώδικα " για να το επιλέξετε από το μενού , ανοίγοντας το πρόγραμμα επεξεργασίας κώδικα . Πληκτρολογήστε τις ακόλουθες δύο γραμμές κειμένου στην κορυφή της μονάδας κώδικα , πάνω από την πρόταση δήλωσης κατηγορία ( για παράδειγμα , "Δημόσια Τάξη Form1 " ) , για την εισαγωγή των απαιτούμενων χώρων όνομα στο έργο :
Εισαγωγές Microsoft . Office.Interop
Εισαγωγές Microsoft.Office.Core
Η
4 Κάντε κλικ στην καρτέλα " Form Designer " ( για αυτό το παράδειγμα , η προεπιλογή θα έχει το όνομα " Form1.vb [ Μελέτη ] »). Κάντε διπλό κλικ στη φόρμα για να εισαχθεί μια διαδικασία " Form1_Load » και να δοκιμάσουν τον κώδικα . Δημιουργήστε δύο αντικείμενα του Word να συνεργαστεί με --- αίτησης και ένα έγγραφο . Το αντικείμενο εφαρμογής παραπέμπει το πρόγραμμα Word, και το έγγραφο αναφοράς το αρχείο που αντιμετωπίζουν . Πληκτρολογήστε τις ακόλουθες δύο γραμμές κειμένου στο πλαίσιο της διαδικασίας μεταξύ της " Private Sub " και " End Sub " δηλώσεις :
Dim objWord Όπως New Word.Application
Dim objDocument As New Word.Document
5
Πληκτρολογήστε μια δήλωση κώδικα που ανοίγει το έγγραφο του Word ( εισάγετε τη δική σας διαδρομή και το όνομα αρχείου ) αμέσως μετά αυτά που προστέθηκαν στο Βήμα 4 :
objDocument = objWord.Documents.Open ( " C : \\ myDoc.docx " )
(Αντικαταστήστε το" MyDoc "με το όνομα του αρχείου )
Η 6
μεταγλώττιση της εφαρμογής πατώντας το . " κλειδί F7 " . Εκτελέστε το πρόγραμμα πατώντας το πλήκτρο "F5 " . Αυτό το δείγμα εφαρμογής περιλαμβάνει μια φόρμα και ένα μόνο κουμπί ? Κάντε κλικ στο κουμπί για να ανοίξετε το έγγραφο που καθορίζεται στον κώδικα του προγράμματος
Η
εικόνων .
Πνευματικά δικαιώματα © Γνώση Υπολογιστών Όλα τα δικαιώματα κατοχυρωμένα