تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
كيف استثني يوم الجمعة في الكود التالي
#1
السلام عليكم ورحمة الله وبركاته

لدي كود يأخذ (التاريخ الأول) 

وأضيف عليه ( عدد الأيام) 

والنتيجة تاريخ انتهاء الأيام


السؤال:

كيف أستثني يوم الجمعة من التوزيع في أيام الأسبوع ؟

كود :
Dim UmAlQura As New Globalization.UmAlQuraCalendar
       Dim d As Date = UmAlQura.AddDays(dt3.Value, day_c.Text - 1)

       DateTimePicker2.Value = d
الرد }}
تم الشكر بواسطة:
#2
dim i as integer=0
DateTimePicker2.Value=dt3.Value
while i<val(day_c.Text)
DateTimePicker2.Value=DateTimePicker2.Value.adddays(1)
if DateTimePicker2.Value.dayofweek<>dayofweek.friday then i=i+1
end while
الرد }}
تم الشكر بواسطة: abomo3ath


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  [سؤال] لسلام عليكم ورحمه الله وبركاته ازاي افعل خاصيه امكانيه التعديل علي الكود أثناء تشغيل حسن الجلب 1 161 06-08-22, 07:39 PM
آخر رد: asmarsou
  الكود لا يستدعى الارقام الا الاقل من 10 حماده ممدوح البحيرى 4 167 06-08-22, 08:12 AM
آخر رد: حماده ممدوح البحيرى
Lightbulb [VB.NET] ممكن عمل هذا الكود رمضان محمد 17 794 13-07-22, 10:32 PM
آخر رد: سعود
  مشكلة في تنفبذ الكود mohamedassim 8 392 07-07-22, 12:26 AM
آخر رد: أبو خالد الشكري
  خطأ في تنفيذ الكود mohamedassim 5 288 01-07-22, 08:57 PM
آخر رد: سعود
  ممكن طريقة لتحويل هذا الكود ابو روضة 9 627 10-06-22, 02:21 AM
آخر رد: ابو روضة
  [VB.NET] محتاج تعديل على الكود هدا AMAZ1972AMAZ 3 424 06-06-22, 06:31 PM
آخر رد: AMAZ1972AMAZ
  التحكم فى لون خلفية الازرار من خلال الكود nabil.1710 6 781 03-05-22, 09:53 PM
آخر رد: nabil.1710
  السلام عليكم 2 مشكله حقل data type نوع text لو الكود اكثر من 10احرف لا يضيف ahmedhhh2 4 721 17-03-22, 12:52 AM
آخر رد: ahmedhhh2
  [كود] مساعدة في حل مشكل هذا الكود Necro PC 3 703 01-02-22, 01:12 PM
آخر رد: Necro PC

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم