19-09-16, 05:28 AM
المشروع
الصراحة استغربت من ان الامر لايكلف الا كود بسيط جدا
PHP كود :
Dim d1 As DateTime = (t1.Text)
Dim d2 As DateTime = (t2.Text)
t3.AppendText(DateDiff(DateInterval.Year, d1, d2) & " Years" & vbNewLine)
t3.AppendText(DateDiff(DateInterval.Month, d1, d2) & " Months" & vbNewLine)
t3.AppendText(DateDiff(DateInterval.Day, d1, d2) & " Days" & vbNewLine)
t3.AppendText(DateDiff(DateInterval.Hour, d1, d2) & " Hours" & vbNewLine)
t3.AppendText(DateDiff(DateInterval.Minute, d1, d2) & " Minutes" & vbNewLine)
t3.AppendText(DateDiff(DateInterval.Second, d1, d2) & " Seconds")