This function returns a value indicating whether the provided day of the month is even or odd.
Parameter: date
Type: date
Description: This is the date that you wish to check for being even or
odd for the month.
Return value: CD_DAY_EvenOdd
Type: Enum (Integer) 0 = Even, 1 = Odd
Description: The return is a .NET Enum equivalent to an integer value.
The
return value converted to string with the .ToString method will return
the word Even or Odd,
but
when converted to an integer value and then to a string it will display
0 or 1.
Dim dte As Date = DateTime.Parse("April
1, 2006")
hs.WriteLog("Info","April 1 of 2006 is an " & hs.EvenOddMonth(dte).ToString
& " day of the month.")