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

كود :
Public Function dowInMonth(whDayOfWeek As DayOfWeek, Optional theDate As DateTime = Nothing) As List(Of DateTime)
       'returns all days of week for a given month  
       If theDate = Nothing Then theDate = DateTime.Now
       Dim d As DateTime = New DateTime(theDate.Year, theDate.Month, 1) 'first day of month  
       'calculate the first day of week  
       d = d.AddDays(whDayOfWeek - d.DayOfWeek)
       If d.Month <> theDate.Month Then
           d = d.AddDays(7)
       End If

       'return all of the days of week  
       dowInMonth = New List(Of Date)
       Do While d.Month = theDate.Month
           dowInMonth.Add(d)
           d = d.AddDays(7)
       Loop
   End Function
وهذا مثال لتوضيح الطريقة :


الملفات المرفقة
.rar   WindowsApp1.rar (الحجم : 183.6 ك ب / التحميلات : 20)
الرد
#3
مشكور اخي ربيع
الرد
تم الشكر بواسطة: asemshahen5 , ابراهيم ايبو


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  [سؤال] استفسار بخصوص مشروع Code Builder عاصم النجار 0 41 27-05-20, 07:20 AM
آخر رد: عاصم النجار
  استفسار في httprequest farfour 0 26 23-05-20, 10:19 PM
آخر رد: farfour
  [VB.NET] استفسار بخصوص حذف سطر من RichTextBox dubai.eig 3 84 20-05-20, 05:43 PM
آخر رد: dubai.eig
  [سؤال] استرداد ملف منه 8 116 14-05-20, 10:06 PM
آخر رد: DR.YASER
  [سؤال] استفسار او نقاش بخصوص قواعد البيانات اليوم السابع 2 70 08-05-20, 11:38 PM
آخر رد: اليوم السابع
Lightbulb [VB.NET] حذف صفوف من Access Database تاريخها قبل تاريخ اليوم Doctor GME 2 235 07-05-20, 11:03 PM
آخر رد: Doctor GME
  استفسار computer 0 60 07-05-20, 02:31 AM
آخر رد: computer
  [VB.NET] استفسار كيف ارسال ascii SerialPort1 dubai.eig 2 98 27-04-20, 03:42 AM
آخر رد: dubai.eig
  استفسار eng.hamza 8 261 20-04-20, 03:15 PM
آخر رد: eng.hamza
  [VB.NET] استفسار بخصوص ال button Show Popup dubai.eig 0 82 15-04-20, 11:32 PM
آخر رد: dubai.eig

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


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