Stop Update event on condition

[rfoye]

I have a numeric field that I want to clear if a research "flag" field is True. I put the following code in the BeforeUpdate event, but it is not halting the update. What have I left out?

Private Sub txtNewPayment_BeforeUpdate(Cancel As Integer)
    If optResearch = True And ((Not IsNull(txtNewPayment) Or txtNewPayment = "")) Then
        MsgBox "You can not add a payment for an account marked Research", , "Research"
        Cancel = True
        Me!txtNewPayment.Undo
        Me.Undo
    End If
End Sub

-------------------
Rob Foye
Database Management
Regions Bank

 

[jadams0173]

Maybe Exit Sub after your msgbox or where ever you want the code to stop.

 

[PHV]

You wanted something like this ?
If optResearch = True And Trim(txtNewPayment & "") <> "" Then

Hope This Helps, PH.
Want to get great answers to your Tek-Tips questions? Have a look at FAQ219-2884 or FAQ181-2886

 

[rfoye]

I know I'd feel foolish when I discovered the answer to this, since I've done this before.

In case anyone wonders, the solution I was looking for was
DoCmd.CancelEvent

-------------------
Rob Foye
Database Management
Regions Bank