Wissen, wie man ein Formular PREFILL während der Eingabe von Daten auf einem anderen in Microsoft Office Access können Sie Zeit sparen , wenn Sie mehrere Formulare mit den gleichen Daten eingegeben müssen . Access ist ein relationales Datenbank- Management-System in der Microsoft Office-Suite angeboten . Visual Basic für Applikationen ( VBA) ist eine Programmiersprache, in Access auf manuelle Prozesse zu automatisieren verwendet . Ein Formular ist ein Graphical User Interface ( GUI) in Access verwendet, um eine benutzerfreundliche Art und Weise bereitzustellen, um Daten in die Datenbank eingeben . Anleitung
1
Öffnen Sie Microsoft Office Access 2007 , klicken Sie auf " Leere Datenbank " und wählen Sie dann " Erstellen". Von der " Erstellen ", wählen Sie " Form Design . " Klicken Sie auf die "Text Box" -Steuerelement aus der "Controls" Scheibe dann auf dem Formular klicken und erstellen Sie ein Textfeld-Steuerelement . Klicken Sie auf das neue Textfeld-Steuerelement , und drücken Sie "Strg" und "C" gleichzeitig, um die Kontrolle.
2
Drücken Sie "Strg " und " V " zwei mal zwei neue Textfeld-Steuerelemente auf die Paste kopieren Form . Drücken Sie "Strg" und "S ", dann klicken Sie auf " OK", um das Formular zu speichern . Ein neues Formular erstellen , und erstellen Sie drei neue Text Kontrollen nach dem gleichen Verfahren . Drücken Sie "Strg " und " S ", dann klicken Sie auf " OK", um das Formular zu speichern .
3
rechten Maustaste auf das Form1 , und wählen Sie "Eigenschaften". Unter " Selection Art : " die Option " Formular ". Wählen Sie " [Event Procedure] " neben " On Load " und klicken Sie auf den Schalter (... ), um den Microsoft Visual Basic -Fenster zu öffnen.
4
Drücken Sie "Strg " und " A" drücken " löschen", um bestehenden Code zu entfernen
Kopieren Sie den folgenden Code in das Modul : .
private Sub Form_Load ()
DoCmd.OpenForm " Form2 " , acNormal
End Sub private Sub
Text0_Change ()
Forms! Form2 ! Text0.SetFocus
Forms! Form2 ! Text0.Text = Me.Text0.Text
End Sub private Sub
Text1_Change ()
Forms! Form2 ! Text1.SetFocus
Forms! Form2 ! Text1.Text = Me.Text1 . Text
End Sub private Sub
Text2_Change ()
Forms! Form2 ! Text2.SetFocus
Forms! Form2 ! Text2.Text = Me.Text2 . Text
End Sub
5
Schalter zurück auf die Microsoft Access -Fenster mit der rechten Maustaste und klicken Sie auf " Form1 " und wählen Sie "Form View. "