Saber prellenado un formulario al introducir los datos de otro en Microsoft Office Access puede ahorrar tiempo cuando se necesita múltiples formas , con los mismos datos introducidos . El acceso es un sistema de gestión de base de datos relacional que ofrece en la suite de Microsoft Office. Visual Basic para Aplicaciones ( VBA ) es un lenguaje de programación utilizado en Access para automatizar los procesos manuales . Un formulario es una interfaz gráfica de usuario (GUI ) que se utiliza en Access para proporcionar una manera fácil de usar para introducir datos en la base de datos . Instrucciones
1
Abra Microsoft Office Access 2007 , haga clic en "Base de datos en blanco" a continuación, seleccione " Crear". En la pestaña "Crear" , seleccione " Diseño de formularios ". Haga clic en el control " Cuadro de texto " del panel " Controles " y haga clic en el formulario y crear un cuadro de texto . Haga clic en el nuevo control de cuadro de texto y pulse la tecla "Ctrl " y "C " al mismo tiempo para copiar el control.
2
Presione " Ctrl " y "V " dos veces para pegar dos nuevos controles de cuadro de texto en la formulario. Pulse la tecla "Ctrl " y " S " y luego haga clic en " OK" para guardar el formulario . Crear un nuevo formulario y crear tres nuevos controles de texto utilizando el mismo proceso. Pulse la tecla " Ctrl" y " S " y luego haga clic en " OK" para guardar el formulario .
3 Haga clic en el Form1 y seleccione " Propiedades". En " Tipo de selección : ", seleccione "Formato ". Seleccione " [ Procedimiento de evento ]" junto a " On Load " y haga clic en los puntos suspensivos ( ... ) para abrir la ventana de Microsoft Visual Basic .
4
Presione " Ctrl" y " A" a continuación, pulse "Eliminar " para eliminar el código existente
Copia y pega el código de abajo en su módulo: .
Private Sub Form_Load ( )
DoCmd.OpenForm " Form2 " , acNormal < br >
End Sub
Text0_Change Sub Private ()
Forms ! Form2 ! Text0.SetFocus
Forms ! Form2 ! Text0.Text = Me.Text0.Text
End Sub
Text1_Change Sub Private ()
Forms ! Form2 ! Text1.SetFocus
Forms ! Form2 ! Text1.Text = Me.Text1 . Texto Fotos
End Sub
Text2_Change Sub Private ()
Forms ! Form2 ! Text2.SetFocus
Forms ! Form2 ! Text2.Text = Me.Text2 . Texto Fotos
End Sub
5
volver a la ventana de Microsoft Access y Haga clic en " Form1 " y seleccione " Vista formulario . "