Excel VisualBasic Script

Sub dateDemo8()
   Debug.Print Month(Date) & "/" & Day(Date)
End Sub