<cDateTime>.Diff

<< Click to Display Table of Contents >>

Navigation:  ThinBASIC Language > thinBasic Functions > Date and Time > cDateTime > cDateTime_Methods >

<cDateTime>.Diff

 

Description

 

Compares two cDateTime object's date & time perspective separately.

 

Syntax

 

<cDateTime>.Diff(otherCDateTime)

 

Returns

 

None.

 

Parameters

 

Name

Type

Optional

Meaning

otherCDateTime

cDateTime

No

Other cDateTime object to compare.

 

Remarks

 

Restrictions

 

See also

 

Examples

 

' Create an object with current date and time

Dim firstDateTime As New cDateTime

 

' Set its values

firstDateTime.NewDate(2020, 12, 24)

firstDateTime.NewTime(20, 0, 0)

 

' Create another object with current date and time

Dim secondDateTime As New cDateTime

 

' Set its values

secondDateTime.NewDate(2021, 11, 25)

secondDateTime.NewTime(22, 30, 45)

 

Dim diffDate As DateInterval

 

' Calculate difference in dates and hours - separately

diffDate = firstDateTime.Diff(secondDateTime)

 

' Display difference - in this case it will be:

' 0 years, 11 months and 1 days

' 8066 hours, 30 minutes, 45 seconds, 0 miliseconds

' The value for hours might be a surprise, but it simply converts all the days between two dates to hours

MsgBox 0, "Years:       " + diffDate.Years    + $CRLF + 

          "Months:      " + diffDate.Months   + $CRLF + 

          "Days:        " + diffDate.Days     + $CRLF +

          "Hours:       " + diffDate.Hours    + $CRLF + 

          "Minutes:     " + diffDate.Minutes  + $CRLF + 

          "Seconds:     " + diffDate.Seconds  + $CRLF +

          "Milliseconds:" + diffDate.Mseconds + $CRLF