Update Unbound Text Box

[kannon8833]

Good Morning All -

Finishing up a project and thought I had all of the difficult stuff done and came upon this.

In a subform I am pulling dates down from a table. One data element is Project Completion.

I would like to put a real simple calculated textbox next to it that shows the date of the Project Completion plus 7 (days) to use as a reminder for need to contact customer for feedback.

I put the equation in the Control Source and it works (almost) fine. The calculation is ok but when I enter the date in Project Completion the calculated value does not appear until I click on the form with my mouse.

I have tried AfterUpdate using Requery or Recalc.

I am stuck on this "simple" text box. Any ideas??

As always, thank you very much.

Kannon

 

[bob fitz]

I have tried AfterUpdate using Requery or Recalc.

AfterUpdate event of the form or of the control in which you are entering data.

 

[Brianwarnock]

I think that you should be using the before update event of the control for project completion

Brian

 

[kannon8833]

Well I tried the following on the AfterUpdate of the main form:

Private Sub Form_AfterUpdate()
Me.Recalc
End Sub

Computes via the Control Source of the textbox using =[Date Sent to Customer]+7 but still needs a mouse click on the form/subform to appear.

 

[Brianwarnock]

The after update event does not fire until the record is updated , why did you not try the beforeupdate event?

Brian

 

[kannon8833]

Interesting finding.

Seems it does work when using AfterUpdate, but .. it works when you type in the date. It doesn't work when you use the Date Picker. So, for now, I just removed the date picker and you have to type in the dates.

Thank you for the feedback.

Kannon