Wie Sie eine Schaltfläche in Access ein Datum in eine Tabelle eingeben

Wissen, wie man eine Schaltfläche in einem Formular verwenden, um Befehle auszuführen, kann eine Anwendung dynamischer gestaltet. Microsoft Office Access ist ein relationales Datenbank-Managementsystem für kleinere Datenbanken verwendet. Visual Basic für Applikationen (VBA) ist eine Computer-Programmiersprache, die zum Automatisieren von Routineaufgaben, die sonst manuell durchgeführt. VBA Access einsetzbar in Graphical User Interfaces (GUI) bieten einen einfacheren Weg zur Eingabe von Daten in die Datenbank zu erstellen.

Anweisungen

1 Starten Sie Microsoft Office Access 2007 zu, wählen Sie "Leere Datenbank" und dann auf "Erstellen".

2 Wählen Sie die Registerkarte "Erstellen" und "Formularentwurf" auf ein neues Formular erstellen. "Klicken Sie" auf die "Controls", dann klicken Sie auf Form und ziehen Sie, um eine neue Schaltfläche zu erstellen.

3 Maustaste "Command0" und wählen Sie "Eigenschaften". Klicken Sie auf die Registerkarte "Ereignis" und aktivieren Sie "[Ereignisprozedur]" neben "Zu klicken." Klicken Sie auf das Auslassungszeichen (…) um das Fenster "Microsoft Visual Basic" öffnen. Drücken Sie "Strg" und "A" und dann "Löschen" entfernen Sie vorhandenen Code.

4 Kopieren Sie und fügen Sie den folgenden Code in das Modul. Dieser Code wird eine neue Tabelle mit einem Feld-Datentyp "Date" erstellen und heutiges Datum hinzufügen.

Option Compare Database

Private Sub Command0_Click()

Dim TodayDate As String

TodayDate = jetzt

SQLstr = "CREATE TABLE DateTable (TodaysDate Datum);"

DoCmd.RunSQL (SQLstr)

SQLstr = "INSERT INTO DateTable ([TodaysDate])"

SQLstr = SQLstr & "Werte ('" & (TodayDate) & "');"

DoCmd.SetWarnings False

DoCmd.RunSQL (SQLstr)

EndSub

5 Schließen Sie das Fenster "Microsoft Visual Basic" und mit der rechten Maustaste "Form1". Wählen Sie "Ansicht bilden." Klicken Sie auf "Command0", um eigenen Code auszuführen.