Het hebben van de kennis over hoe je een kolom te bewerken met een primaire key beperking kunt u tijd besparen bij het werken met een Microsoft Access-database . Rijen in een tabel zijn uniek geïdentificeerd met behulp van een primary key constraint voor data-integriteit . Access een unieke index voor snelle toegang tot gegevens in een tabel met een primaire sleutel toe . Gebruik Visual Basic for Applications ( VBA ) in Access om processen te automatiseren, zoals het bewerken van een primaire sleutel kolom . Instructies
1 Start Microsoft Office Access en selecteer " Lege database " en klik op "Create . " Selecteer het menu " Database Tools" en klik op ' Visual Basic . " Selecteer in het menu "Invoegen " en klik
Type 2 het volgende om een nieuwe procedure te creëren "Module . " : Private Sub editPrimaryKey
( ) Pers Nieuws " Voer "
3 Typ het volgende om de variabelen die je zal gebruiken om een nieuwe tabel te maken met een primaire sleutel te verklaren : . Dim strSQL
als Koord
Dim rst als Recordset
Dim dbs Als Database
Type 4 het volgende om de database te definiëren om te gebruiken : Set
dbs = CurrentDb
< br type> 5 het volgende om een SQL- instructie uit te voeren en een tabel met de naam " dataTable " met een primaire sleutel : strSQL
= " CREATE tABLE dataTable "
strSQL = strSQL & " ( PK_Field INTEGER CONSTRAINT PK_PK_Field PRIMARY KEY , "
strSQL = strSQL & " city TEXT ( 25 ) ) " DoCmd.RunSQL ( strSQL )
6 typ het volgende om drie rijen met gegevens toe te voegen aan de nieuwe tabel : strSQL = " INSERT INTO dataTable ( [ PK_Field ] , [plaats ] ) " strSQL = strSQL & " WAARDEN
( 1
, ' Fort Worth ' ) ; " DoCmd.SetWarnings
False DoCmd.RunSQL ( strSQL ) strSQL
= " INSERT INTO dataTable ( [ PK_Field ] , [ stad ] ) "
strSQL = strSQL & " VALUES ( 2 , ' Arlighton ' ) ; " DoCmd.RunSQL ( strSQL ) strSQL
= " INSERT INTO dataTable ( [ PK_Field ] , [plaats ] ) "
strSQL = strSQL & " VALUES ( 3 , ' Dallas ' ) ; " DoCmd.RunSQL
( strSQL )
7 typ het volgende om de primaire sleutel instelling van de " PK_Field " veld te verwijderen : strSQL = " ALTER TABLE dataTable " strSQL = strSQL & " DROP CONSTRAINT PK_PK_Field ; "
DoCmd.RunSQL ( strSQL ) op het verwijderen van de primaire sleutel constraint zal u toelaten om de primaire sleutel kolom bewerken .
Type 8 het volgende aan de " dataTable " openen en bewerken van de tafel met behulp van een Recordset :
Set rst = dbs.OpenRecordset ( " dataTable " ) rst.MoveFirst rst.Edit rst.Fields (
" PK_Field " ) . Value = 6 rst.Update rst.Close
de code zal de " PK_Field " updaten om 6 voor de eerste rij . Druk op " F5 " om de subroutine uitgevoerd .
Schakelaar 9 terug naar het Access- venster en klik met de rechtermuisknop de " dataTable " tafel ligt in het linkervenster van uw computerscherm Microsoft . Kies "Design View" en klik op de " PK_Field " rij . Klik op de " primaire sleutel " icoon van de " Tools" venster om dit gebied terug te zetten naar een primaire sleutel veld .
|
