Microsoft Office Access é um sistema de gerenciamento de banco de dados relacional comumente usado para bancos de dados menores e locais. Visual Basic for Applications , também conhecido como VBA, é uma linguagem de programação de computador utilizado para automatizar os processos de rotina. Uma consulta é usado para recuperar dados a partir de tabelas de banco de dados . Você pode construir uma consulta para atualizar também os dados em uma tabela de banco de dados. Em poucos passos você pode escrever código VBA para executar uma consulta atualização e também criar uma consulta seleção para visualizar a atualização. Instruções
1

Abra o banco de dados Northwind do Microsoft Office Access. O banco de dados Northwind está incluído no pacote do Microsoft Office .
2

Clique em "Ferramentas de Banco de Dados ", selecione " Visual Basic " para abrir a janela do Microsoft Visual Basic. Clique no botão " Inserir" campo e selecione " Module ".
3

Copie e cole o seguinte código em seu novo módulo para atualizar a tabela de funcionários e , em seguida, visualizar a atualização com uma consulta seleção .

Public Sub DAOQuery ()

título Dim As String

Dim db As DAO.Database

Dim rst Como DAO.Recordset

Dim qry As String

title = " DAO Query"

Set db = CurrentDb ()

qry = " atualizar os funcionários SET funcionários . [ celular] = '210 -999-999 ' "

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

DoCmd.SetWarnings Falso

DoCmd.RunSQL ( qry )

Debug.Print título & " : SQL Update Paramenter Inquérito: " & _

vbNewLine & "" & qry

qry = " Funcionários SELECT. [Last Name ] , Colaboradores . [ celular] "

qry = qry &" FROM Employees "

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

Debug.Print título &" : SQL Query : "& _

vbNewLine &" "& qry

' Execute o qry e criar um conjunto de registros

set rst = DB.OpenRecordSet ( qry )

Debug.Print título & " : Recuperar informações de esquema para o dado conjunto de resultados: "

Para i = 0 To rst.Fields.Count - 1

Debug.Print . "