Assumming that the row source of your list box is
"Select ID, Name, Date, Notes from TblMyRecords"
Put this code behind your command button.
If IsNull(Me.LstRecords) Then
MsgBox "Please select a record from the list to delete", vbCritical
Else
DoCmd.SetWarnings False
If MsgBox("Are you...