En Recordset objekt kan være et kraftig verktøy til bruk i Microsoft Office Access når du trenger å spørre en tabell ved hjelp av Visual Basic for Applications ( VBA ) . Den raskeste måten å hente en verdi fra en spørring er ved hjelp av VBA . I VBA kan du bruke objektet til å spørre en tabell i en database og hente verdier lagret i tabellen . En Recordset objektet brukes til å manipulere data i en database på et rekordhøyt nivå . Du trenger
Northwind database
Vis flere instruksjoner
en

Åpne Northwind database og klikk på " Database Tools "-kategorien . Klikk på " Visual Basic " for å åpne Visual Basic Editor Window
2

Start ved å skrive følgende kode for å opprette en ny subprocedure : .

Private Sub readQueryValue ( )


3

Kopier og lim inn følgende VBA -kode for å erklære variabler å bruke for å lese en spørring :

Dim nwDBS Som Database

Dim nwRST Som Recordset
< p> Dim nwSQL As String

Set nwDBS = CurrentDb
4

Lag en SQL- spørringen ved å skrive følgende kode : .

nwSQL = " SELECT ansatte [Siste navn ] , ansatte [ fornavn ] "

nwSQL = nwSQL &" FROM Ansatte ; "
5

Åpne en ny Recordset ved hjelp av SQL-spørringen ble opprettet i forrige trinn. :

Set nwRST = nwDBS.OpenRecordset ( nwSQL )
6

Flytt Recordset til den første raden i søkeresultatene , og flytt deretter Recordset frem to ganger for å lese "Etternavn "av tredje rad ved å skrive følgende kode :

nwRST.MoveFirst

nwRST.MoveNext

nwRST.MoveNext

Debug.Print nwRST.Fields . ("[ etternavn ] ") Verdi
7

End prosedyren ved å skrive følgende kode :

nwRST.Close

nwDBS.Close

End Sub
8

Trykk " Ctrl" og " G " for å åpne Immediate Window. Trykk "F5 " for å kjøre prosedyren og vise resultatene gjennom Umiddelbar Window.