Kodlarınızda yeni birim fiyat kısmını aşağıdaki gibi düzenleyin.

If Me.yeniBirimFiyat = 0 Then

ElseIf MsgBox("yeniBirimFiyati girecekseniz 'Hayır'ı tıklatın", vbYesNo) = vbNo Then

Exit Sub

Else

End If

Formdaki kontrolleri temizlemek için girdiğiniz kodları da silmeniz gerekli, denetim kaynağından değer hesaplaması yaptırdığınız kontrolleri temizlemek için bu yöntemi kullanamazsınız değer atama hatası verir. Denetim kaynağında hesaplanma yaptırmak yerine ilgili alanların güncellenme sonrasında kod ile işlem yaptırmanız daha doğru olur ve temizleme kodlarınız o takdirde doğru çalışır.