Microsoft Office Access er en relasjonsdatabase styringssystem inkludert i Microsoft Office-pakken. Visual Basic for Applications ( VBA ) brukes til å automatisere rutineoppgaver i Microsoft Office-programmer . Programmerere noen ganger kjøre inn behovet for å oppdatere verdien av en bestemt post i en tabell programmatisk. I noen få trinn kan du skrive VBA -kode for å oppdatere en post i en tabell . Instruksjoner
en

Velg " Database Tools. " Klikk på " Visual Basic" for å åpne " Microsoft Visual Basic "-vinduet.

Lag en ny sub ved å skrive " Private Sub editRecordSet ( ) " og trykke "Enter".
2

skriv inn følgende for å lage dine variabler og sette gjeldende database:

Dim sqlStr As String

Dim rst Som Recordset

Dim dBS Som database

Set dBS = CurrentDb
3

Skriv inn følgende for å opprette en ny tabell : en

sQLString = " CREATE tABLE editRecord ( F_Name TEKST , L_Name TEKST )"
< p > DoCmd.SetWarnings False

DoCmd.RunSQL ( sQLString )
4

Type følgende for å legge til tre poster av data til tabellen : en

strsql = " INSERT INTO editRecord VERDIER ( SEBASTIAN ',' PUGA ' ) "

DoCmd.RunSQL ( strsql )

strsql =" INSERT INTO editRecord VALUES (' MARIA ',' GONZALEZ ' ) "

DoCmd.RunSQL ( strsql )

strsql = " INSERT INTO editRecord VALUES (' JOHN ', ' LOPEZ ' )"

DoCmd.RunSQL ( strsql )

5

Skriv inn følgende for å søke på bordet og returnere alle postene :

Set rst = dbs.OpenRecordset ( "SELECT editRecord * FROM editRecord . ")
6

skriv inn følgende for å flytte til spille inn nummer tre og oppdatere " F_Name "-feltet til " JUAN " : en

Set rst = dbs.OpenRecordset ( "SELECT editRecord * FROM editRecord . ")

rst . Move ( 2 )

rst.Edit

rst.Fields ( " F_Name ") . Verdi = " JUAN "

rst.Update
7

Skriv inn følgende for å lukke Record Set og slipp " dBS " variable fra minnet : en

rst.Close

Set dBS = Ingenting

Trykk " F5" å gjennomføre den nye subrutine .