i got a problem that checking the date for credit card.
my format is mm/dd/yyyy. but everytime i key in correct month but incorrect date, it will pop up error message"invalid month!" but i already set that if the month is more than 12, then the message will pop up, y?
here are my code:
Private Sub cmd_summit_Click()
Dim month As Date, day As Date, year As Date
Dim month_result As Date, day_result As Date, year_result As Date
month = Val(txt_month.Text)
day = Val(txt_day.Text)
year = Val(txt_year.Text)