Slik leser du en verdi fra en spørring i MS Access 2007

June 1

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 verdiene som er lagret i tabellen. En Recordset objektet brukes til å manipulere data i en database på et rekordhøyt nivå.

Bruksanvisning

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

2 Start med å skrive følgende kode for å opprette en ny subprocedure:

Private Sub readQueryValue ()

3 Kopier og lim inn følgende VBA-kode for å deklarere variabler å bruke for å lese en spørring:

Dim nwDBS som database

Dim nwRST As Recordset

Dim nwSQL As String

Sett nwDBS = CurrentDb

4 Lag en SQL-spørring ved å skrive inn følgende kode:

nwSQL = "SELECT ansatte. [etternavn], ansatte. [fornavn]"

nwSQL = nwSQL & "fra de ansatte;"

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

Sett nwRST = nwDBS.OpenRecordset (nwSQL)

6 Flytt Recordset til første rad av spørringsresultatene og flytt deretter Recordset frem to ganger for å lese "Last Name" av den tredje rad ved å skrive inn følgende kode:

nwRST.MoveFirst

nwRST.MoveNext

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

7 Avslutt prosedyren ved å skrive inn 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 se resultatene gjennom Immediate Window.