منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
كيف ا حسب الفرق بالساعة لأكثر من يوم؟ - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغات البرمجة الاخرى (http://vb4arb.com/vb/forumdisplay.php?fid=4)
+--- قسم : قسم لغة vb6.0 (http://vb4arb.com/vb/forumdisplay.php?fid=18)
+--- الموضوع : كيف ا حسب الفرق بالساعة لأكثر من يوم؟ (/showthread.php?tid=15191)



كيف ا حسب الفرق بالساعة لأكثر من يوم؟ - ahmed_egypt - 22-03-16

الأساتذة الأفاضل
السلام عليكم

تعلمت من هذا المنتدى الرائع كيف احسب فرق بين توقتين (زمنين) بالساعة كاالتالى :



zTime1 = Format$(Text1.text, "HH:MM")
zTime2 = Format$(Text2.text, "HH:MM")

Diff_Minutes = DateDiff("n", zTime1, zTime2)

Text3.text = Format$(TimeSerial(0, Diff_Minutes, 0), "HH:MM")


ويعمل بشكل جيد جدا  اذا كان الفرق بين zTime1  و zTime2 ياتعلق بنفس اليوم فقط
مثال للتوضيح :
تغادر السفينة سعت 23:00 (zTime1 )  بتاريخ 20/3/2016( date_departure )   وتصل سعت 04:00 ( zTime2  ) يتاريخ 23/3/2016 (  date_arrival )
السؤال:
كيف يمكن حساب الفرق بالساعة بمعلومية التاريخ ؟  وهل يمكن حساب الفرق ياليوم والساعة كأن نقول مثلا استغرقت الرحلة 2 يوم و 4 ساعات .

متأكد انى سأجد اجابة وافية كما تعودت دائما من هذا الصرح العظيم


RE: كيف ا حسب الفرق بالساعة لأكثر من يوم؟ - Ahmed_Mansoor - 22-03-16

أهلا أخي الكريم , الطريقة في المرفقات .


RE: كيف ا حسب الفرق بالساعة لأكثر من يوم؟ - ahmed_egypt - 22-03-16

ستظل رائعا استاذنا الكبير احمد منصور
بارك الله لك فى صحتك واولادك


RE: كيف ا حسب الفرق بالساعة لأكثر من يوم؟ - rohaem - 26-03-16

بارك الله فيك موضوع ممتاز


RE: كيف ا حسب الفرق بالساعة لأكثر من يوم؟ - mohammed.atallah - 16-11-16

(22-03-16, 11:32 PM)Ahmed_Mansoor كتب : أهلا أخي الكريم , الطريقة في المرفقات .

بارك الله فيك وجزاك  الله كل خير .


RE: كيف ا حسب الفرق بالساعة لأكثر من يوم؟ - sendbad100 - 16-11-16

(22-03-16, 11:32 PM)Ahmed_Mansoor كتب : أهلا أخي الكريم , الطريقة في المرفقات .

بيض الله وجهك


طريقة جميلة ومختصرة وبسيطة 

من يريد استخدام المثال علية الانتباه اذا كان التاريخ الثاني اصغر من الاول