FormatX$ in QB64

[eoredson]

btw: The functions I wrote are in this list:

Code: (Select All)

' NOW() Returns a serial number of current date/time.
'  Year between 1753 and 2078 increased to 0001 and 9999.

' FORMATX$(expression, fmt$) Formats a value to a string format.

' MONTH(serial) Returns the month from a serial number
' DAY(serial) Returns the day of the month from a serial number
' YEAR(serial) Returns the year from serial number

' MONTHSHORT(month%) Returns the month from m% argument
' MONTHSHORTSERIAL(serial) Returns the month from serial number

' MONTHLONG(month%) Returns the month from m% argument
' MONTHLONGSERIAL(serial) Returns the month from serial number

' WEEKDAY(month%, day%, year%) Returns the day of the week from m%, d%, y% arguments
' WEEKDAYSERIAL(serial) Returns the day of the week from serial number

' WEEKDAYSHORT(month%, day%, year%) Returns the short name day of the week from m%, d%, y% arguments
' WEEKDAYSHORTSERIAL(serial) Returns the short name day of the week from serial number

' WEEKDAYLONG(month%, day%, year%) Returns the long name day of the week from m%, d%, y% arguments
' WEEKDAYLONGSERIAL(serial) Returns the long name day of the week from serial number

' HOUR(serial) Returns the hour from a serial number
' MINUTE(serial) Returns the minute from a serial number
' SECOND(serial) Returns the seconds from a serial number

' DATESERIAL(month%, day%, year%) Returns a serial number from m%, d%, y% arguments
' TIMESERIAL(hour%, minute%, second%) Returns a serial number from h%, m%, s% arguments

' DATEVALUE(date$) Returns a serial number from a date string
' TIMEVALUE(time$) Returns a serial number from a time string

' DATETIMECLOCK$()  Returns a formatted string of the current date/time
' DATETIMECLOCKSERIAL$(serial)  Returns a formatted string of the sepcified date/time
' DATETIMESERIAL(hour%, minute%, second%, month%, day%, year%)

' FORMATDATE$(serial) Returns a formatted date string from a serial number
' FORMATTIME$(serial) Returns a formatted time string from a serial number

' ISLEAPYEAR(Y) Returns -1 if Y is a leapyear.

' DAYSINMONTH (month%) Returns days in a month, February is 28.
' DAYSINWEEK (Z%) Returns 7
' MONTHSINYEAR (Z%) Returns 12
' DAYSINYEAR (year%) Returns 365 or 366 if leapyear
' DAYOFYEAR (month%, day%, year%) Returns day of the year
' DAYOFYEARSERIAL (serial) Returns day of the serial date