تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
الفرق بين تاريخين بدقه وبدون مشاكل (عدد الايام ممتاز)
#1
بعد فترة كبيرة وتجريب اكثر من طريقة حبيت اقدم لكم هذه الطريقة فعلا ممتازة جدا
كود :
     Dim startTime As DateTime = #9/15/1985#

       Dim endTime As DateTime = Date.Now

       Dim span As TimeSpan = endTime.Subtract(startTime)
       Dim txt As String = ("Time Difference (ثواني): " & span.Seconds)
       txt &= vbNewLine & ("Time Difference (الدقائق): " & span.Minutes)
       txt &= vbNewLine & ("Time Difference (ساعات): " & span.Hours)
       txt &= vbNewLine & ("Time Difference (أيام): " & span.Days)
       MsgBox(txt)
الرد
تم الشكر بواسطة: elgokr
#2
مرحباً اخى ali.alfoly

حتى تعم الفائدة على الجميع
يمكنك الاطلاع ايضاً على الرابط التالى

ستجد به مثال ( سورس + برنامج الاختبار )
موضح فى سهولة والتعامل مع فارق بين تاريخين اذا كان يتم تحديد يدوى للبداية والنهاية
او يتم تحديد النهاية تلقائي وهو التاريخ الحالى

تحياتى لك
وتمنياتى لك التوفيق
{ وَقُل رَّبِّ زِدْنِي عِلْمًا }
[ كن على يقين من اعمالنا نخطئ ومن اخطائنا نتعلم ولذلك لا شي مستحيل ]

ساهم دائماً فى    لكل من يقوم بالمساهمة
فى حل المشكلة او الاستفسار لديك فالجميع هنا يعمل 
على مساعدة الاخرين لوجه الله وان تحتسب له اجر عند الله


 شرح كيفية عمل قاعدة بيانات تعمل على اكثر من جهاز على الشبكة الداخلية
الرد
تم الشكر بواسطة: ali.alfoly



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


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