Microsoft Office Access er en relasjonsdatabase styringssystem som vanligvis brukes for mindre og lokale databaser . Tilgang er inkludert i Microsoft Office-pakken og inneholder alle nødvendige verktøy for å administrere en relasjonsdatabase. En spørring brukes til å hente informasjon fra databasen tabeller . Trekke ut numre fra en Access- spørring er oppnådd på samme måte som du ville trekke andre datatyper . En måte å hente ut data er ved hjelp av Visual Basic for Applications. I noen få skritt , kan du skrive VBA-kode , trekke ut tall fra en spørring , og vise dem i output -vinduet . Du trenger
Microsoft Office Access
Northwind database
Vis flere instruksjoner
en

Åpne Northwind Microsoft Office Access database. The Northwind database er inkludert i Microsoft Office-pakken.
2

Klikk på " Database Verktøy ", velg deretter " Visual Basic " for å åpne Microsoft Visual Basic Window . Klikk på " Insert"-menyen og velg " Module ".
3

Kopier og lim inn følgende kode inn i den nye modulen for å søke på " produkter" bordet og trekke tallene i " Endre rekkefølge level "-feltet større enn 15 :

Private Sub extractNumbers ()

Dim strSQL As String

Dim rst Som Recordset

Dim dBS Som Database

Set dBS = CurrentDb

strSQL = "Velg produkter . [ Produktnavn ] , Products . [Omgjøre Nivå] "

strSQL = strSQL & " FROM Products "
< p> strSQL = strSQL & " WHERE ( ( ( Products. [Omgjøre Nivå] ) > 15 )); "

Sett rst = dbs.OpenRecordset ( strSQL )

rst.MoveLast

rst.MoveFirst

Debug.Print " Organiser nivå > 15 : "

Mens Ikke rst.EOF

Debug.Print " Produktnavn: "& rst.Fields ( 0 ) Verdi

Debug.Print . " "

Debug.Print " Organiser Nivå nummer : " . & rst.Fields ( 1) Verdi
< p > rst.MoveNext

Loop

End Sub