i Have form with 2 text boxes, one beginning date the other end date.
have button call month when i click should set starint and ending date of month, but it only does
January to February.
here it's the code:
thank you
have button call month when i click should set starint and ending date of month, but it only does
January to February.
here it's the code:
Code:
Private Sub cmdmonth_Click()
'Sets the Date From and Date To text boxes
'to show complete month (from start to end of current month)
Me!BeginDate = CDate("01/" & month(Date) & "/" & year(Date))
Me!EndDate = DateAdd("d", -1, DateAdd("m", 1, Me!BeginDate))
End Sub
thank you