Hvordan trekke ut numre i en spørring for Access

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 blir brukt til å hente informasjon fra databasetabeller. Utpakking tall 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å trinn kan du skrive VBA-kode, trekke ut tall fra en spørring, og vise dem i utgangsvinduet.

Bruksanvisning

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

2 Klikk "Databaseverktø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 til å spørre "produkter" bord og trekke tallene i "Omgjøre Level" felt større enn 15:

Private Sub extractNumbers ()

Dim strSQL As String

Dim rst As Recordset

Dim dbs som database

Sett dbs = CurrentDb

strSQL = "SELECT produkter. [Produktnavn], produkter. [Omgjøre Level]"

strSQL = strSQL & "Fra Products"

strSQL = strSQL & "WHERE (((produkter [Omgjøre Level])> 15).);"

Sett rst = dbs.OpenRecordset (strSQL)

rst.MoveLast

rst.MoveFirst

Debug.Print "Omgjøre nivå> 15:"

Gjør Mens Ikke rst.EOF

Debug.Print "Product Name:" & rst.Fields(0).Value

Debug.Print ""

Debug.Print "Omgjøre nivå Nummer:" & rst.Fields (1) .Value

rst.MoveNext

Loop

End Sub