1 Δημιουργήστε ένα νέο έργο Form των Windows κάνοντας κλικ στο " Αρχείο" > " Νέα " > "Project ... " από το μενού για να εμφανιστεί το παράθυρο διαλόγου " New Project" . Επιλέξτε το " Windows φόρμας " του έργου και κάντε κλικ στο " OK " για να ξεκινήσει . 2
Σύρετε ένα στοιχείο ελέγχου κουμπιού από την εργαλειοθήκη στη κενή φόρμα στο έργο σας . Αν η Εργαλειοθήκη δεν είναι ορατά , πατήστε το πλήκτρο " Ctrl " + " Alt " + " X " ή κάντε κλικ στο κουμπί "Προβολή " > " εργαλειοθήκη " για να γίνει ορατό . Αλλάξτε το " Κείμενο " ιδιοκτησίας για το κουμπί " Αυτοματοποίηση PowerPoint " στο "Ιδιότητες " παράθυρο διαλόγου . Εάν αυτή διαλόγου δεν είναι ορατό , κάντε κλικ στην επιλογή "Προβολή " > " Properties Window " ή πατήστε το πλήκτρο " Alt " + " Enter" για να εμφανιστεί .
Εικόνων 3
Κάντε διπλό κλικ στο κουμπί για να προσθέσετε κωδικός για το " Click " εκδήλωση . ( Ενσωμάτωση κώδικα στο πρόγραμμα χειρισμού συμβάντων του κουμπιού είναι μόνο για αυτό το παράδειγμα . Μπορεί να τοποθετηθεί οπουδήποτε στον κώδικά σας . )
Η 4
Προσθέστε ένα « Έργο αναφοράς" στη βιβλιοθήκη αντικειμένων του PowerPoint , κάνοντας δεξί κλικ στο η " λύση Explorer " panel και επιλέγοντας " Προσθήκη αναφοράς .. " από το μενού περιβάλλοντος . Σχετικά με το " Add Reference " παράθυρο διαλόγου , κάντε κλικ στην καρτέλα " COM " και μετακινηθείτε προς τα κάτω για να επιλέξετε το "Microsoft PowerPoint 14.0 Object Library " ( ο αριθμός έκδοσης θα διαφέρει ανάλογα με την έκδοση του PowerPoint που έχετε εγκαταστήσει ) . Κάντε κλικ στο " OK " για να κλείσετε το παράθυρο διαλόγου
5
Εισαγωγή των δύο ονομάτων που χρειάζονται πληκτρολογώντας τις ακόλουθες δηλώσεις στην κορυφή της μονάδας κώδικα : .
Εισαγωγές Microsoft.Office.Interop
Εισαγωγές Microsoft.Office.Core
Η 6
Δημιουργία δύο PowerPoint αντικείμενα για να δουλέψει, ένα αντικείμενο αίτησης για να εκπροσωπήσει την κλήση με το πρόγραμμα PowerPoint και ένα αντικείμενο Παρουσίαση:
Dim objPPT Όπως New PowerPoint.Application
Dim objPres Όπως PowerPoint.Presentation
αυτές τις δηλώσεις , και όλα όσα ακολουθούν , προστίθενται στη μέθοδο Button_Click , μεταξύ του Private Sub και End Sub δηλώσεις .
Η 7
Πληκτρολογήστε μια δήλωση που ανοίγει μια παρουσίαση σε PowerPoint :
objPres = objPPT.Presentations.Open ( " C : \\ Session Nine.pptx " )
8
μεταγλώττισης Visual Basic αίτησή σας πατώντας το πλήκτρο " F7 ". Πατήστε το πλήκτρο " F5 " για να εκτελέσει το πρόγραμμα παράδειγμα . Όταν κάνετε κλικ στο κουμπί " Αυτοματοποίηση PowerPoint " , η συγκεκριμένη παρουσίαση θα πρέπει να ανοίξει .
Η
εικόνων
Πνευματικά δικαιώματα © Γνώση Υπολογιστών Όλα τα δικαιώματα κατοχυρωμένα