Εκκίνηση του Microsoft Word 2007 , επιλέξτε " Developer " και στη συνέχεια επιλέξτε " Visual Basic" από τη γραμμή ταινία . 2
Επιλέξτε " Εργαλεία ", κάντε κλικ στο κουμπί " Μακροεντολές ... " και στη συνέχεια επιλέξτε " Normal" από το πλαίσιο λίστας επισημαίνονται Πληκτρολογήστε ένα όνομα μακροεντολής " Μακροεντολές In. » - για παράδειγμα , " TTS " - και στη συνέχεια κάντε κλικ στο κουμπί "Δημιουργία "
εικόνων 3
Αντιγράψτε τον παρακάτω κώδικα με έμφαση και πατώντας " Ctrl - C " :
Επιλογή ExplicitDim ομιλία . Όπως SpVoiceDim i As Integer
Sub SpeakText ( ) On Error Resume NEXTIF i = 0 ThenSet ομιλία = Νέα SpVoiceIf Len ( Selection.Text ) > 1 Then ' μιλούν selectionspeech.Speak Selection.Text , _SVSFlagsAsync + SVSFPurgeBeforeSpeakElse » μιλούν ολόκληρη documentspeech.Speak ActiveDocument.Range ( 0 , _ActiveDocument.Characters.Count ) . κείμενο , _SVSFlagsAsync + SVSFPurgeBeforeSpeakEnd IfElseIf i = 1 Thenspeech.Resumei = 0End IfEnd IfEnd Sub
Sub StopSpeaking ( ) On Error Resume Nextspeech . Μιλήστε vbNullString , SVSFPurgeBeforeSpeakSet ομιλία = Nothingi = 0End Sub
Sub PauseSpeaking ( ) On Error Resume NEXTIF i = 0 Thenspeech.pausei = 1ElseIf i = 1 Thenspeech.Resumei = 0End IfEnd IfEnd Sub
Η 4
Κάντε κλικ στο μακροοικονομικό παράθυρο στο Word , πιέστε το πλήκτρο " Ctrl - A , " και στη συνέχεια πατήστε το πλήκτρο " Ctrl - V " για να επικολλήσετε τις μακροεντολές στον επεξεργαστή . Επιλέξτε "Αρχείο " και στη συνέχεια κάντε κλικ στο κουμπί " Αποθήκευση Normal ".
5
Κάντε κλικ στο " Εργαλεία" από το μενού , και στη συνέχεια επιλέξτε "Αναφορές ... " Εντοπίστε ομιλίας της Microsoft βιβλιοθήκη αντικειμένων , επιλέξτε το πλαίσιο δίπλα σε αυτό , και στη συνέχεια, επιλέξτε " ΟΚ ". Επιλέξτε το μενού "Αρχείο" , και στη συνέχεια επιλέξτε " Κλείσιμο και επιστροφή στο Microsoft Word . "
Η 6
Επιλέξτε " View" από το μενού του Word , επιλέξτε " μακροεντολές ", και στη συνέχεια κάντε κλικ στο κουμπί "Προβολή μακροεντολών . " Επιβεβαιώστε ότι έχετε τρεις μακροεντολές εμφάνιση κειμένου σε ομιλία : PauseSpeaking , SpeakText και StopSpeaking . Επιλέξτε " Ακύρωση" για να κλείσετε το παράθυρο .
Εικόνων Ρύθμιση γραμμής εργαλείων γρήγορης πρόσβασης
Η
7 Κάντε κλικ στο κάτω βέλος στη γραμμή εργαλείων γρήγορης πρόσβασης πάνω από το μενού του Word , και στη συνέχεια επιλέξτε " Περισσότερες εντολές ... "
8
Επιλέξτε " Μακροεντολές " στο πλαίσιο λίστας με την ένδειξη " Επιλογή εντολών από . " Κάντε κλικ στο " Normal.Module1.SpeakText " στη λίστα μακροεντολές , και στη συνέχεια κάντε κλικ στο κουμπί "Προσθήκη >> " για να το προσθέσετε στη γραμμή εργαλείων γρήγορης πρόσβασης . Επιλέξτε "Τροποποίηση ... , " και στη συνέχεια επιλέξτε ένα κατάλληλο εικονίδιο για την ομιλία του κειμένου.
Η 9
Επαναλάβετε το προηγούμενο βήμα για την « Normal.Module1.PauseSpeaking " και " Normal.Module1 . StopSpeaking " μακροεντολές . Κάντε κλικ στο " OK " όταν τελειώσετε για να αποθηκεύσετε τις αλλαγές σας .
Η 10
Ανοίξτε ένα έγγραφο . Κάντε κλικ στο εικονίδιο στη γραμμή εργαλείων γρήγορης πρόσβασης που αντιστοιχεί στο μακρο SpeakText για να επιβεβαιώσετε ότι το Word διαβάζει το κείμενο . Δοκιμάστε τα PauseSpeaking και StopSpeaking μακροεντολές για να επιβεβαιώσει ότι λειτουργεί σωστά .
Η
εικόνων
Πνευματικά δικαιώματα © Γνώση Υπολογιστών Όλα τα δικαιώματα κατοχυρωμένα