[boofa2022]

قومت بمشروع والمطلوب فيه الفرق بين تاريخين على أن يظهر الناتج بعدد الاشهر 

[تركي الحلواني]

(01-01-24, 01:15 PM)boofa2022 كتب : قومت بمشروع والمطلوب فيه الفرق بين تاريخين على أن يظهر الناتج بعدد الاشهر 

PHP كود :

       ' تاريخ البداية
        Dim startDate As DateTime = New DateTime(2023, 1, 1)

        ' تاريخ الانتهاء
        Dim endDate As DateTime = DateTime.Now

            ' حساب الفرق بين التواريخ
            Dim timeSpan As TimeSpan = endDate - startDate

            ' حساب الفرق بعدد الأشهر
            Dim monthsDifference As Integer = CInt(Math.Floor(timeSpan.Days / 30.44))

        ' عرض النتيجة
        MsgBox($"الفرق بين التاريخين بعدد الأشهر: {monthsDifference} أشهر") 


[boofa2022]

السلام عليكم لككل الشكر والتقدير أخي تركيلاهتمامك والرد السريع
جربت الكود الذي بعثته ولكن في الاحوال يعطيني 12 شهر
المطلوب مثلا الفرق بين تاريخين بعدد الاشهر

على سبيل المثال الرق بين سنة 2024-1-1 وسنة 2000-1-1 =276 شهراً

[تركي الحلواني]

(03-01-24, 10:44 AM)boofa2022 كتب : السلام عليكم لككل الشكر والتقدير أخي تركيلاهتمامك والرد السريع
جربت الكود الذي بعثته ولكن في الاحوال يعطيني 12 شهر
المطلوب مثلا الفرق بين تاريخين بعدد  الاشهر

على سبيل المثال الرق بين سنة 2024-1-1 وسنة 2000-1-1 =276 شهراً

PHP كود :

Dim startDate As DateTime = New DateTime(2000, 1, 1)

        ' تاريخ الانتهاء
        Dim endDate As DateTime = DateTime.Now

        ' حساب الفرق بين التواريخ بعدد الأيام
        Dim daysDifference As Integer = CInt((endDate - startDate).TotalDays)

        ' متوسط عدد الأيام في الشهر (تقريبي)
        Dim averageDaysInMonth As Double = 30.44

        ' حساب الفرق بين التواريخ بعدد الشهور 
        Dim monthsDifference As Double = daysDifference / averageDaysInMonth

        ' عرض النتيجة
        MsgBox("الفرق بين التاريخين بعدد الأشهر: " & Math.Floor(monthsDifference) & " أشهر ") 


[boofa2022]

بارك الله فيك
طلع معي الناتج ولكن اعتقد ان عدد الاشهر فيةازيادة اشوي
لانه لما حسبت كل سنة * 12 شهر * 23 سنة =276
لما شغلت الكود تبعك اعطاني 288 شهر
شكرا على الاهتمام