Visual Basic for Applications ( VBA ) är en dator programmeringsspråk konstruerad av Microsoft och används för att automatisera rutinuppgifter i Access . Access är en relationsdatabas som ingår i Microsoft Office-paketet. En Structured Query Language ( SQL ) fråga används för att hämta data från en databastabell . Utgången resultatet av en SQL- fråga nås via ett Recordset-objekt . I några få steg kan du skriva VBA- kod för att skapa en SQL-fråga och visa posterna hämtas
1 .
Öppna Northwind Microsoft Office Access -databas . Northwind -databasen ingår i Microsoft Office-paketet .
2 .
Klicka på " Databasverktyg "och välj sedan "Visual Basic "för att öppna Microsoft Visual Basic -fönstret . Klicka på " Infoga " och välj " Module ".
3 .
Kopiera och klistra in följande kod på din nya modul för att visa det första namnet och näringslivet telefonnummer i "Kunden" tabell :
Private Sub customerQuery ( )
Dim strSQL As String
Dim custRst Som Recordset
Dim DBS som databas
Dim rstCntr As Integer
Dim custStr As String
Set DBS=CurrentDb
strSQL=" SELECT kunder . [ Förnamn ] "
strSQL=strSQL " kunder [ Telefon ] "
strSQL=strSQL " FROM kunder . "
Set custRst=dbs. OpenRecordset ( strSQL )
custRst. MoveLast
custRst. MoveFirst
För rstCntr=0 till custRst. RecordCount-1
custStr=custStr custRst. Fields (0 ) Värde _
. " är en kund och deras verksamhet telefon är " custRst. Fields (1) . Value vbCr
custRst. MoveNext
Nästa rstCntr
MsgBox custStr
custRst . Stäng
dbs. Close
End Sub
4 .
Kör din subrutin genom att trycka " F5 ".
Previous:nothing Next:nybörjare sql utbildning