Formular bei Schliessen auf Fehler checken

Computer: Software & Programmierung Microsoft Access
#1

Hallo,

ich programmiere in Access 97 mit VBA und möchte folgendes erreichen:

Wenn ich ein Formular schliesse (Systemfeld, Button, usw.) soll eine Überprüfung der Daten stattfinden (das klappt auch). Falls bei dieser Überprüfung ein Fehler festgestellt wird, soll eine Msgbox angezeigt werden, in der der Fehler anzeigt wird (klappt auch).

Und jetzt kommt mein Problem:

Falls ein Fehler vorhanden ist, soll nach dem Schliessen der Msgbox das aktuelle Formular für Fehlerkorrekturen offen bleiben, meine bisherigen Versuche mit Ereignisprozeduren beim Entladen und Schliessen führen immer zu einem Schliessen des Formulars.

Frage also: Wie kann ich das Schliessen des aktuellen Formulares unterbinden, wenn ein Fehler bei der Überprüfung festgestellt wurde.

Danke für Eure Antworten

Peter

#2

Hallo,

bei welchem Ereignis prüfst Du auf Fehler?

Falls das Form gebunden ist, wäre „Vor Aktualisierung“ des Forms der richtige Ort.

Wenn es denn unbedingt beim Schließen sein soll:

Sub Form_Unload(Cancel as Integer)
If > Then
Cancel=true
End If
End Sub

Hier ( wie auch bei Form_BeforeUpdate) gibt es das Cancel-Argument, mit dessen Hilfe man das Ereignis abbrechen kann.

Viele Grüße vom Bodensee
Franz , DF6GL

PS: Feedback erwünscht!

#3

Hallo Franz,

vielen Dank für Deine schnelle Antwort. Cancel = True war bei Unload mein Fehler, das funktioniert auch.

Habe das mittlerweile aber anders gelöst da dann andere Probleme aufgetaucht sind. Schliessen im Systemmenü deaktiviert und dann einen Schliessen Button im Formular ist die bessere Variante.

Danke Peter