#Error in form control until user input

[domtrump]

I have a control on a form defined with the following formula:

=[Date]+Choose(Weekday([Date]),5,4,3,7,6,5,6)

It takes the user enters a date into the [Date] field and this field calculates the due date for a project. The control works fine, however, when you go to add a new record, the control displays #Error until the user enters a date.

This is just cosmetic, but how can I make this control just be blank until the user enters the date?

Thanks.

 

[boblarson]

I have a control on a form defined with the following formula:

=[Date]+Choose(Weekday([Date]),5,4,3,7,6,5,6)

It takes the user enters a date into the [Date] field and this field calculates the due date for a project. The control works fine, however, when you go to add a new record, the control displays #Error until the user enters a date.

This is just cosmetic, but how can I make this control just be blank until the user enters the date?

Thanks.

=IIf(IsNull([Date]), "", [Date]+Choose(Weekday([Date]),5,4,3,7,6,5,6))

but also just an FYI - you should not use DATE for the name of a field. It is an Access Reserved Word and can cause major pain and suffering when dealing with it as such.

 

[Norie]

Just check if the other control has a value in it.

Not sure what the other control is called though, you just seem to be referring to the Access funtion Date in that expression.

 

[domtrump]

=IIf(IsNull([Date]), "", [Date]+Choose(Weekday([Date]),5,4,3,7,6,5,6))

but also just an FYI - you should not use DATE for the name of a field. It is an Access Reserved Word and can cause major pain and suffering when dealing with it as such.

Thanks. That worked great. I was checking if it was ="" but I guess IsNull is the way to go. (Oh, and that isn't the real name of the field but thanks for heads up

 

[boblarson]

Date fields don't have empty strings "" so you can't check for those. Dates are either null or have a value. But if you have a text field where it could be EITHER null or an empty string then a good check is this:

IIF(Len([FieldNameHere] & "") = 0, "", "Something")