Examples: Changed property

The following example displays a message containing the date and time when a customer record was changed. This information could also be added to the DUOS or to another database (such as Microsoft Access) and stored with the customer record.

Private Sub CustomerID_Changed()
	If CustomerMaintenance.Changed Then
		'The user made a change to the current record.
		MsgBox "This user record was last changed on " & Date & _ 
		" at " & Time & "."
	End If
End Sub

Documentation Feedback