The Delete method will delete the current record.
Sub DataSource_Delete() End Sub
DataSource Object
CanDelete