Πώς να βρείτε τους αριθμούς Face ID για το Microsoft Office σας 97 Γραμμές εργαλείων

Οι εφαρμογές του Microsoft Office 97 έχουν γραμμές εργαλείων των οποίων οι εντολές εμφανίζει τα εικονίδια . Αυτές οι εικόνες έχουν μοναδικούς αριθμούς εντοπισμό ονομάζεται αναγνωριστικά πρόσωπο που συνδέονται με αυτά . Με την αλλαγή της ταυτότητάς μιας εντολής πρόσωπο , μπορείτε να αλλάξετε το εικονίδιο του . Η εύρεση της ταυτότητας προσώπου για μια εντολή είναι μια εργασία που μπορεί να ολοκληρώσει με τη γλώσσα Γραφείου προγραμματισμού , Visual Basic for Applications ή VBA . Ένα βήμα που εμπλέκονται στην εύρεση ID μιας εντολής πρόσωπο είναι επερώτηση αντικείμενα του μοντέλου αντικειμένου του Office 97 - ένα δίκτυο εικονικών αντικειμένων που αντιπροσωπεύουν προγραμματιζόμενα στοιχεία του Γραφείου. Βρίσκοντας τα αναγνωριστικά πρόσωπο για το Office 97 γραμμές εργαλείων είναι ένα πρώτο βήμα προς την προσαρμογή εικονίδια εντολών . Οδηγίες
Η

1 Ανοίξτε ένα από τα Office 97 εφαρμογές , και στη συνέχεια πατήστε " Alt " + " F11 " για να μπείτε στο VBA ολοκληρωμένο περιβάλλον ανάπτυξης ή IDE . 2

Κάντε κλικ του μενού "Εισαγωγή " για " ενότητα " εντολή για να ανοίξει ένα νέο παράθυρο για την εισαγωγή VBA κώδικα .
εικόνων 3

Επικολλήστε τον παρακάτω κώδικα προγράμματος στο παράθυρο κώδικα . Το πρόγραμμα τυπώνει στο παράθυρο του IDE είναι " Άμεση " , έναν κατάλογο που δείχνει όλα τα κουμπιά της γραμμής εργαλείων και αναγνωριστικά πρόσωπό τους . Η " CommandBars " η λειτουργία παρέχει μια λίστα με τις γραμμές εργαλείων . Κάθε γραμμή έχει μια λίστα από στοιχεία που το πρόγραμμά σας έχει πρόσβαση μέσω του " ελέγχου " η λειτουργία της γραμμής εργαλείων . Επειδή δεν είναι όλες οι εντολές της γραμμής εργαλείων έχουν εικονίδια , το πρόγραμμα θα μπορούσε να προκαλέσει ένα σφάλμα και αν προσπάθησε πρόσβαση στο ID πρόσωπο αυτών των εντολών . Το πρόγραμμα πιάνει αυτό το σφάλμα με το " On Error" .

ShowFaceIds Public Sub ( )

Dim x

Dim i , j , curBar

Dim s , curCtl

Dim t

Debug.Print " Περιγραφή