ACCESS: Formular öffnen msg-box

[zaphod]

Hallo, liebe Access-Freunde!

Ich möchte, dass beim Öffnen eines Formulares Datumsfelder verglichen werden.
Feld 1 = Monat laufend
Feld 2 = Monat letzter Abschluss
Wenn der Monat laufend 1 Monat größer ist, als der Monat letzter Abschluss, dann soll eine msg-box erscheinen.

Wie ist die korrekte Syntax in vba - oder gibt´s auch eine Lösung mit einem Makro?

Danke im Voraus
Robert

[testi]

Also für VBA:
Formular in der Entwurfsansicht öffnen, dann auf Ansicht->Eigenschaften->Reiter Ereignis->"Beim Laden" auf die ... klicken
->Code Generator.
Angenommen in den Feldern 1 und 2 steht ein Datum und das Monat wird mit 31 Tagen angenommen

Private Sub Form_Load()
If Feld1.Value > Feld2.Value + 31 Then 
    MsgBox "Monatsabschluss"
End If
End Sub

Sollte so funktionieren

mfG
Testi

[zaphod]

Danke Testi!
Genau das hab ich gesucht.
Wenn ich statt der msg-Box ein Formular öffnen möchte
_____________________________
Private Sub Form_Load()
If Feld1.Value > Feld2.Value + 31 Then
open form "Mein Forular"
End If
End Sub

wäre dass so richtig?

lg
Robert

[testi]

Wird nicht funktionieren.
Machs statt open form.... lieber so:

DoCmd.OpenForm "Forular"

Nach "Forular" kanns Du dir noch aussuchen wie es geöffnet werden soll.
z.B.: im Fenstermodus

DoCmd.OpenForm "Formu2", acNormal, , , , acDialog

mfG
Testi