Property: Fraction for UsiTimeDisp

Property: Fraction for UsiTimeDisp

Specifies in an USITimeDisp type object the fractions of a second with an accuracy of nanoseconds.

Object.Fraction

Note  The Fraction property returns a value smaller than or equal zero. The property Nanosecond returns the number of nanoseconds.

The following example generates a date and displays the fractions of a second, the seconds since 00:00:00 o'clock on 01:01:0000, the seconds since 00:00:00 o'clock on 01/01/1904:

Dim oMyTimeObj
Set oMyTimeObj = CreateTime(2013,9,13,10,51,44,123,456,789)
Call MsgBoxDisp("Fractions: " & oMyTimeObj.Fraction & vbCrLf & "Seconds from 0000: " & oMyTimeObj.SecondsFrom0000 & _
                vbCrLf & "Seconds from 1904: " & oMyTimeObj.SecondsFrom1904)