|
Savoir comment préremplir un formulaire lors de la saisie des données sur un autre dans Microsoft Office Access ne peut gagner du temps lorsque vous avez besoin de plusieurs formes avec les mêmes données saisies. Access est un système de gestion de base de données relationnelle proposé dans la suite Microsoft Office . Visual Basic pour Applications ( VBA ) est un langage de programmation utilisé dans Access pour automatiser les processus manuels . Un formulaire est une interface utilisateur graphique (GUI) utilisée dans Access pour fournir un moyen convivial pour entrer des données dans la base de données . Instructions
1 Ouvrez Microsoft Office Access 2007, cliquez sur la " base de données vide ", puis sélectionner "Créer". Dans l'onglet "Créer" , sélectionnez " Form Design ». Cliquez sur le " Zone de texte " contrôle depuis le volet " Commandes " puis cliquez sur la forme et créer un contrôle de zone de texte. Cliquez sur le nouveau contrôle de zone de texte et appuyez sur "Ctrl" et "C" pour copier simultanément le contrôle.
2 Appuyez sur "Ctrl " et "V" deux fois pour coller deux nouveaux contrôles de zone de texte sur la forme . Appuyez sur "Ctrl" et "S" puis cliquez sur "OK" pour enregistrer le formulaire . Créer un nouveau formulaire et de créer trois nouveaux contrôles de texte utilisant le même procédé . Appuyez sur "Ctrl " et " S" puis cliquez sur "OK" pour enregistrer le formulaire .
3 clic droit sur le Form1 et sélectionnez "Propriétés". Sous la rubrique « Type de sélection : », sélectionnez «Formulaire ». Sélectionnez " [Procédure événementielle ] " à côté de " Sur chargement " et cliquez sur le bouton de sélection (...) pour ouvrir la fenêtre de Microsoft Visual Basic .
4 Appuyez sur "Ctrl " et "A" puis appuyez "Supprimer " pour supprimer le code existant
Copier et coller le code ci-dessous dans votre module : .
Private Sub Form_Load ( )
DoCmd.OpenForm " Form2 " , acNormal < br > Text0_Change Private Sub ()
Forms! Form2 ! Text0.SetFocus
Forms! Form2 ! Text0.Text = Me.Text0.Text Photos End Sub
Text1_Change Private Sub ()
Forms! Form2 ! Text1.SetFocus
Forms! Form2 ! Text1.Text = Me.Text1 . texte Clip End Sub
Text2_Change Private Sub ()
Forms! Form2 ! Text2.SetFocus
Forms! Form2 ! Text2.Text = Me.Text2 . texte Clip End Sub
5 revenir à la fenêtre d'accès Microsoft et clic-droit " Form1 " et sélectionnez " Formulaire. "
|
