Microsoft Office Access er en relationel database management system inkluderet i Microsoft Office-pakken. Visual Basic for Applications ( VBA ) bruges til at automatisere rutineopgaver i Microsoft Office-programmer . Programmører sommetider løbe ind i behovet for at opdatere værdien af en bestemt post i en tabel programmering. I et par trin, du kan skrive VBA-kode til at opdatere en post i en tabel . Instruktioner
1
Vælg " Database Tools". Klik på " Visual Basic " for at åbne "Microsoft Visual Basic " vinduet.
Opret en ny sub ved at skrive " Private Sub editRecordSet ()" og trykke på " Enter".
2
Skriv følgende for at oprette dine variabler og sætte den aktuelle database : Hej
Dim sqlStr As String
Dim rst Som Recordset
Dim dbs som database
Set dbs = CurrentDb
3
Skriv følgende for at oprette en ny tabel : Hej
sQLString = " CREATE TABLE editRecord ( F_Name TEKST , L_Name TEXT) "
DoCmd.SetWarnings False
DoCmd.RunSQL ( sQLString )
4
skrive følgende for at tilføje tre registreringer af data til tabellen : Hej
strSQL = " INSERT INTO editRecord VALUES ( 'Sebastian ', ' Puga ' ) "
DoCmd.RunSQL ( strSQL )
strSQL =" INSERT INTO editRecord VALUES ( ' Maria' , ' GONZALEZ ' ) " < br >
DoCmd.RunSQL ( strSQL )
strSQL = " INSERT INTO editRecord VALUES ( ' JOHN ', ' LOPEZ ' ) "
DoCmd.RunSQL ( strSQL )
< br > 5
Skriv følgende at forespørge bordet og returnere alle poster :
Set rst = dbs.OpenRecordset ( "SELECT editRecord * FROM editRecord ").
6
Skriv følgende for at flytte for at optage nummer tre og opdatere " F_Name " feltet til " JUAN " : Hej
Set rst = dbs.OpenRecordset ( "SELECT editRecord * FROM editRecord ").
rst . Flyt (2)
rst.Edit
rst.Fields ( " F_Name "). value = " JUAN "
rst.Update
7
Skriv følgende for at lukke Record Set og slip " DBS " variable fra hukommelsen : Hej
rst.Close
Set dbs = Nothing
Tryk på " F5 " til at udføre din nye underprogram.