[saidhamed]

(20-04-22, 05:18 AM)ابو محمد محمد محمد كتب :

كود :

Dim startTime As New DateTime(2013, 9, 19, 10, 30, 0)     ' 10:30 AM today
       Dim endTime As New DateTime(2013, 9, 20, 2, 0, 0)     ' 2:00 AM tomorrow

       Dim duration As TimeSpan = endTime - startTime        'Subtract start time from end time

       MsgBox(duration.ToString)

يمكنك ايضا التحويل الى الدقائق

كود :

duration.TotalMinutes

شكرا اخى ابومحمد الكود شغال تمام هذا ما اريده بارك الله فيك وفى اولادك واعزك الله فى الدارين .