Microsoft Office Access er en relationel database management system der almindeligvis anvendes til mindre og lokale databaser. Visual Basic for Applications , også kendt som VBA , er en computer programmeringssprog, der anvendes til at automatisere rutinemæssige processer . En forespørgsel bruges til at hente data fra databasetabeller. Du kan bygge en forespørgsel til også opdatere data i en database tabel. I et par trin, du kan skrive VBA-kode til at udføre en opdateringsforespørgsel , og også skabe en udvælgelsesforespørgsel for at se opdateringen. Instruktioner
1

Åbn Northwind Microsoft Office Access -database. Databasen Northwind er inkluderet i Microsoft Office-pakken.
2

Klik på " Database Tools " og derefter vælge "Visual Basic " for at åbne Microsoft Visual Basic vindue. Klik på "Indsæt "-feltet og vælg " Modul ".
3

Kopier og indsæt følgende kode i dit nye modul til at opdatere tabellen Medarbejdere og derefter se opdateringen med en udvælgelsesforespørgsel .

Public Sub DAOQuery ()

Dim titel As String

Dim db Som DAO.Database

Dim rst Som DAO.Recordset
< p > Dim qry As String

title = " DAO Query "

Set db = CurrentDb ()

qry = " UPDATE Medarbejdere SET Medarbejdere . [ Mobiltelefoner ] = '210 -999-999 ' "

qry = qry &" WHERE ((( Employees. [ Efternavn ] ) =' cencini « )), "

DoCmd.SetWarnings False
< p> DoCmd.RunSQL ( qry )

Debug.Print titel & " : SQL opdatering parameteren Query : " & _

vbNewLine & " " & qry

qry = " SELECT Medarbejdere . [ Efternavn ] , Medarbejdere . [ Mobiltelefoner ] "

qry = qry &" FROM Medarbejdere "

qry = qry &" WHERE ((( Employees. [ Efternavn ] ) = ' cencini « )), "

Debug.Print titel & " : SQL Query : " & _

vbNewLine & " " & qry

' Kør qry og oprette en post sæt

Set rst = db.OpenRecordset ( qry )

Debug.Print titel & " : Hent skema info for den givne resultat indstillet: "

i = 0 at rst.Fields.Count - 1

Debug.Print "