[ناجح احمد]

[attachment=17081]

[attachment=17081 كتب :سيلفو pid='114265' dateline='1517925914'][attachment=17081]لدي برنامج
فية
2 تيكست يوضع بهما وقت
المطلوب 
حساب الفرق بين التوقيتين
Dim dtime1 As Date
Dim dTime2 As Date
Dim dTimeDiff As Date
dtime1 = CDate(Text1.Text)
dTime2 = CDate(Text2.Text)
dTimeDiff = dTime2 - dtime1
ثم 
توزيع هذا الوقت على 12 ليبل
بحيث
الليبل الاول يحتوي الوقت الاول
Label1.Caption = Text1.Text

واليبل الاخير يحتوي التوقيت الاخير

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

اذا احد يعرف كيف يحل هذا السوال اكون ممنون للمساعدة والمجهود

ارجوكم جدا محتاج اللحل

اطلع على المثال المرفق واتمنى من الاساتذه اختصار الاكواد ان امكن

  فرق بين وقتين.rar (الحجم : 2.12 ك ب / التحميلات : 24)