Runtime error 424 on an After Update Event

[maxx429]

Hi all. I hope someone can help with this issue.

I have a Form with several Text Box controls on it. The Form is bound to a Table. What I want to happen is, after a particular text box is updated, I want to check if the value is Null. If it is, I want to set the value of a different text box to zero. If it is not Null, then I want to set the value of the same text box to =txtbox1*textbox2.

I keep getting a Runtime 424 error Object Required, on the bold area of code below:

Option Compare Database

Private Sub TransAmt_AfterUpdate()

If Me.TransAmt Is Null Then
Me.TotalTransAmt = 0

Else: Me.TotalTransAmt = Me.TransAmt * Me.TransQty

End If

End Sub



I've been beating my head against this issue for the past few hours, so any help is greatly appreciated.

Thanks,
Garrett

[pbaldy]

Try

If IsNull(Me.TransAmt) Then

Or to also test for a zero length string use the test here:

http://www.baldyweb.com/BeforeUpdate.htm

[maxx429]

Bingo! Thanks so much. Haven't done this in a long while

Try

If IsNull(Me.TransAmt) Then

Or to also test for a zero length string use the test here:

http://www.baldyweb.com/BeforeUpdate.htm

[pbaldy]

Happy to help, and welcome to the site by the way!