Προγραμματισμός

* Γνώση Υπολογιστών >> Προγραμματισμός >> Visual Βασικά Προγραμματισμός

Πώς να επεξεργαστείτε το πρωτεύον κλειδί

Έχοντας τη γνώση για το πώς να επεξεργαστείτε μια στήλη με ένα πρωτεύον κλειδί περιορισμό μπορείτε να εξοικονομήσετε χρόνο κατά την εργασία με μια βάση δεδομένων της Microsoft Access . Οι γραμμές σε έναν πίνακα μονοσήμαντα χρησιμοποιώντας ένα πρωτεύον κλειδί περιορισμό για την ακεραιότητα των δεδομένων . Η Access δημιουργεί ένα μοναδικό ευρετήριο ώστε να επιτρέπει γρήγορη πρόσβαση σε δεδομένα σε έναν πίνακα με ένα πρωτεύον κλειδί . Χρήση της Visual Basic for Applications ( VBA ) στην Access για την αυτοματοποίηση των διαδικασιών , όπως η επεξεργασία ενός πρωτεύοντος κλειδιού στήλη . Οδηγίες
Η 1

Ξεκινήστε το Microsoft Office Access και επιλέξτε "Blank Database " και στη συνέχεια κάντε κλικ στο κουμπί " Δημιουργία ". Επιλέξτε από το μενού " Εργαλεία βάσης δεδομένων " και στη συνέχεια κάντε κλικ στο " Visual Basic ". Επιλέξτε το μενού "Εισαγωγή " και στη συνέχεια κάντε κλικ στο κουμπί " Ενότητα ". 2

Πληκτρολογήστε το παρακάτω, για να δημιουργήσετε μια νέα διαδικασία :

Private Sub editPrimaryKey ( )

Τύπου " . Enter "
εικόνων 3

Πληκτρολογήστε το παρακάτω, για να δηλώσει τις μεταβλητές που θα χρησιμοποιήσετε για να δημιουργήσετε έναν νέο πίνακα με ένα πρωτεύον κλειδί :

Dim strSQL As String

Dim rst Όπως εγγραφών

Dim dbs Όπως Database
Η 4

Πληκτρολογήστε το παρακάτω, για να καθορίσει τη βάση δεδομένων για χρήση :

Set dbs = CurrentDb

5

Πληκτρολογήστε το παρακάτω για να εκτελέσει μια δήλωση SQL και να δημιουργήσει έναν πίνακα που ονομάζεται " datatable " με ένα πρωτεύον κλειδί :

strSQL = " CREATE TABLE datatable "

strSQL = strSQL & " ( PK_Field INTEGER ΠΙΕΣΕΩΝ PK_PK_Field PRIMARY KEY , "

strSQL = strSQL & «πόλη TEXT ( 25 ) ) "

DoCmd.RunSQL ( strSQL )
Η 6

Πληκτρολογήστε τα παρακάτω για να προσθέσετε τρεις σειρές δεδομένων σε νέο πίνακα :

strSQL = " INSERT INTO datatable ( [ PK_Field ] , [ πόλη ] ) "

strSQL = strSQL & " ΑΞΙΕΣ ( 1 « Fort Worth ») ? "

DoCmd.SetWarnings Λάθος

DoCmd.RunSQL ( strSQL )

strSQL = " INSERT INTO datatable ( [ PK_Field ] , [ πόλη ] ) "

strSQL = strSQL & " ΑΞΙΕΣ ( 2 , ' Arlighton ') ? "

DoCmd.RunSQL ( strSQL )

strSQL = " INSERT INTO datatable ( [ PK_Field ] , [ πόλη ] ) "

strSQL = strSQL & " ΑΞΙΕΣ ( 3 , « Ντάλας» ) ? "

DoCmd.RunSQL ( strSQL )
Η 7

Πληκτρολογήστε το παρακάτω, για να καταργήσετε το πρωτεύον κλειδί ρύθμιση από το " PK_Field " πεδίο :

strSQL = " ALTER TABLE datatable "

strSQL = strSQL & " DROP CONSTRAINT PK_PK_Field ? "

DoCmd.RunSQL ( strSQL )

Αφαίρεση του πρωτεύοντος κλειδιού περιορισμός θα σας επιτρέψει να επεξεργαστείτε το πρωτεύον κλειδί της στήλης .
8

Πληκτρολογήστε το παρακάτω, για να ανοίξει το " datatable » και να επεξεργαστείτε το πίνακα, σύμφωνα με τις εγγραφές:

Set RST = dbs.OpenRecordset ( " datatable " )

rst.MoveFirst

rst.Edit

rst.Fields ( " PK_Field " ) . Value = 6

rst.Update

rst.Close

ο κωδικός θα ενημερώσει το « PK_Field " έως 6 για την πρώτη γραμμή . Πατήστε το πλήκτρο " F5 " για να εκτελέσετε την υπορουτίνα .
Η 9

Επιστρέψτε στην Microsoft Access Παράθυρο και κάντε δεξί κλικ στον πίνακα " datatable " που βρίσκεται στο αριστερό τμήμα του παραθύρου της οθόνης του υπολογιστή σας . Επιλέξτε " Προβολή σχεδίασης " και κάντε κλικ στο " PK_Field " σειρά . Κάντε κλικ στο εικονίδιο " Πρωτεύον κλειδί " από το " Εργαλεία" παράθυρο για να ορίσετε αυτό το πεδίο πίσω σε ένα πεδίο πρωτεύοντος κλειδιού .
Η
εικόνων

Συναφής σύστασή

Πνευματικά δικαιώματα © Γνώση Υπολογιστών Όλα τα δικαιώματα κατοχυρωμένα