+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغات البرمجة الاخرى (http://vb4arb.com/vb/forumdisplay.php?fid=4)
+--- قسم : قسم لغة vb6.0 (http://vb4arb.com/vb/forumdisplay.php?fid=18)
+--- الموضوع : [vb6.0] طلب كود بالفيجوال بايسيك 6 (/showthread.php?tid=11979)
طلب كود بالفيجوال بايسيك 6 - chitangen6 - 06-04-15
السلام عليكم و رحمة الله
أرجوا من اخواني الكرام مساعدتي في الحصول على كود
لحساب تاريخ الاحالة على التقاعد باظافة عدد مثل 52 لتاريخ الازدياد
المعطيات :
قاعدة بيانات 97
عمود dtnaiss (تاريخ الازدياد)
عمود dtlimit (تاريخ الاحالة على التقاعد)
RE: طلب كود بالفيجوال بايسيك 6 - Ahmed_Mansoor - 08-04-15
اهلا ،
استخدم دالة DateAdd لحساب تاريخ التقاعد ، حيث تضيف عدد سنوات الخدمة على تاريخ بداية الخدمة ، تاريخ الخدمة مثلا 01/01/2015 عدد سنوات الخدمة ٢٥ :
كود :
Date1 = DateAdd("yyyy",25,"01/01/2015")