Microsoft Office Access es un sistema de gestión de base de datos relacional utilizada para bases de datos más pequeñas y locales . Visual Basic para aplicaciones , también conocido como VBA es un lenguaje de programación utilizado para automatizar los procesos rutinarios. Una consulta se utiliza para recuperar datos de las tablas de bases de datos . Puede crear una consulta para actualizar también los datos en una tabla de base de datos. En pocos pasos se puede escribir código VBA para ejecutar una consulta de actualización y también crear una consulta de selección para acceder a la actualización. Instrucciones
1
Abra la base de datos Access Northwind Microsoft Office. La base de datos Northwind se incluye en la suite de Microsoft Office.
2 Haga clic en " Herramientas de base de datos ", seleccione "Visual Basic " para abrir la ventana de Microsoft Visual Basic . Haga clic en el campo " Insertar" y seleccione " Módulo ".
3
Copia y pega el siguiente código en el nuevo módulo para actualizar la tabla empleados y luego ver la actualización con una consulta de selección .
Public Sub DAOQuery ()
título dévil como secuencia
db As DAO.Database
primera Dim As
DAO.Recordset
qry dévil como secuencia
título
= "La consulta DAO "
Set db = CurrentDb ()
qry = "Los empleados Actualización Configurar empleados . [ móvil] = '210 -999-999 "
qry = qry &" WHERE ( ( ( Employees. [ Apellido ] ) = ' Cencini ')) ; "
DoCmd.SetWarnings
False < p> DoCmd.RunSQL ( qry )
título Debug.Print & " : SQL Update paramenter consulta: " & _
vbNewLine & "" & qry
qry = " seleccionar a los empleados . [ Apellido ] , los empleados . [ móvil] "
qry = qry y " FROM Empleados "
qry = qry &" WHERE ( ( ( Employees. [ Apellido ] ) = ' Cencini ')) ; "
título Debug.Print &" : consulta SQL : "& _
vbNewLine &" "& qry
'Ejecutar el qry y crear un registro conjunto
set rst = db.OpenRecordset ( qry )
título Debug.Print & " : Recuperar información de esquema para el resultado conjunto dado : "
para i = 0 To rst.Fields.Count - 1
Debug.Print "