Visual Basic for Applications ( VBA ) er en computer programmeringssprog udviklet af Microsoft og bruges til at automatisere rutineopgaver i Access. Access er en relationel database management system inkluderet i Microsoft Office-pakken. En Structured Query Language ( SQL) forespørgsel bruges til at hente data fra en database tabel . Output resultaterne af en SQL-forespørgsel er adgang til via en Recordset objekt . I et par trin, du kan skrive VBA-kode til at oprette en SQL forespørgsel og få vist de poster hentet. 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 for at se det første navn og business telefonnummer i "Kunden" table : Hej

Private Sub customerQuery ()

Dim strSQL As String

Dim custRst Som Recordset

Dim dbs som database

Dim rstCntr As Integer

Dim custStr As String

Set dbs = CurrentDb

strSQL = " SELECT Kunder . [ Fornavn ] , "

strSQL = strSQL & "Kunderne [ Business Phone ] . "

strSQL = strSQL & " FROM Kunder , "

Set custRst = dbs.OpenRecordset ( strSQL )

custRst.MoveLast

custRst.MoveFirst

rstCntr = 0 Til custRst.RecordCount - 1

custStr = custStr & custRst.Fields (0) Value & _

"er. en kunde og deres forretning telefon er "& custRst.Fields (1) . Value & vbCr

custRst.MoveNext

Næste rstCntr

MsgBox custStr

custRst.Close

dbs.Close

End Sub
4

Styr dit subrutine ved at trykke på " F5 ".
< br >