Verwenden Sie einen Kalender-Steuerelement in Visual Basic für Applikationen (VBA) angezeigt werden , oder geben Sie ein bestimmtes Datum . VBA ist eine Programmiersprache in allen Microsoft Office-Anwendungen und es ist häufig verwendet, um kleine Programme innerhalb der Anwendungen zu erstellen. Microsoft Access bietet eine Kalender-Steuerelement , dass man auf einem Formular, einem Bericht oder einer Datenzugriffsseite platzieren. Sie können festlegen oder bekommen den Wert des Kalender-Steuerelement mithilfe der "Value" -Eigenschaft. Things You
Microsoft Access
brauchen anzeigen Weitere Anweisungen
1
Starten Sie Microsoft Access auf den "Create "-Registerkarte, dann klicken Sie auf " Formular-Entwurf ", um eine neue einfügen Form . Klicken Sie auf " Insert ActiveX Control" -Symbol auf dem "Controls" Feld, um die "Insert ActiveX Control" Dialog zu starten.
2
Doppelklicken Sie auf " Calendar Control ", und klicken Sie auf "OK" zum Einfügen eines neuen Kalender-Steuerelement auf das Formular. Klicken Sie auf " Text Box " auf der Kontrollen aus, und klicken Sie auf die Form , um eine neue "Text Box" -Steuerelement hinzuzufügen . Fügen Sie einen " Command Button " mit der gleichen Technik .
3 rechten Maustaste auf das Kalender-Steuerelement , klicken Sie auf "Build -Ereignis ", dann klicken Sie auf " Code-Generator . " Klicken Sie auf " OK", um den VBA-Editor zu starten Fenster
4
Fügen Sie den folgenden Code , um eine Nachricht anzuzeigen , wenn Sie ein Datum auf dem Kalender -Steuerelement klicken : .
Private Sub Calendar0_Click ( )
MsgBox ( Calendar0.Value )
End Sub
5
Schalter zurück zu Microsoft Access mit der rechten Maustaste klicken Sie auf die Schaltfläche und dann auf "Eigenschaften " klicken Sie auf die Registerkarte "Ereignis" und wählen Sie " [Event Procedure] " neben "On Click. " Klicken Sie auf den Schalter , um ein Click-Ereignis für diese Schaltfläche zu erstellen
6
Fügen Sie den folgenden Code , um ein Datum auf dem Kalender-Steuerelement mit dem Wert in der Eingabe gesetzt . " Text Box: "
< p > Me.Text1.SetFocus
Me.Calendar0.Value = Me.Text1.Text
7
Schalter zurück zu Microsoft Access , und klicken Sie auf "View" -Symbol, um das Programm zu starten . Klicken Sie auf ein Datum auf dem Kalender-Steuerelement . Geben Sie ein Datum in der "Text Box "-Steuerung, und klicken Sie auf " Command0 . "