السلام عليكم
ازاي ازود على التاريخ شهر واحد وليكن 21/03/2006 ازود عليه شهر واحد ليصبح 21/04/2006
كيف
وشكرا
ازاي ازود شهر على التاريخ
مغلق
أخي العزيز
يمكنك استخدام ةالكود التالي:
Date = DateAdd("m", 1, #3/21/2006#)
الله في عون العبد ما كان العبد في عون أخيه
ماشي انا معاك
بس التاريخ مش هايبقى ثابت
التاريخ المستخدم هو اللي هايكتبه
هايكتبه في text
وهايتم حفظه في متغير وليكن X
والتاريخ الجديد بعد إضافة شهر طبعا هايتكتب في تيكست اخر
ماذا افعل
Mohamed Ali Salim
0.1..0...4....7.....6......2.......7........4.........8
t = DateAdd("m", 1, Text1.Text)
Text2.Text = t
ممكن تستخدم الكود التالي
dim t as date t=date +30
تم تعديل هذه المشاركة بواسطة yasserstars في 6 يونيو 2006 في 16:10
شكرا يا اخ gam_dashtii على المشاركة
ملحوظة للأخ yasserstars ان هناك شهور 30 يوم و 31 يوم و 29 يوم و 28 يوم
الكود فعلا اشتغل يا اخ gam_dashtii
Mohamed Ali Salim
0.1..0...4....7.....6......2.......7........4.........8
السلام عليكم ..
مشكور على الكود اخي الكريم
طريقة حلوة
:lol:
جميل
هذا الموضوع مغلق.