See Also: Time and Date Functions
The DateSetMillisecond function returns a new DateTime value that is the original value, dtVar, with the millisecond component changed to iMillisecond.
We recommend using the newer, higher level DateSet function to set a date and the DateAddXXX (DateAddDay, DateAddHour, DateAddMillisecond, DateAddMinute, DateAddMonth, DateAddSecond, DateAddYear) functions to manipulate DateTimes/Dates and the DateGetXXX (DateGetDay, DateGetHour, DateGetMillisecond, DateGetMinute, DateGetMonth, DateGetSecond, DateGetYear) functions to retrieve DateTimes/Dates.
The DateSetXXX (DateSetDay, DateSetHour, DateSetMillisecond, DateSetMinute, DateSetMonth, DateSetSecond, DateSetYear) functions have the following limitations:
Invalid values are allowed in all DateTime parts.
Negative values are wrapped.
Date return type may return error (if out of its range).
Use IsDateValid(), IsNullDateTime() and IsTimeSpanValid() to test if variable is valid.
DateSetMillisecond( {dtVar}, {iSecond} )
Where:
{dtVar} is a value of type DateTime
{iMillisecond} is an integer value representing the new Millisecond component of the DateTime
Procedure TestDateSetMillisecond
DateTime dtVar
//Get the current local date and time
Move (CurrentDateTime()) To dtVar
Move (DateSetMillisecond(dtVar, 250)) To dtVar
// This will print:
// The Millisecond of 2/23/2005 9:16:20.250 AM is: 250
Showln "The Millisecond of " dtVar " is: " (DateGetMillisecond(dtVar))
End_Procedure