Πώς να Διαγραφή πεδίο με VBA στην Access 2007

Microsoft Access 2007 είναι η σχεσιακή βάση δεδομένων εφαρμογή που περιλαμβάνεται σε ορισμένες εκδόσεις του Microsoft Office . Παρέχει ένα απλό interface για άτομα με ελάχιστη εμπειρία στις βάσεις δεδομένων , επιτρέποντας έτσι την αποθήκευση δεδομένων και τη χειραγώγηση που διαφορετικά θα απαιτούσε ένα διαχειριστή της βάσης δεδομένων . Ενώ οι περισσότερες ενέργειες μπορούν να εκτελεστούν απευθείας από το περιβάλλον εργασίας χρήστη του προγράμματος , μπορεί να καταστεί αναγκαία για την εκτέλεση πιο προηγμένες λειτουργίες , όπως η διαγραφή πεδίου , που απαιτούν τη χρήση της Visual Basic for Applications (VBA ) γλώσσα . Ευτυχώς η Microsoft περιλαμβάνει έναν επεξεργαστή VBA με την πρόσβαση , επιτρέποντας τη διαγραφή ενός πεδίου με VBA . Τα πράγματα που θα χρειαστείτε βάση δεδομένων της Access
εικόνων Εμφάνιση Περισσότερες οδηγίες
Η 1

Πλοήγηση σε βάση δεδομένων της Access σας και κάντε διπλό κλικ στο αρχείο για να το ανοίξετε στην Access .

2

Εντοπίστε τον πίνακα που περιέχει το πεδίο που θέλετε να διαγράψετε , λαμβάνοντας υπόψη ακριβές όνομα του πίνακα .
εικόνων 3

διπλό κλικ στο τραπέζι για να το ανοίξετε , στη συνέχεια, εντοπίστε το πεδίο που θέλετε να διαγράψετε , λαμβάνοντας υπόψη « την ακριβή ονομασία του . Μόλις έχετε αποκτήσει αυτές τις πληροφορίες , κλείστε τον πίνακα . Είστε σε θέση να διαγράψετε ένα πεδίο από έναν ανοιχτό πίνακα .
Η

4 Κάντε κλικ στο " Εργαλεία βάσης δεδομένων " καρτέλα στο επάνω μέρος της οθόνης .
5

Επιλέξτε το " Visual Basic " κουμπί .
Η

6 Κάντε κλικ στο κουμπί" Εισαγωγή " στο πάνω μέρος της οθόνης , στη συνέχεια, επιλέξτε το " Module " επιλογή .
Η 7

Πληκτρολογήστε το παρακάτω στο παράθυρο " Module" που μόλις άνοιξε :

Private Sub cmdRemove_Field_Click ( )

Dim curDatabase As Object

Dim tblxxxxx As Object

« Πάρτε μια αναφορά στο η τρέχουσα βάση δεδομένων ήδη ανοίξει στην Access

Set curDatabase = CurrentDb

« Πάρτε μια αναφορά σε έναν πίνακα με το όνομα xxxxx σε ανοικτή
της βάσης δεδομένων σας

Set tblxxxxx = curDatabase.TableDefs ( " xxxxx " )

tblxxxxx.Fields.Delete " zzzzz "

End Sub

Αντικαταστήστε το όνομα του πίνακα σας για " xxxxx " και το όνομα του πεδίου που θέλετε να αφαίρεση για " zzzzz . "
8

Κάντε κλικ στο " Run " στο πάνω μέρος της οθόνης , στη συνέχεια, επιλέξτε την επιλογή "Run Sub /UserForm " για να διαγράψετε το δικό σας πεδίο .
Η

Η