1 Ανοίξτε ένα νέο αρχείο του PowerPoint . 2
Κάντε κλικ στο " Microsoft Office " κουμπί , κάντε κλικ στο κουμπί "Νέο" . Μετακινηθείτε προς τα κάτω και κάντε κλικ στην επιλογή " Περισσότερες κατηγορίες " και στη συνέχεια επιλέξτε " Παιχνίδια " από τη λίστα των υπηρεσιών Microsoft Online . Εναλλακτικά , ανοίξτε ένα νέο κενό αρχείο PowerPoint .
Εικόνων 3
Στη διαφάνεια τίτλου , περιλαμβάνουν κείμενο , όπως " Ταιριάξτε το μυστικό για το όνομα του ατόμου σωστό ! " ή παρόμοιο κείμενο . Εισάγετε μια υπο- τίτλο, όπως "Κερδίστε πόντους για κάθε σωστή απάντηση ! "
Η
4 Κάντε κλικ στο κουμπί " Νέα διαφάνεια " και επιλέξτε το " Τίτλος και περιεχόμενο " διάταξη για να εισαγάγετε μια νέα διαφάνεια να περιέχει σας πληροφορίες, όπως τα μυστικά και τους ανθρώπους .
5
επιστροφή στη διαφάνεια τίτλου για να επισημάνετε το κείμενο τίτλου και κάντε δεξί κλικ με το ποντίκι του. Επιλέξτε το " Υπερ-σύνδεση " και κάντε κλικ στο " Τοποθέτηση σε αυτό το έγγραφο " για να δημιουργήσετε μια υπερ-σύνδεση στην επόμενη διαφάνεια , που περιέχει ένα μυστικό για ένα πρόσωπο .
Η
6 Κάντε κλικ στο επάνω πλαίσιο κειμένου και πληκτρολογήστε τίτλο , όπως " άτομο 1 " και , στη συνέχεια, κάντε κλικ στο κάτω μέρος του τετραγώνου και να πληκτρολογήσετε κάποιο κείμενο που περιγράφει μυστικές πληροφορίες για ένα πρόσωπο . Στη συνέχεια , δημιουργήστε μια λίστα των ανθρώπων που θα μπορούσαν να έχουν αυτό το μυστικό .
Η 7
Εισαγωγή διαφανειών για κάθε μυστική και τους ανθρώπους . Προσθέστε τις φωτογραφίες και τα πολυμέσα , αν έχετε . Εναλλακτικά συσταθεί όλα τα μυστικά σου σε μία διαφάνεια . Μόλις έχετε δημιουργήσει τα στοιχεία σας μπορείτε να ορίσετε τα σημεία βαθμολόγησης .
8
Πατήστε Alt + F11 για να ξεκινήσει το πρόγραμμα επεξεργασίας VBA . Από το μενού "Εισαγωγή" , επιλέξτε την " ενότητα " και εισάγετε τον παρακάτω κωδικό για να παρακολουθείτε τα σημεία της παρουσίασής σας
Sub UpdateThePoints ( )
MsgBox . " Σημεία σας: " & CStr ( AddToThePoints ( 1 ) )
Sub End
AddToThePoints Λειτουργία ( iIncrement As Integer ) As Integer
Στατική ipoints As Integer
Αν iIncrement = 0 Thenipoints = 0Elseipoints = ipoints + iIncrementEnd Αν
AddToThePoints = ipoints
End Function
Η 9
Πατήστε Alt + F11 για να επιστρέψετε στην παρουσίαση του PowerPoint που περιέχει πληροφορίες σχετικά με μυστικά και τους ανθρώπους .
Η 10
Αποθηκεύστε την παρουσίαση , η οποία επίσης εξοικονομεί macro σας , ώστε να μπορείτε να προσθέσετε επιπλέον λεπτομέρειες .
Η 11
Πήγαινε πίσω στο πρώτο ερώτημα διαφάνειά σας . Από το μενού "Εισαγωγή" , κάντε κλικ στο κουμπί " σχήματα " και , στη συνέχεια, κάντε κλικ σε ένα από τα « κουμπιά δράσης » επιλογές, όπως ένα βέλος. Σύρετε και να σχεδιάσετε το σχήμα σας . Από το παράθυρο διαλόγου "Ρυθμίσεις Δράσης " , κάντε κλικ στην επιλογή "Εκτέλεση μακροεντολής " , επιλέξτε το " UpdateThePoints " επιλογή . Κάντε κλικ στο κουμπί " OK" .
Η 12
Δεξί κλικ στο κουμπί . Αντιγραφή και επικόλληση αυτό το κουμπί όσες φορές χρειάζεται, για να υποδείξει ένα σωστό πρόσωπο για μυστικά διαφάνειες σας . Κάθε φορά που κάνετε κλικ , τα σημεία ανεβαίνει .
Η 13
Δημιουργήστε ένα άλλο κουμπί που δεν αυξάνει τα σημεία για κάθε λανθασμένη απάντηση . Από το μενού "Εισαγωγή" , κάντε κλικ στο κουμπί "Σχήματα " και στη συνέχεια κάντε κλικ στο κουμπί βέλους . Σύρετε και να σχεδιάσετε το σχήμα σας . Αντιγραφή και επικόλληση αυτό όσες φορές χρειάζεται, για να υποδείξει μια εσφαλμένη πρόσωπο για μυστικά διαφάνειες .
Η 14
Αποθηκεύστε το αρχείο σας ως μια παρουσίαση του PowerPoint δείχνουν .
Εικόνων
Πνευματικά δικαιώματα © Γνώση Υπολογιστών Όλα τα δικαιώματα κατοχυρωμένα