Microsoft KB Archive/101022: Difference between revisions
From BetaArchive Wiki
m (Text replacement - """ to """) |
m (Text replacement - ">" to ">") |
||
Line 16: | Line 16: | ||
To convert a number of hours expressed as a numeric value to a time string of the form "HH:MM:SS", you can use the following user-defined function (UDF): | To convert a number of hours expressed as a numeric value to a time string of the form "HH:MM:SS", you can use the following user-defined function (UDF): | ||
<pre> * NTOT(<expN | <pre> * NTOT(<expN>) | ||
* Returns a string in the form "HH:MM:SS". | * Returns a string in the form "HH:MM:SS". | ||
* <expN | * <expN> is a number of hours expressed as a numeric value between | ||
* 0 and 24. If <expN | * 0 and 24. If <expN> is negative or greater than 24, the null | ||
* string is returned. | * string is returned. | ||
Line 26: | Line 26: | ||
PRIVATE hours,minutes,seconds,hourstring,minutestring,secondstring | PRIVATE hours,minutes,seconds,hourstring,minutestring,secondstring | ||
IF number < 0 OR number | IF number < 0 OR number > 24 && Error checking | ||
RETURN "" | RETURN "" | ||
ENDIF | ENDIF | ||
Line 36: | Line 36: | ||
* Convert values to strings and pad with leading zeros if necessary | * Convert values to strings and pad with leading zeros if necessary | ||
hourstring=IIF( hours | hourstring=IIF( hours>9, LTRIM(STR(hours)), "0"+LTRIM(STR(hours)) ) | ||
minutestring=IIF( minutes | minutestring=IIF( minutes > 9, LTRIM(STR(minutes)),</pre> | ||
"0"+LTRIM(STR(minutes)) ) | "0"+LTRIM(STR(minutes)) ) | ||
<pre> secondstring=IIF(seconds | <pre> secondstring=IIF(seconds > 9, LTRIM(STR(seconds)),</pre> | ||
"0"+LTRIM(STR(seconds)) ) | "0"+LTRIM(STR(seconds)) ) | ||
<pre> * Return completed string in the form "HH:MM:SS" | <pre> * Return completed string in the form "HH:MM:SS" |
Revision as of 10:04, 20 July 2020
How to Convert a Numeric Value to HH:MM:SS Time FormatID: Q101022 2.50 2.50a | 2.00 2.50 2.50a WINDOWS | MS-DOS kbprg The information in this article applies to:
To convert a number of hours expressed as a numeric value to a time string of the form "HH:MM:SS", you can use the following user-defined function (UDF): * NTOT(<expN>) * Returns a string in the form "HH:MM:SS". * <expN> is a number of hours expressed as a numeric value between * 0 and 24. If <expN> is negative or greater than 24, the null * string is returned. FUNCTION NTOT PARAMETERS number PRIVATE hours,minutes,seconds,hourstring,minutestring,secondstring IF number < 0 OR number > 24 && Error checking RETURN "" ENDIF * Break number down into hour, minute, and second values hours=INT(number) minutes=INT((number-hours)*60) seconds=( ((number-hours)*60) - minutes ) * 60 * Convert values to strings and pad with leading zeros if necessary hourstring=IIF( hours>9, LTRIM(STR(hours)), "0"+LTRIM(STR(hours)) ) minutestring=IIF( minutes > 9, LTRIM(STR(minutes)), "0"+LTRIM(STR(minutes)) ) secondstring=IIF(seconds > 9, LTRIM(STR(seconds)), "0"+LTRIM(STR(seconds)) ) * Return completed string in the form "HH:MM:SS" RETURN ( hourstring +':' + minutestring + ':' + secondstring ) Additional reference words: FoxDos FoxWin 2.00 2.50 2.50a 2.x TTON KBCategory: kbprg KBSubcategory: FxprgGeneral Keywords : FxprgGeneral Version : 2.50 2.50a | 2.00 2.50 2.50a Platform : MS-DOS WINDOWS |
Last Reviewed: April 30, 1996 |