Microsoft Office Access 2007 - Das Handbuch

Kapitel 24

Formulare für Fortgeschrittene

546

Standardwerte

Für die meisten Steuerelemente können Sie Standardwerte vereinbaren, also Werte, die bei einer

Neueingabe eines Datensatzes in die entsprechenden Steuerelemente vorab eingetragen werden. Set-

zen Sie dazu in den Eigenschaften eines Steuerelements entsprechend die Eigenschaft Standardwert.

Der Standardwert kann auch mithilfe einer Formel bestimmt werden. Stellen Sie sich vor, bei der

Neueingabe von Kinos soll der Standardwert für den Turnaround, also die Anzahl der Minuten, die

zwischen zwei Vorstellungen benötigt wird, gesetzt werden. Anstelle eines festen Wertes soll der

Turnaround aber mit dem längsten Turnaround vorbesetzt werden, der für die Kinos erfasst wurde.

Die Eigenschaft Standardwert für das Feld Tur n ar ou nd wird auf dem Formular also mit

=DomMax("Turnaround";"tblKinos")

vereinbart (siehe Abschnitt »Werte nachschlagen mit Domänen-

aggregatfunktionen« in diesem Kapitel). Jedes Mal, wenn eine neue Datensatzeingabe begonnen

wird, wird der Standardwert neu errechnet.

Werte übernehmen

Stellen Sie sich vor, Sie müssten 30 Vorstellungstermine für eine Kalenderwoche für ein Kino neu erfas-

sen. Wahrscheinlich würden Sie sich nach dem dritten oder vierten Termin ärgern, dass Sie alle Daten

immer neu eingeben müssen, obwohl sich die Termine doch nur in Tag und Uhrzeit unterscheiden.

Access kennt standardmäßig keine Funktion zur Übernahme von Werten aus der vorangegangenen

Eingabe. Aber mit einem kleinen Programm können Sie Ihr Formular entsprechend ergänzen.

Die Lösung basiert darauf, dass nach dem Abspeichern eines neuen Datensatzes für von Ihnen

bestimmte Steuerelemente der Standardwert (siehe Abschnitt »Standardwerte«) mit dem aktuellen

Wert des Steuerelements umdefiniert wird. Beginnen Sie jetzt einen neuen Datensatz, werden von

Access automatisch die Steuerelemente mit ihren Standardwerten vorbesetzt.

Für das Ereignis Nach Aktualisierung des Formulars muss ein kleines Visual Basic-Programm in der

Form

erfasst werden.

Für jedes Steuerelement, für das der Wert bei der Eingabe übernommen werden soll, geben Sie eine

entsprechende Zeile ein, wie hier für txtFilmtitel und txtLänge zu sehen.

Beachten Sie, dass alle Standardwerte (

DefaultValue

) als Zeichenketten, einge-

schlossen in Anführungszeichen, übergeben werden müssen. Hierbei können die oben im

Abschnitt »Variablen in Zeichenketten« geschilderten Probleme auftreten.

Private Sub Form_Afterupdate()

Steuerelement

.DefaultValue = "'" &

Steuerelement

.Value & "'"

End Sub

Private Sub Form_Afterupdate()

txtFilmtitel.DefaultValue = "'" & txtFilmtitel.Value & "'"

txtLänge.DefaultValue = "'" & txtLänge.Value & "'"

End Sub

HINWEIS