covert current date

hi guys,
i refer to the below link and trying to convert 6/15/2009 1:45:30 PM -> 6
http://msdn.microsoft.com/en-us/library/8kb3ddd4(v=vs.110).aspx
?Format(CDate(Now()), "M") but the above code i using will return 23 Apr to me. Any advise. TQ