“Conocimiento Programación>Visual Basics Programación

Cómo ejecutar parámetros de una consulta DAO en Access VBA

2015/9/2
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 "

Visual Basics Programación
Microsoft Visual Basic para Aplicaciones Tutorial
Cómo crear un marco independiente de resolución en VB.NET
Cómo controlar un navegador desde Vb.net
Visual Basic 3D Game Tutorial
Cómo agregar un evento comentario en Visual Basic
Visual Basic Math Funciones Tutorial
Cómo abrir un documento de Word con imágenes utilizando VB Net
Cómo pasar datos de un formulario en un acceso de consulta
Conocimiento de la computadora © http://www.ordenador.online