المشاركات : 79
المواضيع 33
الإنتساب : Nov 2018
السمعة :
1
الشكر: 45
تم شكره 44 مرات في 27 مشاركات
السلام عليكم اخوانى
كما هو موضح من عنوان الموضوع
اريد فرق الوقت بين تاريخين فى فرق الوقت بين تسجيل الحضور وتسجيل الانصراف كما هو موضح بالصورة فى الداتا جريد
واريد كود يحسب الفرق بين وقتين وهو بطريقة الضغط على زر تسجيل الانصرف يظهر فى خانة فرق الوقت وهو ايضا فى الداتا جريد فيو عرض حساب الوقت زى كدة بالظبط
2:25
وهو اظهار فرق الوقت بالساعة والدقائق فقط
وشكراً لكم
" />
المشاركات : 531
المواضيع 37
الإنتساب : Oct 2019
السمعة :
219
الشكر: 609
تم شكره 1654 مرات في 584 مشاركات
02-05-20, 10:21 AM
(آخر تعديل لهذه المشاركة : 02-05-20, 10:43 AM {2} بواسطة معاند الحظ.)
وعليك السلام ورحمة الله وبركاته
استخدم الكود التالي :
كود :
Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click
' وقت الدخول
'Dim firstDate As New DateTime(year,month,day,hour,minute,second)
Dim firstDate As New DateTime(2020, 11, 1, 10, 25, 6)
' وقت الخروج
'Dim secondDate As New DateTime(year,month,day,hour,minute,second)
Dim secondDate As New DateTime(2020, 10, 1, 13, 25, 6)
' فارق التوقيت
'Dim difDate As TimeSpan = وقت الدخول - وقت الخروج
Dim difDate As TimeSpan = secondDate - firstDate
Label1.Text = difDate.Duration.ToString
End Sub
المشاركات : 79
المواضيع 33
الإنتساب : Nov 2018
السمعة :
1
الشكر: 45
تم شكره 44 مرات في 27 مشاركات
(02-05-20, 10:21 AM)معاند الحظ كتب : وعليك السلام ورحمة الله وبركاته
استخدم الكود التالي :
كود :
Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click
' وقت الدخول
'Dim firstDate As New DateTime(year,month,day,hour,minute,second)
Dim firstDate As New DateTime(2020, 11, 1, 10, 25, 6)
' وقت الخروج
'Dim secondDate As New DateTime(year,month,day,hour,minute,second)
Dim secondDate As New DateTime(2020, 10, 1, 13, 25, 6)
' فارق التوقيت
'Dim difDate As TimeSpan = وقت الدخول - وقت الخروج
Dim difDate As TimeSpan = secondDate - firstDate
Label1.Text = difDate.Duration.ToString
End Sub
شكرا لك اخى الكريم
|