<div>
You have to do:<br />
<br />
&nbsp;If MsgBox( &quot;You must either finish the record or cancel the record, Do you want to cancel this record?&quot;, vbYesNo) = vbYes Then<br />
<br />
or<br />
<br />
Dim intRet as integer<br />
<br />
intRet = MsgBox (&quot;You must either finish the record or cancel the record, Do you want to cancel this record?&quot;, vbYesNo)<br />
<br />
If intRet = vbYes Then<br />
<br />
Jim.
</div>


You have to do:

 If MsgBox( "You must either finish the record or cancel the record, Do you want to cancel this record?", vbYesNo) = vbYes Then

or

Dim intRet as integer

intRet = MsgBox ("You must either finish the record or cancel the record, Do you want to cancel this record?", vbYesNo)

If intRet = vbYes Then

Jim.

<div>
MsgBox &quot;You must either finish the record or cancel the record, Do you want to cancel this record?&quot;, vbYesNo<br />
&gt;&gt;&gt;<br />
response = MsgBox &quot;You must either finish the record or cancel the record, Do you want to cancel this record?&quot;, vbYesNo
</div>


MsgBox "You must either finish the record or cancel the record, Do you want to cancel this record?", vbYesNo
>>>
response = MsgBox "You must either finish the record or cancel the record, Do you want to cancel this record?", vbYesNo

<div>
<div class="content wysiwyg-content">
hello,<br />
<br />
I am having another rough day.<br />
<br />
I have this code and can't seem to get it to work...whether you push yes or no it returns to the form and does nothing...<br />
<br />
If Me.Dirty Then<br />
&nbsp; &nbsp; MsgBox &quot;You must either finish the record or cancel the record, Do you want to cancel this record?&quot;, vbYesNo<br />
&nbsp; &nbsp; If response = vbYes Then<br />
&nbsp; &nbsp; &nbsp; &nbsp; Me.Undo<br />
&nbsp; &nbsp; &nbsp; &nbsp; DoCmd.OpenForm &quot;frmLicense&quot;<br />
&nbsp; &nbsp; &nbsp; &nbsp; Else<br />
&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; If response = vbNo Then<br />
&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; Exit Sub<br />
&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; End If<br />
&nbsp; &nbsp; End If<br />
Else<br />
DoCmd.OpenForm &quot;frmLicense&quot;<br />
End If<br />
<br />
what am I missing?
</div>
</div>


hello,

I am having another rough day.

I have this code and can't seem to get it to work...whether you push yes or no it returns to the form and does nothing...

If Me.Dirty Then
    MsgBox "You must either finish the record or cancel the record, Do you want to cancel this record?", vbYesNo
    If response = vbYes Then
        Me.Undo
        DoCmd.OpenForm "frmLicense"
        Else
            If response = vbNo Then
                Exit Sub
            End If
    End If
Else
DoCmd.OpenForm "frmLicense"
End If

what am I missing?

vbYes and vbNo, either way not working

Microsoft Access is a rapid application development (RAD) relational database tool. Access can be used for both desktop and web-based applications, and uses VBA (Visual Basic for Applications) as its coding language.