پیغام از طرف نرم افزار 2 روز قبل

[silverado]

سلام دوستان . چطور میشه این امکان تو برنامه باشه که به طور خودکار بعد از اجرای برنامه یه پیغام داده بشه که مثلاً 2 روز دیگه تاریخ چک شماست .
تو برنامه این طوریه که تاریخ چک ثبت میشه حالا می خوام که نرم افزار 2 روز قبل پیغام بده مثلاً اگه تاریخ چک
22/01/1390 هست برنامه در تاریخ 18/01/1390 پیغام بده که 2 روز دیگه تاریخ چک است

[M.T.P]

اگه سورس تبدیل تاریخ میلادی به شمسی رو دارید با دستور زیر میتونید 2 روز به تاریخ جاری سیستم اضافه کنید و توی یه متغیر ذخیره کنید:
نکته: این تابع تاریخ سیستم رو تغییر نخواهد داد.

Dim NewDate As String
NewDate = DateAdd("d", 2, Format(Date$, "YYYY/MM/DD"))
MsgBox NewDate
بعد تاریخ جدید رو که همون NewDate هست رو به شمسی تبدیل و با تاریخ چک مقایسه کنید.