[alipro]

السلام عليكم

اريد كود يحدد لي بداية الشهر الحالي  ونهايتة
وبداية العام الحالي ونهايته 




vb.net 

وشكرالكم

[محمد كريّم]

السنة

كود :

Dim year As New DateTime(DateTime.Now.Year, 1, 1)

المصدر https://stackoverflow.com/a/640023/3814729

---

الشهر

كود :

Dim dateFrom = New DateTime(DateTime.Now.Year, DateTime.Now.Month, 1)
Dim dateTo = datefrom.AddMonths(1).AddDays(-1)

المصدر https://stackoverflow.com/a/37144310/3814729

[elgokr]

كود بداية الاسبوع ونهاية الاسبوع

كود :

       Dim dayOfWeek = CInt(DateTime.Today.DayOfWeek + 1)  '+1 to statr week at saturday
       Dim startOfWeek = DateTime.Today.AddDays(-1 * dayOfWeek)
       Dim endOfWeek = DateTime.Today.AddDays(7 - dayOfWeek).AddSeconds(-1)
       DateTimePicker1.Value = startOfWeek
       DateTimePicker2.Value = endOfWeek

خاص الاخ mrnooo2000

بالرد فى الموضوع السابق ..

http://vb4arb.com/vb/showthread.php?tid=...#pid121249

---

بخصوص اليوم و الامس

اليوم:

كود :

DateTimePicker1.Value = DateTime.Today()

الامس:

كود :

DateTimePicker1.Value = DateTime.Today.AddDays(-1)

---

بخصوص الشهر الحالى و الشهر الماضى

الشهر الحالى:

كود :

DateTimePicker1.Value = CDate(Now.ToString("yyyy/MM"))

الشهر الماضي:

كود :

DateTimePicker1.Value = CDate(Now.AddMonths(-1).ToString("yyyy/MM"))

---

بخصوص العام الحالى و العام الماضي

العام العالى:

كود :

DateTimePicker1.Value = CDate(Now.ToString("yyyy/1/1"))

العام الماضي:

كود :

DateTimePicker1.Value = CDate(Now.AddYears(-1).ToString("yyyy/1/1"))

---

اعتقد الان لديك جميع ما فى القائمة

بدلاً من اعادة فتح عدة مواضيع لنفس الكود

تحياتى لك

وتمنياتى لك التوفيق

[alipro]

مشكور جدا بارك الله فيك

[elgokr]

الشكر لله

تحياتى لك

وتمنياتى لك التوفيق