Tecnología

Inicio

Cómo abrir un formulario en Access utilizando Visual Basic

Cómo abrir un formulario en Access utilizando Visual Basic


Microsoft Office Access es un sistema de gestión de base de datos relacional utilizado para bases de datos más pequeñas y locales. En Access puede crear interfaces gráficas de usuario o GUI, para la interacción del usuario. Visual Basic para Aplicaciones, o VBA, es un lenguaje de programación desarrollado por Microsoft. Se utiliza más comúnmente para automatizar tareas rutinarias utilizando las aplicaciones de Microsoft Office. En unos pocos pasos se puede escribir código VBA para abrir un formulario en Access.

Instrucciones

1 Iniciar Microsoft Office Access y seleccione "Base de datos en blanco" y haga clic en "Crear".

Seleccione "Crear", haga clic en "Diseño de formulario" y haga clic en "Cuadro de lista" en el menú "Controles". Haga clic en el formulario y haga clic izquierdo para crear un cuadro de lista.

2 Haga clic en el cuadro de lista y seleccionar "Propiedades". Seleccione la pestaña "Datos" y tipo "SELECT * FROM dataForForm dataForForm;". junto a "Origen de la fila."

Guarde el formulario como "myForm."

Seleccionar "Herramientas de base de datos" y haga clic en "Visual Basic". Seleccione el menú "Insertar" y haga clic en "módulos".

3 Escribe lo siguiente para crear la subrutina "openMyForm":

Private Sub openMyForm

Presione ENTRAR."

4 Escribe lo siguiente para declarar una variable de cadena:

Dim como secuencia strSQL

5 Escribe lo siguiente para crear una nueva tabla y añadir dos filas de datos:

sqlString = "CREATE dataForForm TABLA (TEXTO DE LA CIUDAD, ESTADO DE TEXTO)"

DoCmd.SetWarnings False

DoCmd.RunSQL (sqlString)

strSQL = "insertar en los valores dataForForm ( 'Fort Worth', 'Texas)"

DoCmd.RunSQL (strSQL)

strSQL = "insertar en los valores dataForForm ( 'DALLAS', 'Texas)"

DoCmd.RunSQL (strSQL)

6 Escriba lo siguiente para abrir los nuevos datos del formulario y mostrar tabla en el cuadro de lista:

DoCmd.OpenForm "MyForm", acPreview,,,, acWindowNormal

Pulse la tecla "F5" para ejecutar la subrutina.