[fuad_alshujaa]

السلام عليكم
ممكن طلب مساعدة حول اظهار تاريخ اول واخر يوم في الشهر حسب رقم او اسم الشهر

[ابراهيم ايبو]

السلام عليكم اخي الكريم

اولا سؤالك غير واضح ... مالذي تريد من اول الشهر وأخر الشهر؟

هل تريد اسم اليوم؟ ام رقم اليوم في السنة؟

ان كان ذلك فإليك المثال ضع التاريخ الذي تريد وسيجلب لك اسم اليوم ورقمه في السنة

[ابراهيم ايبو]

ولمعرفة كم يوم يكون الشهر
ضع هذا الكود في زر البوتون ايضا

كود :

Dim yy As Integer = (CInt(CDate(TextBox1.Text).ToString("yyyy")))
       Dim MM As Integer = (CInt(CDate(TextBox1.Text).ToString("MM")))
       MsgBox(DateTime.DaysInMonth(yy, MM))

[fuad_alshujaa]

(18-07-19, 02:17 PM)ابراهيم ايبو كتب : ولمعرفة كم يوم يكون الشهر
ضع هذا الكود في زر البوتون ايضا

كود :

Dim yy As Integer = (CInt(CDate(TextBox1.Text).ToString("yyyy")))
       Dim MM As Integer = (CInt(CDate(TextBox1.Text).ToString("MM")))
       MsgBox(DateTime.DaysInMonth(yy, MM))

---

(18-07-19, 02:17 PM)ابراهيم ايبومشكور اخي العزيز اريد ان ادخل رقم الشهر واحصل على اسمه وتاريخ اول يوم وتاريخ اخر يوم لنفس الشهرمثال ٦ يونيو اول يوم ٠١/٠٦/٢٠١٩ واخر يوم ٣٠/٠٦/٢٠١٩ كتب : ولمعرفة كم يوم يكون الشهر
ضع هذا الكود في زر البوتون ايضا

كود :

Dim yy As Integer = (CInt(CDate(TextBox1.Text).ToString("yyyy")))
       Dim MM As Integer = (CInt(CDate(TextBox1.Text).ToString("MM")))
       MsgBox(DateTime.DaysInMonth(yy, MM))

[fuad_alshujaa]

واحصل على اسمه وتاريخ اول يوم وتاريخ اخر يوم لنفس الشهرمثال
رقم الشهر ٦
اسم الشهريونيو
تاريخ اول يوم ٠١/٠٦/٢٠١٩
تاريخ اخر يوم ٣٠/٠٦/٢٠١٩

[ابراهيم ايبو]

السلام عليكم اخي الكريم

انشئ فورم وضع مربع نص Textbox1 وزر Button

وفي حذث Click للبوتون ضغ هذا الكود

كود :

 Dim ff As Integer = Val(TextBox1.Text)
       Dim Birtday As Date = CDate(ff & "/" & TextBox1.Text)
       MsgBox(Birtday.ToString("MMMM"))
       Dim LL As String = DateTime.DaysInMonth(Now.ToString("yyyy"), ff)
       Dim frday As String = "1/" & ff & "/" & Now.ToString("yyyy")
       Dim lastday As String = LL & "/" & ff & "/" & Now.ToString("yyyy")
       MsgBox(frday)
       MsgBox(lastday)

[fuad_alshujaa]

مشكور اخي الكريم جزاك الله الف خير

[ابراهيم ايبو]

الحمد لله والشكر لله

ولك أخي الكريم