Using DoCmd in an IF/Then statment

  • Thread starter Thread starter Curtis
  • Start date Start date
C

Curtis

I am using the below coding, debug says there are no problems, but the Else
statement DoCmd will not run. Can anyone tell me what is wrong here?

Function Another_Record()

MSGBOX "Do you wish to do another LRU update?", vbYesNo, "LRU UPDATE"
If vbYes Then
DoCmd.GoToControl "Serial Number"
Else
DoCmd.Close acForm, "EDIT CDS LRU ASSET"
End If
End Function
 
Curtis said:
I am using the below coding, debug says there are no problems, but the Else
statement DoCmd will not run. Can anyone tell me what is wrong here?

Function Another_Record()

MSGBOX "Do you wish to do another LRU update?", vbYesNo, "LRU UPDATE"
If vbYes Then
DoCmd.GoToControl "Serial Number"
Else
DoCmd.Close acForm, "EDIT CDS LRU ASSET"
End If
End Function
Click to expand...


Didn't I see this question asked and answered yesterday?

Function Another_Record()

If vbYes = MSGBOX("Do y . . .) Then
DoCmd.GoToControl "Serial Number"
Else
DoCmd.Close acForm, "EDIT CDS LRU ASSET"
End If
End Function
 

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

Similar Threads

The Docmd in this IF/Then Statement will not work 1
IF THEN ELSE CODING missing a step 2
VBA Coding for DoCMD Statements. 3
Keep form open until loop completes 2
If statment from msgbox responce 4
NotInList Firing Problem 12
if statment in case statement 2
OnClose DoCmd: If Form Open In Read Only vs. If Not 2

Back
Top