Att veta hur man sparar en fråga med hjälp av Visual Basic for Applications i Microsoft Access kan spara tid när du skapar flera frågor . Access är en relationsdatabas ansökan främst för små lokala databaser . VBA har utvecklats av Microsoft och används ofta för att automatisera rutinuppgifter inom Microsoft Office-program . I Access är ett VBA fråga används för att öppna en tabell eller tabeller för att komma åt sina data för vidare manipulering . Instruktioner
1
Klicka på " Databas Verktyg" i Microsoft Access 2007 och välj " Visual Basic " för att öppna Microsoft Visual Basic -fönstret. Klicka på " Infoga " -menyn och välj " modul " för att skapa " Module1 . "
2
Type " Public Sub myVBAQuery " och tryck på " Enter " för att skapa en ny subrutin .
skriv följande för att deklarera dina variabler :
Dim strSQL As String
Dim dbs som databas
Dim rst som Recordset
Dim rstCnt As Integer
3
Skriv följande för att definiera din fråga och öppna Recordset :
Set dbs = CurrentDb
strSQL = " . SELECT Tabell1 * FROM Tabell1 ; "
Set rst = dbs.OpenRecordset ( strSQL )
4
Skriv följande för att slinga genom din Recordset en display data som lagrats i fältet " 1 " i tabellen :
< p> rst.MoveFirst
För rstCnt = 0 För att rst.RecordCount
MsgBox rst.Fields ( 1 ) . Värde
rst.MoveNext
Nästa rstCnt
Tryck " Ctrl + S " för att spara din subrutin i " Module1 " och det kommer att vara tillgängliga för dig att använda i framtiden .
