Butonun tıklandığında olayına aşağıdaki kodu yazınız.

If MsgBox("Resim Tablosu Temizlensin mi?", vbYesNo, "Silme Onayı?") = vbNo Then

    Exit Sub

Else

    CurrentDb.Execute "DELETE * FROM resim "

    MsgBox "Tablo Silindi.", vbOKOnly, "Silme Onayı"

End If