Guten Morgen,
ich hab mal wieder ein Problem.
Ich habe zwei Textboxen, in welche ich jeweils ein Datum eingebe. Nun will ich mir die Differenz der beiden Daten ausgeben lassen, das eine Mal in Jahre (mit Kommastelle, deswegen als Double deklariert) und zum anderen in Tagen. Dabei muss aber noch beachtet werden, dass zusätzlich 9 Monate abgezogen werden müssen.
Vom Prinzip her hab ich mir folgendes gedacht, aber das funktioniert logischerweise nicht:
Dim wert As Double
wert = Year(TextBox1.Value – TextBox2.Value - Year(... Monate...))
meldung = MsgBox("Die Differenz ist " + wert + "Jahre")
wert = Day(TextBox1.Value – TextBox2.Value - Day(... 9 Monate ...))
meldung = MsgBox("Die Differenz sind " + wert + "Tage")
Kann mir da jemand helfen?
Gruss
Andreas