Axel Richter: Event auslösen per Sourcecode

Beitrag lesen

Hallo,

vielleicht kann mir jemand helfen.
Gibt es bei MS-Access eine Funktion, mit der ich ein Event
per Sourcecode auslösen kann (z.B. Nach Aktualisierung).
Wenn ich von Hand einen Wert ändere funktioniert es, aber
wenn ich den Wert per Programm in dieses Feld schreibe, realisiert
es diese Änderung nicht.
Wäre schön, wenn es dafür einen Weg gäbe.

Nehmen wir mal an, das passiert alles per VBA. Dann gibt es für das Steuerelement (Control) "Feld1" z.B. folgende Prozedur:

Private Sub Feld1_AfterUpdate()
  MsgBox ("AfterUpdate")
End Sub

Wenn sich nun in Feld1 per Beuntzereingabe etwas ändert, wird nach der Änderung die MsgBox erscheinen.

Änderst Du etwas per Programmcode, dann weißt Du ja, dass sich etwas geändert hat. Dann rufst Du die Prozedur einfach nach der Änderung auf. Angenommen, alles spielt sich im selben Formular ab und wird durch Klick auf eine Befehlsschaltfläche "Befehl1" ausgelöst, dann

Private Sub Befehl1_Click()
  Me.Feld1 = 6
  Feld1_AfterUpdate
End Sub

viele Grüße

Axel