Member
Beiträge: 19
Ort: Niederbayern | Guten Tag zusammen,
habe eine kleine Erinnerung erstellt bei form_load dabei wird nur der erste Datensatz ausgegeben, sollte aber diese Bedingung erfüllt sein, sollte es aber auch beim 2 Datensatz ausgegeben werden ob nun neues Msgbox oder nicht ist egal. Die Frage ist dabei auch ob man nicht dass heutige Datum und 30 Tage vor Termin.
Hier mal der Code:
Option Compare Database
Option Explicit
Private Sub Form_Load()
Dim Zahl1 As Date
Dim Zahl2 As Date
Dim test As String
Zahl1 = Me.Termin
Zahl2 = Date
ausgabe = Me.test
If Zahl1 >= Zahl2 Then
MsgBox ("Der Termin " & ausgabe & " ist am " & Zahl1), , "Erinnerung"
End If
End Sub
Edited by hume 15.04.14 16:29
|
