text box bound and want to overrdie

[jazzy]

have a text box 1stDepositPercentage on form frm_Contract which is bound to a field 1stDepositPercentage in table tbl_Contracts . I have the Control Source set to =IIf(DateDiff("m",[DateofContract],[DateofFunction])<5,0.5,0.2), works great. problem is if the user wants to override that box with their own value. suggestions?

[June7]

A textbox with calculation in ControlSource is not bound. A bound control references a field as ControlSource.

Cannot edit calculated value.

A calculated value does not automatically save into field so how are you accomplishing that?

Bind textbox to field and use VBA to set with the calculated result then user can edit at will

If IsNull(Me.lstDepositPercentage) Then Me.lstDepositPercentage = IIf(DateDiff("m",[DateofContract],[DateofFunction])<5,0.5,0.2)

Real trick is figuring out what event to put that code into. Perhaps form Current.

[Gicu]

Or bind the textbox to the field as suggested by June and add your expression to the default value property.

[June7]

Likely DefaultValue property will not work because expression is dependent on another field that probably needs input. DefaultValue must be able to have a value before any input to record.

[jazzy]

i used VBA to set the values and left it bound to the field, worked well

Thanks everyone