The code below brings up a "Do you want to save message box" problem is for some reason it saves even if you press No. Can anybody spot the problem?
Private Sub Form_BeforeUpdate(Cancel As Integer)
Dim Msg, Style, Response, MyString
Beep
Msg = "Do you wish to save this record?"
Style = vbYesNo...