Å vite hvordan du lagrer en spørring ved hjelp av Visual Basic for Applications i Microsoft Access kan spare deg for tid når du oppretter flere spørringer . Access er en relasjonsdatabase programmet i hovedsak brukt til små lokale databaser. VBA ble utviklet av Microsoft , og det er vanlig å automatisere rutineoppgaver i Microsoft Office-programmer . I Access er en VBA spørring brukes til å åpne en tabell eller tabeller for å få tilgang til sine data for videre manipulering . Instruksjoner
en

Klikk "Database Verktøy " i Microsoft Access 2007 og velg " Visual Basic " for å åpne Microsoft Visual Basic Window . Klikk på " Insert"-menyen og velg " Module" å skape " Module1 . "
2

Type " Public Sub myVBAQuery " og trykk " Enter" for å opprette en ny subrutine .

skriv inn følgende å erklære variabler : en

Dim strSQL As String

Dim dBS Som Database

Dim rst Som Recordset

Dim rstCnt As Integer

3

Skriv inn følgende for å definere søket og åpne Recordset : en

Set dBS = CurrentDb

strSQL = " . SELECT Table1 * FROM Tabell 1 ; "

Set rst = dbs.OpenRecordset ( strSQL )
4

Skriv inn følgende for å sløyfe gjennom Recordset din et display data lagret i feltet " 1 " i tabellen : en < p> rst.MoveFirst

For rstCnt = 0 For å rst.RecordCount

MsgBox rst.Fields ( 1 ) . Verdi

rst.MoveNext

Neste rstCnt

Trykk " Ctrl + S " for å lagre subrutine i " Module1 ", og den vil være tilgjengelig for deg å bruke i fremtiden .