1 Κάντε κλικ στην καρτέλα "Προγραμματιστής " της εφαρμογής σας , και στη συνέχεια κάντε κλικ στο κουμπί " Visual Basic" για να μπείτε στο περιβάλλον προγραμματισμού VBA . Κάντε κλικ στο μενού "Εισαγωγή" , και στη συνέχεια κάντε κλικ στο " userform " στοιχείο για να εισαγάγετε μια νέα μορφή . Αυτό το έντυπο μπορεί να κρατήσει τους ελέγχους των οποίων οι ιδιότητες γραμματοσειράς , μπορείτε να αλλάξετε με τις δηλώσεις VBA . 2
Κάντε κλικ στο μενού "Προβολή" , και στη συνέχεια κάντε κλικ στο "Toolbox " για να εμφανιστεί μια παλέτα των ελέγχων . Κάντε κλικ στο εικονίδιο παλέτα εργαλείων που μοιάζουν με τους δύο χαρακτήρες " Ab " για να φορτώσετε το στοιχείο ελέγχου πλαισίου κειμένου , και στη συνέχεια σύρετε το UserForm για να δημιουργήσετε ένα πλαίσιο κειμένου .
Εικόνων 3
Κάντε κλικ στην παλέτα εργαλείων εικονίδιο που διαμορφώνεται όπως ένα κουμπί για να εισέλθετε στη λειτουργία κουμπί - κατάρτιση , και στη συνέχεια σύρετε πάνω στον καμβά, κάτω από το πλαίσιο κειμένου που τοποθετούνται για να δημιουργήσετε ένα κουμπί για τη φόρμα .
Η
4 κάντε διπλό κλικ στο κουμπί για να εμφανιστεί η λειτουργία εκδήλωση για το συμβάν Click . Η λειτουργία αυτή εκτελείται όταν ο χρήστης του προγράμματός σας πατήσει το κουμπί που τοποθετείται στη φόρμα . Πληκτρολογήστε τις ακόλουθες δηλώσεις στο παράθυρο κωδικοποίησης . Αυτές οι δηλώσεις ανάγνωση και εγγραφή στο "μέγεθος " ιδιότητα του πλαισίου κειμένου . Γράφοντας για αυτό το ακίνητο σας επιτρέπει να αλλάξετε το μέγεθος της γραμματοσειράς του κάθε κειμένου μέσα στο πλαίσιο κειμένου .
Private Sub CommandButton1_Click ( ) Αν TextBox1.Font.Size > 5 ThenTextBox1.Font.Size = 2ElseTextBox1.Font . μέγεθος = 20End IfEnd Sub
5
Πατήστε το " F5 " για να εκτελέσετε το πρόγραμμα και, στη συνέχεια , πληκτρολογήστε ένα κείμενο στο πλαίσιο κειμένου . Κάντε κλικ στο κουμπί αρκετές φορές , παρατηρώντας το μέγεθος του κειμένου στο πλαίσιο κειμένου , το οποίο αλλάζει αυξάνεται ή μειώνεται με κάθε κλικ του ποντικιού .
Η
εικόνων
Πνευματικά δικαιώματα © Γνώση Υπολογιστών Όλα τα δικαιώματα κατοχυρωμένα