1 Κάντε κλικ στην καρτέλα "Προγραμματιστής " , και στη συνέχεια κάντε κλικ στο κουμπί " Εισαγωγή " για να εμφανιστεί μια συλλογή των στοιχείων ελέγχου φόρμας μπορείτε να εισάγετε στο τρέχον φύλλο . Θα κάνετε μια σύντομη φόρμα στην οποία θα προσθέσετε λειτουργικότητα για την επικύρωση των δεδομένων που εισάγονται με τη μορφή . 2
Κάντε κλικ στο " Πλαίσιο κειμένου " έλεγχος από το θεωρείο , και στη συνέχεια σύρετε στο φύλλο να καθορίσει το πλαίσιο κειμένου . Κάντε κλικ στο " κουμπί" έλεγχος της γκαλερί , και στη συνέχεια σύρετε κάτω από το πλαίσιο κειμένου για να δημιουργήσετε ένα κουμπί .
Εικόνων 3
Κάντε δεξί κλικ στο κουμπί και στη συνέχεια κάντε κλικ στο κουμπί "Προβολή κώδικα ". Το Excel θα ανοίξει το περιβάλλον προγραμματισμού για τη Visual Basic for Applications . Επικολλήστε τις ακόλουθες δηλώσεις στο περιβάλλον . Αυτό το πρόγραμμα διαβάζει τα δεδομένα που εισάγονται στο στοιχείο ελέγχου πλαισίου κειμένου και χρησιμοποιεί τη λειτουργία "Είναι Αριθμητικό " για να καθοριστεί εάν τα δεδομένα είναι ένας αριθμός . Το πρόγραμμα εμφανίζει μια προειδοποίηση και καθαρίζει το πλαίσιο κειμένου, αν τα δεδομένα δεν είναι αριθμητικό .
Private Sub CommandButton1_Click ( )
Αν όχι ( IsNumeric ( TextBox1 ) ) Στη συνέχεια
MsgBox " Αυτό το πεδίο πρέπει να είναι αριθμητικό "
TextBox1 = " "
End If
End Sub
Η
4 Κάντε κλικ στο εικονίδιο " Excel " για η γραμμή εργασιών των Windows για να επιστρέψετε στο Excel , και στη συνέχεια κάντε κλικ στο κουμπί " σχέδιο " του " δημιουργού " πίνακα για να βγείτε από τη λειτουργία του σχεδιασμού και να μπείτε στη λειτουργία μορφή εισόδου .
5
πληκτρολογήστε έναν αριθμό στο κείμενο box , και στη συνέχεια πατήστε το κουμπί . Δεν θα εμφανιστεί το μήνυμα . Πληκτρολογήστε κάποιο κείμενο στο πλαίσιο κειμένου και, στη συνέχεια , πατήστε το κουμπί ξανά . Το πρόγραμμά σας θα εμφανίσει την ειδοποίηση που έχει προγραμματιστεί στο βήμα 3 , και καταργήστε το πλαίσιο κειμένου .
Η
εικόνων
Πνευματικά δικαιώματα © Γνώση Υπολογιστών Όλα τα δικαιώματα κατοχυρωμένα