Tuesday, May 25, 2010

Day function

Dim MyDate, StrDatevalue
MyDate = "16,1,1980"
StrDay = Day(MyDate)
MsgBox StrDay

No comments: