1-) Formun kayıt kaynağındaki sorguya StkId alanını ekle,
2-) Forma denetim kaynağı StkId olan txt_StkId adında metin kutusu ekle,
3-) iptal butonunun tıklandığında olayındaki kodları aşağıdakilerle değiştir.
DoCmd.GoToRecord , , acFirst
If IsNull(txtBarkod) Or txtBarkod = "" Then
Me.Undo
DoCmd.SetWarnings False
DoCmd.RunSQL "DELETE StkId, IrsaliyeNo FROM tblTahditsizCikis WHERE (((StkId) <> " & txt_StkId & ") AND ((IrsaliyeNo) = '" & txtIrsaliyeNo & "'));"
DoCmd.SetWarnings True
Recalc
TumDenetimPasif
Else
TumDenetimPasif
End If
bu şekilde iptal etmek istediğinde tabloya eklediği kaydı silecektir.