Microsoft Office Access è un sistema di gestione di database relazionali comunemente usato per i database più piccoli e locali . Visual Basic for Applications , noto anche come VBA , è un linguaggio di programmazione per computer utilizzato per automatizzare i processi di routine . Una query viene utilizzata per recuperare i dati dalle tabelle del database . È possibile creare una query per aggiornare anche i dati in una tabella di database . In pochi passi è possibile scrivere codice VBA per eseguire una query di aggiornamento e anche creare una query di selezione per visualizzare l'aggiornamento. Istruzioni
1

Aprire il database di Access Northwind di Microsoft Office . Il database Northwind è incluso nella suite Microsoft Office .
2

Fare clic su " Strumenti di database ", quindi selezionare " Visual Basic " per aprire la finestra di Microsoft Visual Basic . Fare clic sul campo "Inserisci" e selezionare "Modulo ".
3

Copia e incolla il seguente codice nel nuovo modulo per aggiornare la tabella Impiegati e quindi visualizzare l'aggiornamento con una query di selezione .

Public Sub DAOQuery ( ) per

Dim titolo As String

Dim db As DAO.Database

Dim rst Come
DAO.Recordset < p > Dim qry As String

title = " DAO Query "

Set db = CurrentDb ( ) per

qry = " UPDATE Impiegati SET dipendenti . [ cellulare ] = '210 -999-999 ' "

qry = qry & " WHERE ( ( ( Employees. [ Cognome ] ) =' Cencini ')); "

DoCmd.SetWarnings
False < p > DoCmd.RunSQL ( qry ) per titolo Debug.Print

& " : SQL aggiornamento paramenter Query: " & _

vbNewLine & " " & qry

qry = " Per selezionare i dipendenti . [ Cognome ] , Lavoratori . [ cellulare ] "

qry = qry & " FROM Impiegati "

qry = qry & " WHERE ( ( ( Employees. [ Cognome ] ) = ' Cencini ')); "

Debug.Print titolo &" : SQL Query: "& _

vbNewLine & " " & qry

'Esegui il qry e creare un record set