Zähler für die Anzeige von Access-Daten

Ich bin Access-Anwender und möchte in meiner Datenbank einen Zähler einrichten, der mir sagt, wie oft ein Datensatz angezeigt wurde. Zu diesem Zweck möchte ich eine Variable in meine Formulare integrieren, die beim Anzeigen eines Datensatzes den entsprechenden Feldwert um 1 erhöht. Können Sie mir sagen, wie ich das programmieren kann?

Für diesen Zähler brauchen Sie zunächst ein Feld vom Typ Zahl in der entsprechenden Tabelle. Um dieses Feld beim Blättern im Formular automatisch zu erhöhen, müssen Sie ein Ereignis programmieren, das Access bei der Anzeige des nächsten Datensatzes aufruft.
Legen Sie also in Ihrer Tabelle zunächst ein Feld mit dem Namen AnzeigeZahl an, das den Typ Zahl und das Format Long Integer verwendet. Anschließend fügen Sie das Feld in Ihr Formular ein. Dazu rufen Sie Ansicht – Feldliste auf und ziehen das neue Feld an die gewünschte Position im Formular.
Jetzt brauchen Sie nur noch den Zähler zu programmieren. Ein Ereignis, das Access vor der Darstellung eines neuen Datensatzes aufruft, ist das Formularereignis Beim Anzeigen. Um den Zähler dort zu programmieren, gehen Sie so vor: Rufen Sie im Formulardesigner den Befehl Bearbeiten – Formular auswählen auf und öffnen das Eigenschaften-Fenster mit dem Befehl Ansicht – Eigenschaften. Aktivieren Sie dort das Register Ereignis, klicken Sie auf das Ereignis Beim Anzeigen und dann auf die dahinterliegende Builder-Schaltfläche. Anschließend programmieren Sie die Ereignisprozedur folgendermaßen:

Private Sub Form_Current ()¶
If Not IsNull  (Me![AnzeigeZahl]) Then¶
Me![AnzeigeZahl] = Me![AnzeigeZahl] + 1¶
Else¶
Me![AnzeigeZahl] = 1¶
End If¶
End Sub¶
Diese Prozedur prüft zunächst, ob der Zähler einen Nullwert enthält, und fügt gegebenenfalls eine 1 ein. Andernfalls wird der Zähler um den Wert 1 erhöht. Da Access das Ereignis Beim Anzeigen für jeden Datensatz ausführt, den Sie im Formular darstellen, gibt der Zähler zuverlässig Auskunft darüber, wie oft der Datensatz gelesen wurde.