Ξεκινήστε τη Microsoft Access και, στη συνέχεια , κάντε κλικ στο εικονίδιο " Νέα κενή βάση δεδομένων " , στη συνέχεια, κάντε κλικ στην επιλογή " Δημιουργία ". 2 
 
 Κάντε κλικ στο " Εργαλεία βάσης δεδομένων " καρτέλα στην Κορδέλα και, στη συνέχεια , κάντε κλικ στο κουμπί" Visual Basic " . Αυτό θα ανοίξει το Visual Basic Editor ( VBE ) . 
 Εικόνων 3 
 Επιλέξτε "Εισαγωγή " και στη συνέχεια κάντε κλικ στο κουμπί " Ενότητα " για να ανοίξει ένα κενό παράθυρο . 
 Η 4 
 Πληκτρολογήστε τον κωδικό στο παράθυρο μονάδα . Κάθε τμήμα του κώδικα VBA ξεκινάει είτε με " Sub" ή "Λειτουργία" και τελειώνει με " Sub End ή End Function . " Μια υπορουτίνα είναι ένα κομμάτι του κώδικα που θα επιστρέψει μια τιμή , όταν μια λειτουργία είναι ένα κομμάτι κώδικα που δεν θα . Τι γράφετε κώδικα εξαρτάται από ποια δεδομένα στη βάση δεδομένων σας και τι θέλετε να κάνετε με τα δεδομένα . Για παράδειγμα , μπορείτε να χρησιμοποιήσετε τον ακόλουθο κώδικα για να υπολογίσει την ηλικία ενός ατόμου : 
 
 ηλικία Λειτουργία ( vb_Dte Όπως Variant ) 
 
 Dim v_Age_Calc Όπως Παραλλαγή 
 
 v_Age_Calc = DateDiff ("εεεε » , vb_Dte , τώρα ) 
 
 Εάν Ημερομηνία < DateSerial ( έτος ( τώρα ) , _ 
 
 Μήνας ( vB_Date ) , Day ( vb_Dte ) ) Στη συνέχεια v_Age_Calc = v_Age_Calc - 1 
 < p> ηλικία = CInt ( v_Age_Calc ) 
 
 Function End 
 5 
 Πατήστε το " F5 " για να εκτελέσετε τη λειτουργία . 
 Η 
 εικόνων
           
Πνευματικά δικαιώματα © Γνώση Υπολογιστών Όλα τα δικαιώματα κατοχυρωμένα