The Docmd in this IF/Then Statement will not work

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

Curtis

I am using the below coding and can not figure out why the "Else" DoCmd will
not work. Debug shows no errors yet if "NO" is clicked in the message box the
DoCmd.Close fails to work. Any idea why?

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 and can not figure out why the "Else" DoCmd will
not work. Debug shows no errors yet if "NO" is clicked in the message box the
DoCmd.Close fails to work. Any idea why?

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


There is no reason why you would need to post the same
question twice in 12 minutes. Have a little patience and
give us a chance to answer. Check your posts for replies
and don't think about reposting the same question for a
couple of days.
 
Back
Top