Пересчет даты

[atenon]

Доброго времени суток уважаемые форумчане.
Возникла такая проблема:
Поле Дата предыдущей аттестации Поле Дата следующей аттестации
Суть задачи такая чтобы дата бралась из первого поля к ней добавлялось три года и полученная дата отражалась во втором поле. Если дата попадает на первое полугодие текущего года то цвет шрифта красный, если на второе полугодие то цвет шрифта например синий.
У самого познания в Access на самом примитивном уровне если не сложно подскажите пожалуйста как это сделать.
Спасибо.

[Abrakadabra]

Сообщение от atenon

чтобы дата бралась из первого поля к ней добавлялось три года и полученная дата отражалась во втором поле. Если дата попадает на первое полугодие текущего года то цвет шрифта красный, если на второе полугодие то цвет шрифта например синий.

Так примерно:
На событие "после обновления" первого поля повесьте код:
Me.ИмяВторогоПоля=DateAdd("yyyy", 3, Me.ИмяПервогоПоля)

(Кроме этого, возможно, в зависимости от структурных особенностей формы, нужно будет обработать указанный код в Current формы..)

С цветами проще. Используйте условное форматирование для второго поля (Используйте IIf и DatePart c "квартальными" параметрами)

[Teslenko_EA]

Здравствуйте atenon.
"..добавлялось три года.." - поможет следующая конструкция:

DateAdd("YYYY", 3, [Дата предыдущей аттестации])

"..Если дата .. первое полугодие текущего года то цвет шрифта красный..":

Поле1.ForeColor = IIf(v >= DateSerial(Year(Date), 1, 1) And v < DateSerial(Year(Date), 7, 1), 255, 0)

способ их применения надеюсь придумаете самостоятельно.
ведь не известна версия MS Access с которой Вы работаете.
Евгений.

[atenon]

Спасибо за помощь