Public Module Example Public Sub Main() Dim date1 As Date = #09/08/2009# Console.WriteLine(date1.ToString("%M")) ' Displays 9 End Sub End Module