Private Sub Form_BeforeUpdate(Cancel As Integer)
If IsNull(Me.text0) Then
MsgBox "complete data"
Cancel = True
End If
End Sub

why the msgbox above appear to me twice?
I click the message box 2 time until disappear
what is the reason
thanks

No idea, based on your posted code, unless the control is corrupted. It runs as expected when I recreate your scenario in v2003. You might delete the textbox and BeforeUpdate event and recreate them.

G’day Aam.

Do you mean you get one message box when you try to move to a new record and another message box when you try to close the Form?

Regards,
Chris.

Is there any other VBA code on the form?

missinglinq
ChrisO
HiTechCoach
Thanks all
HiTechCoach
Is there any other VBA code on the form?
I find the trick you give the idea
i duplicate the code here is the duplication
DoCmd.RunCommand acCmdSaveRecord
DoCmd.GoToRecord , , acNewRec
the message appear twice for the above reason

(IMG:http://www.utteraccess.com/forum/style_emoticons/default/thumbup.gif) (IMG:http://www.utteraccess.com/forum/style_emoticons/default/thumbup.gif) (IMG:http://www.utteraccess.com/forum/style_emoticons/default/thumbup.gif)

if find answer for duplicating message by help HiTechCoach but Now

if i have the above code and this message appear to me when closing the form how can i prevent this message from appear?


i'm using this code to close the form
command_1_click
docmd.close
end sub