منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

اساتذى الكرام
هل هناك دالة يمكنها ان تحسب الفرق بين وقتين ؟
مثال : المباراه بدأت الساعة 00:30 وانتهت  0225
         كيف يمكن حساب الفرق ؟
متأكد من التعاون وسرعة الرد -وهذا يدل على عظمة المنتدى والقائمين علية
خالص تحياتى

أهلا أخي الكريم , إعمل مشروع جديد ثم أدرج 3 تكست بوكس الأول لوقت البداية والثاني لوقت النهاية والثالث لإظهار الفرق فيه وأدرج زر أمر واحد , ,وعند كتابتك للوقت إستخدم التنسيق AM/PM أو نظام 24 ساعة , مثال :

- تنسيق AM/PM :

- تنسيق بنظام 24 ساعة :

ثم إستخدم هذا الكود في الزر :

(12-02-16, 12:43 AM)Ahmed_Mansoor كتب : [ -> ]أهلا أخي الكريم , إعمل مشروع جديد ثم أدرج 3 تكست بوكس الأول لوقت البداية والثاني لوقت النهاية والثالث لإظهار الفرق فيه وأدرج زر أمر واحد , ,وعند كتابتك للوقت إستخدم التنسيق AM/PM أو نظام 24 ساعة , مثال :

- تنسيق AM/PM :

PHP كود :

02:30 PM 


- تنسيق بنظام 24 ساعة :

PHP كود :

14:30 


ثم إستخدم هذا الكود في الزر :

PHP كود :

Private Sub Command1_Click()

Dim zTime1 As String
Dim zTime2 As String
Dim Diff_Minutes As Integer

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

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

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

End Sub 


فعلا كما توقعت - سرعة الرد - اجابة وافية -شرح مبسط
منتدى اكثر من رائع- لكم خالص التحية