Run time error at form startup

  • Thread starter Thread starter Guest
  • Start date Start date
G

Guest

I can't figure out the coding error that the debugger catches on my form at
startup (the code runs as a current event)--the last line is highlighted.
Can someone figure out my problem. Thanks so much

If IsNull(Me!SaleExpires) Then
Select Case Me!BillingID
Case Is = 1
strInterval = "y"
Case Is = 2
strInterval = "q"
Case Is = 3
strInterval = "m"
End Select
End If

Me!SaleExpires = DateAdd("d", 3, DateAdd(strInterval, 1, Date))
 
The expression on RHS works fine (tested in A2K2).

What did the error message say?
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Back
Top