Sapere come salvare una query utilizzando Visual Basic , Applications Edition in Microsoft Access consente di risparmiare tempo durante la creazione di più query . Access è un'applicazione di database relazionale utilizzato principalmente per piccoli database locali . VBA è stato sviluppato da Microsoft ed è comunemente utilizzato per automatizzare le attività di routine all'interno di applicazioni Microsoft Office . In Access , VBA una query viene utilizzata per aprire una o più tabelle di accedere ai propri dati per ulteriori manipolazioni . Istruzioni 
 1 
 Clicca su "Strumenti database" in Microsoft Access 2007 e selezionare " Visual Basic " per aprire la finestra di Microsoft Visual Basic . Fare clic sul menu "Inserisci" e selezionare " Modulo " per creare " Modulo1 ". 
 2 
 Tipo " myVBAQuery Public Sub " e premere " Invio" per creare un nuovo sottoprogramma . 
 
 digitare quanto segue per dichiarare le variabili : 
 
 Dim strSQL As String 
 
 Dim dbs As Database Dim rst 
 
 come Recordset 
 
 Dim rstCnt As Integer < br > 
 3 
 digitare quanto segue per definire la query e aprire il Recordset : 
 
 Set dbs = CurrentDb 
 
 strSQL = " . SELEZIONA Tabella 1 * FROM Tabella 1 ; " 
 
 Set rst = dbs.OpenRecordset ( strSQL ) economici 4 
 Digitare quanto segue al ciclo attraverso il vostro Recordset una visualizzazione dei dati memorizzati nel campo " 1 " nella tua tabella : 
 < p > rst.MoveFirst 
 
 rstCnt = 0 Per rst.RecordCount 
 
 MsgBox rst.Fields ( 1) . Valore 
 
 rst.MoveNext 
 
 Successivo rstCnt 
 
 Premere " Ctrl + S " per salvare la subroutine in " Modulo1 " e sarà disponibile per l'utilizzo in futuro .