Update fails - looking for fix

[Middlemarch]

My Form_FormMode7 has a query on my table. as the Record Source


A control txtBComment on the Form has it's control source set to a field from the property box dropdown list.
A second text box copies text to that control via after update event

Private Sub BComment_AfterUpdate()
txtBComment = Replace(Nz(BComment), vbCrLf, vbLf)
With Form_FormMode7
        If .Dirty Then .Dirty = False
End With
End Sub

Why does this not work reliably? Sometimes the table is updated but often not. I have to double check it every time.
The code runs without error. I added the .Dirty believing it forced a save, but it made no difference.

[davegri]

Have you tried a breakpoint to see if the afterupdate event always fires?
Here's some code to deal with possible nulls in an alternate fashion:

Private Sub BComment_AfterUpdate()
If Len(BComment & vbnullstring) > 0 then
    txtBComment = Replace(BComment, vbCrLf, vbLf)
    Me.Dirty = False
EndIf
End Sub

[Middlemarch]

Thanks dave yes the after updater event was NOT running.
I added a different backcolor to a label to prove it.

I wonder what Access considers an update? I would have thought no text to some text would always fire it.

[Missinglinq]

...A second text box copies text to that control via after update event...

...I would have thought no text to some text would always fire it...

A Control's AfterUpdate event does not fire if the Control is being populated by code...only if it is physically (i.e. via keyboard or thru a copy & paste operation)...and I'm assuming, from the first statement, above, that you're doing this with code:

To get AfterUpdate to fire, when using code to populate the Control, you have to Call it after you populate it:

Me.ControlName = "Whatever"
Call NName_AfterUpdate

Linq ;0)>

[Middlemarch]

Thanks Linq, didn't know that. All OK now!

[Missinglinq]

Glad we could help!

Good luck with your project!

Linq ;0)>