Day Function

See Also2RUQGX5              ExampleGU1TMM>Low

Returns an integer between 1 and 31, inclusive, that represents the day of the month for a date argument.




The dateexpression part of the syntax is any numeric expression71RISN or string expression1330R89 that can represent a date and time from January 1, 100 through December 31, 9999, where January 1, 1900 is 2.  Numbers to the left of the decimal point in dateexpression represent the date; numbers to the right represent the time.  Negative numbers represent dates prior to December 30, 1899.

If dateexpression is Null1DDW7C0, this function returns a Null.

See Also

Date, Date$ Functions3E3X9E

Date, Date$ Statements3E3X9R

Hour FunctionGU67IG

Minute Function5OWKHCJ

Month Function3NARHG

Now FunctionLANNOW

Second FunctionC46EYJ

Weekday FunctionM393JM

Year FunctionGUFX5G

Day Function Example

The example uses the Day function to determine the day of the month.  To try this example, paste the code into the Declarations section of a form.  Then press F5 and click the form.


Sub Form_Click ()

   Dim DayNum, DaySuffix                 ' Declare variables.

   DayNum = Day(Now)                     ' Get the current day number.

   Select Case DayNum                    ' Get the proper suffix

      Case 1, 21, 31                     ' for each number.

         DaySuffix = "st"

      Case 2, 22

         DaySuffix = "nd"

      Case 3, 23

         DaySuffix = "rd"

      Case Else

         DaySuffix = "th"

   End Select

   MsgBox "Today is the " & DayNum & DaySuffix & " day of the month."

End Sub