Tecnología

Inicio

Cómo acceder a la consulta de actualización a través de VB

Cómo acceder a la consulta de actualización a través de VB


Microsoft Access tiene un lenguaje de programación Visual Basic para Aplicaciones (VBA), que se puede utilizar para llevar a cabo las operaciones de bases de datos como las consultas de selección y actualización. VBA programas que realizan estas operaciones hacen con objetos virtuales, incluidas las que representan la base de datos actual, los conjuntos de registros, definiciones de consulta de bases de datos y otros elementos. Hacer actualizaciones o cualquier tipo de operación de base de datos en VBA implica entender cómo manejar estos objetos, que se recogen en una jerarquía de árbol llamado el "modelo de objetos." Realización de consultas de actualización con Visual Basic permite a los desarrolladores cambiar el contenido de la base de datos de forma rápida y con menos posibilidades de error del usuario.

Instrucciones

1 El acceso abierto y cree la siguiente tabla de ejemplo, que su programa de Visual Basic va a hacer una operación de actualización en: Crea un campo "Campo1" en una tabla llamada "Tabla 1", a continuación, escriba un registro en ese campo: ". Xyz"

2 Pulse la tecla "Alt-F11" para entrar en el Visual Basic entorno de desarrollo integrado (IDE), haga clic en el comando "Módulo" del menú "Insertar". Esta acción creará un nuevo espacio para que introduzca un programa de VB.

3 Pegue o escriba el siguiente programa en el módulo de código:

Public Sub doUpdate ()

Const tabName = "Tabla 1"

DBS dévil como DAO.Database

Dim primera medida DAO.Recordset

Set dbs = CurrentDb

Establecer primera = dbs.OpenRecordset (tabName)

rst.MoveFirst

Hacer hasta rst.EOF

If rst!Field1 = "zxy" Then

rst.Edit

primero! Campo1 = "abc"

rst.Update

rst.Close

dbs.Close

Exit Sub

Terminara si

rst.MoveNext

Lazo

End Sub

La declaración "OpenRecordset" abre la tabla "Tabla 1" para la modificación, y establece una referencia a esa mesa con la variable "primera". El bloque de instrucciones que comienza con "Do Until" y termina con "Loop" se mueve a través de los datos de "primeros", en busca de un registro cuyo valor es "xyz". El programa utiliza el "Editar" y los métodos de "actualización" de "primera" para cambiar el valor de este registro, una vez que se encuentra el registro de "xyz".

4 Ejecutar el programa haciendo clic en cualquiera de sus estados, a continuación, pulsando la tecla "F5". Pulse la tecla "Alt-F8" para volver a Access. Verá el valor "xyz" que ha introducido anteriormente ahora ha cambiado a "abc".

5 Pulse la tecla "Alt-F8" para volver al IDE. Escriba las siguientes nuevas declaraciones después de la última "DIM" instrucción en el listado del programa:

f = InputBox ( "¿Qué valor le gustaría a buscar?")

v = InputBox ( "¿Qué valor le gustaría cambiar a?")

Estas instrucciones de consulta al usuario por un valor que debe buscar, y un nuevo valor para cambiar a.

6 El tipo sobre la afirmación "Si primero campo1 =!" ZXY "Entonces" con esta nueva declaración:

Si primero! Campo1 = f Entonces

Esta declaración y el que está en el siguiente paso será utilizar el nuevo variables "v" "f" y para encontrar y actualizar el registro correcto en la tabla.

7 Escriba sobre el "primer campo1 =!" Declaración abc "" con esta declaración:

primero! Campo1 = v

8 Ejecutar el programa como lo hizo en el paso 4. Responder a los mensajes cuando el entonces aparecerá, si escribe "abc" para el valor de buscar, y "xyz" para el valor de cambiar. El programa revisado cambiará el "abc" a "xyz".