Veta hur man använder variabler i frågor med hjälp av Microsoft Office Access kan göra din databas ansökan mer dynamisk . Det enklaste sättet att använda variabler i frågor är genom Visual Basic for Applications , även känd som VBA . VBA är ett programmeringsspråk som har utvecklats av Microsoft och används för att automatisera manuella processer i Microsoft Office . En fråga används för att hämta information från en databastabell. Variabler definieras för att hålla information i datorns minne under tiden ett program körs . Instruktioner
1
Öppna Northwind Microsoft Office Access-databas . Northwind-databasen ingår i Microsoft Office-paketet .
2
Klicka på " Databas Verktyg " och välj " Visual Basic " för att öppna Microsoft Visual Basic Fönster . Klicka på " Infoga "-fältet och välj " Modul . " Addera 3
Kopiera och klistra in följande kod på din nya modulen för att använda " Leverantör A " som en variabel i en urvalsfråga och utsikt förnamn och efternamn på " Leverantör A " :
Private Sub userQueryVariables ( ) katalog
Dim strSQL As String
Dim rst Som Recordset
Dim dbs As Database
Dim leverantör As String
leverantör = " leverantör A "
Set dbs = CurrentDb
strSQL = " SELECT Suppliers.Company , leverantörer . [ Efternamn ] , leverantörer . [ Förnamn ] "
strSQL = strSQL & " från leverantörer "
strSQL = strSQL & " WHERE ( ( ( Suppliers.Company ) = ' " & ( leverantör ) & " ')); "
Set rst = dbs.OpenRecordset ( strSQL ) katalog
rst.MoveLast
rst.MoveFirst
Debug . Print ( leverantör & " Information : " ) katalog
Do While Not rst.EOF
Debug.Print ( " Förnamn : " . & rst.Fields ( 2 ) Value ) katalog
Debug.Print ( " Efternamn : " . & rst.Fields ( 1 ) Value ) katalog
rst.MoveNext
Loop
End Sub
4
Tryck " F5 " för att köra din subrutin .
