تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[سؤال] أحتاج إلى كود الفرق بين زمنين مختلفين
#1
Wink 
السلام عليكم أخواني

أحتاج إلى كود الفرق بين زمنين مختلفين مثل الكود في برنامج أوقات الصلاة

مثلاً في تكست1 وقت صلاة الظهر 12:45:00  
في تكست 2 ساعة الكمبيوتر  مثلاً 7:30:00
ما أحتاجه هو كود يحسب الوقت الباقي في تكست 3 ويجب أن يكون الناتج 5:15:00
ويبدأ بعد تنازلى حتى يحين الوقت

أرجوا المساعدة وشكراً لكم سلفاً
الرد }}}}
تم الشكر بواسطة:
#2
كود :
A = "12:45:00"
B = "7:30:00"
C = CDate(A) - CDate(B)
D = FormatDateTime(C, vbShortTime)
MsgBox D
الرد }}}}
تم الشكر بواسطة: abulayth
#3

(14-10-14, 02:12 PM)b4getws كتب :
كود :
A = "12:45:00"
B = "7:30:00"
C = CDate(A) - CDate(B)
D = FormatDateTime(C, vbShortTime)
MsgBox D

شكرا صديقي على ردك ولكني أحتاج للتالي
لدي وقت ثابت هو 1:00:00 am
والوقت الثاني هو الوقت الحالي وعادة يكون قبل يوم وهذه مشكلتي
استعملت هذا الكود


كود :
Dim timein As Date
Dim timeout As Date
Dim v_diff As Date


Text1.Text = Format(Time, "HH:MM:SS AMPM")
timein = Text2.Text
timeout = Text1.Text
v_diff = (timein - timeout)
'*********************************************
Hourdiff = Hour(v_diff)
minutediff = Minute(v_diff)
seconddiff = Second(v_diff)
'*********************************************
Text3.Text = Hourdiff & " : " & minutediff & " : " & seconddiff
ولكن تواجهني مشكلة عندما يكون الوقت  بعد منتصف الليل

مثلا الوقت الثابت هو 1:00:00am
والساعة الآن هي  11:00:00pm

المفروض يكون الفارق هو 2:00:00
ولكن البرنامج لا يحسب  فرق الأيام  ويظهر لي  الباقي 22:00:00


وأحتاج أيضا لزيادة الوقت الثابت  مثلاً الوقت الثابت + وقت جديد مثلاً 1:00:00 + 00:30:00
عندها يصبح الوقت الثابت 1:30:00am
والوقت الحالي 11:00:00pm
والتنيجة تكون 2:30:00
 أرجوا المساعدة وتصحيح الكود
وشكراً  لكم سلفا
الرد }}}}
تم الشكر بواسطة:
#4
يجب ان تستخدم التاريخ للساعة المراد تحديدها فالكمبيوتر لا يفهم ماذا تريد بهذه الطريقة

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

اما اذا كان الوقتين المراد الحساب بينهم في نفس اليوم
اجعل الوقت يكون بنظام 24 ساعة

تحياتي
الرد }}}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  كيف ا حسب الفرق بالساعة لأكثر من يوم؟ ahmed_egypt 5 233 16-11-16, 02:51 PM
آخر رد: sendbad100
  هل يمكن حساب الفرق بالساعة؟ ahmedegyptien 3 272 12-02-16, 06:40 AM
آخر رد: ahmedegyptien
  [SQL] أحتاج ترجمة هذا الاستعلام مشكورين sniper-jawadino 5 720 07-05-14, 11:11 PM
آخر رد: sniper-jawadino

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


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