RufussMcGee
Technical User
Had a simple way to pick the date with this code.
Private Sub cboEndDate_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
ocxCalendar.Visible = False
ocxCalendarEnd.Value = Date
ocxCalendarEnd.Visible = True
End Sub
Calender popped up, you select the date and you are done. Since installing Access2010 it gives an error on "= Date". What do I need to do to fix this issue thanks.
Private Sub cboEndDate_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
ocxCalendar.Visible = False
ocxCalendarEnd.Value = Date
ocxCalendarEnd.Visible = True
End Sub
Calender popped up, you select the date and you are done. Since installing Access2010 it gives an error on "= Date". What do I need to do to fix this issue thanks.