12/09/2019, 13:17
Merhaba,
Yukarıdaki kod bloğu ile listedeki seçilen malzemeyi sildiriyorum kod çalışıyor fakat hiç bir malzeme seçmeden sil butonuna tıkladıklarında program hata veriyor. Bunu önlemek için ne yapmam gerekiyor.
Kod:
If MsgBox("" & Me.lstMalzeme.Column(2) & " Malzemesini Listeden Çıkarmak İstediğinize Emin Misiniz ?", vbCritical + vbYesNo, "Deneme") = vbYes Then
DoCmd.SetWarnings False
DoCmd.RunSQL "DELETE FROM kullanici_girisi WHERE [no]=" & Me.lstMalzeme.Column(0)
DoCmd.SetWarnings True
Me.lstMalzeme.Requery
Else
Exit Sub
End IfYukarıdaki kod bloğu ile listedeki seçilen malzemeyi sildiriyorum kod çalışıyor fakat hiç bir malzeme seçmeden sil butonuna tıkladıklarında program hata veriyor. Bunu önlemek için ne yapmam gerekiyor.