سؤال في التاريخ

أخي الفاضل بلالي

السلام عليكم ورحمة الله وبركاته

ياريت انك توضح سؤالك بالضبط ماذا تريد

لأن السؤال غير مفهوم

والسبب انك تريد اضافة 30 يوم الى تاريخ معين الى هنا تمام

طيب وبعدين ماذا تعني بكلمة " وهكذا "

بمعنى هل يوجد تاريخ في التقويم للسنة 2007 يأخذ 11/05 ومكرر بشكل مستمر انه مره واحده فقط

ياريت اذا سألت مره ثانية توضح المطلوب بالضبط حتى يستطيع بقية الأعضاء الإجابة عليك

اذا رغبت في اضافة 30 يوم الى تاريخ معين مثل التاريخ 11/05/2007 ليصبح 10/06/2007 فيكون بهذه الطريقة

في حدث عند الخروج من حقل التاريخ نضع هذا الكود

Private Sub txtDate_Exit(Cancel As Integer)
If Me.txtDate = #5/11/2007# Then
Me.txtDate = DateAdd("d", 30, #5/11/2007#)
End If
Me.txtDate.Requery
End Sub

وهذا مثال

zaDateADD30.rar