Функции на VBA в Access

[Verano naranjo]

Народ, помогите написать несложную функцию на VBA для Access.

В форме frm_OST_Operation в поле Time нужно расчитать след. вещь:
если значение Quantity, в той же форме =1, то Time в этой форме = значению Constant из формы frm_OST_Elements; если нет, то Time = Constant из формы frm_OST_Elements + Validation из формы frm_OST_Elements * Quantity из формы frm_OST_Operation.

БД в приложении, помогите. плиз
Я думала, так, но не получается.

Private Sub Time_AfterUpdate()

If Me.Quantity = 1 Then

frm_OST_Operation!Time = frm_OST_elements!Constant

Else: frm_OST_Operation!Time = frm_OST_elements!Constant + frm_OST_elements!Validation * frm_OST_Operation!Quantity

End If

End Sub