Help with VBA code calculate new year

I am new with VBA, or at the least real rusty.

Here is my problem.

I am working with Access 2002, and need help with a
vba code for this calculation.

Here is what I am trying to do.

It is called CHECK DATE

I am using 3 fields to give me my month day and year,
and the Year field is the one I want to increase to a new
year by comparing between 2 other fields that have numbers.

Each field is a number field.

So,

CHECK DATE
IF (number 1 field => number 2 field)
then
NEW DATE year field= number 1 field plus the year (number) from CHECK DATE
year field.

ELSE

IF ( number 1 field < number 2 field)
then
NEW DATE = ( number 2 field plus the year from CHECK DATE year field.

Also, I need to copy the month and day from the CHECK DATE 's month and day
to the NEW DATE's month and day.

I hope I have been clear, and thanks again.

jimkirk44

So your pseudo code looks reasonable, have you tried coding the actual routine?