Validating a Record : DoCmd « Application « VBA / Excel / Access / Word






Validating a Record

 
Private Sub Form_BeforeUpdate(Cancel As Integer)
   If IsNull(txtCustLastName) Then
      MsgBox "Please enter a last name"
      DoCmd.GoToRecord , , acLast
      Me.ctlCustLastName.SetFocus
   End If
End Sub
 

 








Related examples in the same category

1.Open a report
2.Save changes to the client record
3.Undo changes made to the current record
4.Closes the window of an Access object: DoCmd.Close([ObjectType][, ObjectName][, Save])
5.Copies a database object into the same or another database: DoCmd.CopyObject([DestinationDatabase][, NewName][, SourceObjectType][, SourceObjectName])
6.Deletes a database object:DoCmd.DeleteObject([ObjectType][, ObjectName])
7.Using the DoCmd Object to Programmatically Add Sections to Reports at Runtime
8.Use DoCmd.OpenForm to open a form
9.Use DoCmd to close a form
10.Setting a Focus
11.Finding a Record
12.Use DoCmd to open a form
13.Makes a sound using the computer's built-in speaker.
14.Using the DoCmd Object to Run Commands
15.Sending Mail
16.Calling the Report from VBA
17.DoCmd.Echo