VBA Datum berrechnen lassen?

Hy Leute,
ich habe ein kleines Problem, wie kann in ich VBA Word auf einem frm vom Systemdatum (aktuellem Datum) 3 Monate dazu rechnen lassen und das Ergebnis in einem lbl Feld ausgeben lassen. Im Archiv habe ich leider nichts gefunden. Für euere Hilfen Danke ich euch vorab.

Werner

Dim frm As UserForm1
'
Set frm = New UserForm1
Call Load(frm)
Call frm.Show(vbModeless)
frm.Label1.Caption = DateAdd("m", 3, Now)

greets from michL (vienna)