have viden om, hvordan man redigerer en kolonne med en primær nøgle begrænsning kan spare dig tid , når du arbejder med en Microsoft Access-database. Rækker i en tabel bliver unikt identificeret ved hjælp af en primær nøgle begrænsning for dataintegritet. Access opretter et entydigt indeks til at tillade hurtig adgang til data i en tabel med en primær nøgle. Brug Visual Basic for Applications ( VBA ) i Access til at automatisere processer som redigering af en primær nøgle kolonne. Instruktioner
1

Start Microsoft Office Access og vælg " Tom database " og derefter klikke på "Opret ". Vælg " Database Tools " menuen og klik derefter på "Visual Basic ". Vælg "Indsæt " menuen og klik derefter på
2

Skriv følgende for at oprette en ny procedure " Modul ". : Hej

Private Sub editPrimaryKey ()

Tryk på " Enter "
3

Skriv følgende at erklære de variabler, du vil bruge til at oprette en ny tabel med en primær nøgle: .

Dim strSQL As String
< p> Dim rst Som Recordset

Dim dbs som database
4

Skriv følgende for at definere den database til at bruge : Hej

Set dbs = CurrentDb
< br > 5

Skriv følgende for at udføre en SQL-sætning , og oprette en tabel kaldet " DataTable " med en primær nøgle : Hej

strSQL = " CREATE tABLE DataTable "

strSQL = strSQL & "( PK_Field INTEGER CONSTRAINT PK_PK_Field PRIMARY KEY , "

strSQL = strSQL & " city TEXT ( 25) ) "

DoCmd.RunSQL ( strSQL )
6

Skriv følgende for at tilføje tre rækker af data til den nye tabel : Hej

strSQL = " INSERT INTO DataTable ( [ PK_Field ], [By ]) "

strSQL = strSQL & " VALUES ( 1 ' Fort Worth '); "

DoCmd.SetWarnings False

DoCmd.RunSQL ( strSQL )

strSQL =" INSERT INTO DataTable ( [ PK_Field ], [ by ] ) "

strSQL = strSQL &" VALUES (2, ' Arlighton '); "

DoCmd.RunSQL ( strSQL )

strSQL =" INSERT INTO DataTable ( [ PK_Field ], [ by ] ) "

strSQL = strSQL &" VALUES (3, ' Dallas '); "

DoCmd.RunSQL ( strSQL )
7

Skriv følgende for at fjerne den primære nøgle indstillingen fra " PK_Field " feltet : Hej

strSQL = " ALTER TABLE DataTable "

strSQL = strSQL & " DROP CONSTRAINT PK_PK_Field , "

DoCmd.RunSQL ( strSQL )

Fjernelse af primære nøgle begrænsning vil tillade dig at redigere den primære nøgle kolonne.
8

Skriv følgende for at åbne " DataTable ", og rediger tabel ved hjælp af et Recordset :

Set rst = dbs.OpenRecordset ( " DataTable " )

rst.MoveFirst

rst.Edit

rst.Fields ( " PK_Field "). Værdi = 6 fotos

rst.Update

rst.Close

koden vil opdatere " PK_Field " til 6 for den første række. Tryk på " F5 " for at køre underprogram.
9

Skift tilbage til Microsoft Access-vinduet og højreklik på " DataTable "-tabellen ligger i den venstre rude på din computerskærm . Vælg " Design View " og klik på " PK_Field "-række. Klik på " Primær nøgle " ikonet fra " Funktioner" rude for at indstille dette felt tilbage til et primært nøglefelt .