14-10-17, 10:20 PM
أتمنى المساعدة منكم إخوتي والتعديل على الكود ..
لدي ديت تايم بيكر اسجل فيه بداية الإشتراك ثم اضع المدة في كنترول Updown ويظهر الناتج نهاية الإشتراك في ديت تايم بيكر2..وهذا الفانكشن يعمل جيدا ..
=======
Public Function DateGet() As String
dtpRegE.Value = dtpRegS.Value.AddDays(CType(nmDays.Value, Integer))
Return dtpRegE.Value
End Function
=========
لكن
ما اريده هو
ان لا يحتسب ايام الجمعة
بمعنى
بمجرد ما أحدد المدة بالايام وليكن 30 يوم ..
يضيف ال 30 يوم دون إحتساب يوم الجمعة
..
لدي ديت تايم بيكر اسجل فيه بداية الإشتراك ثم اضع المدة في كنترول Updown ويظهر الناتج نهاية الإشتراك في ديت تايم بيكر2..وهذا الفانكشن يعمل جيدا ..
=======
Public Function DateGet() As String
dtpRegE.Value = dtpRegS.Value.AddDays(CType(nmDays.Value, Integer))
Return dtpRegE.Value
End Function
=========
لكن
ما اريده هو
ان لا يحتسب ايام الجمعة
بمعنى
بمجرد ما أحدد المدة بالايام وليكن 30 يوم ..
يضيف ال 30 يوم دون إحتساب يوم الجمعة
..