1 Κάντε κλικ στο " Εργαλεία βάσης δεδομένων " και κάντε κλικ στο " Visual Basic " για να ανοίξετε το παράθυρο της Visual Basic. Κάντε κλικ στο "Εισαγωγή" μενού , στη συνέχεια, κάντε κλικ στο κουμπί " . Ενότητα " 2
Ξεκινήστε με τη δημιουργία μιας νέας διαδικασίας υπο χρησιμοποιώντας τον ακόλουθο κώδικα :
Private Sub removePK ( )
με 3
Δηλώνετε μια μεταβλητή, χρησιμοποιείται για να κρατήσει τον κώδικα SQL για να δημιουργήσετε έναν νέο πίνακα , πληκτρολογώντας τα εξής :
Dim stringSQL Όπως String
Η 4
Δημιουργία νέο πίνακα με ένα πρωτεύον κλειδί, χρησιμοποιώντας τη λειτουργία " DoCmd " εισάγοντας τον ακόλουθο κώδικα :
stringSQL = " CREATE TABLE exampleTbl "
stringSQL = stringSQL & " ( ID_PKField INTEGER ΠΙΕΣΕΩΝ PK_ID_PKField PRIMARY KEY , "
stringSQL = stringSQL & " sampleClmn TEXT ( 25 ) ) "
DoCmd.RunSQL ( stringSQL )
5
Πληκτρολογήστε τον ακόλουθο κώδικα για να αλλάξει το πίνακα που έχει δημιουργηθεί στο προηγούμενο βήμα και αφαιρέστε το πρωτεύον κλειδί :
stringSQL = " ALTER TABLE exampleTbl "
stringSQL = stringSQL & " DROP CONSTRAINT PK_ID_PKField ? "
DoCmd.RunSQL ( stringSQL )
Η 6
Πληκτρολογήστε " End Sub " για να τερματίσετε τη διαδικασία sub .
Η
εικόνων
Πνευματικά δικαιώματα © Γνώση Υπολογιστών Όλα τα δικαιώματα κατοχυρωμένα