【解決方法】VB.NETを使用してms accessデータベースのレコードを削除する方法

誰かがこのコードの何が問題なのか教えてもらえますか? データベースのレコードは削除されません。 レコードの削除に失敗したというメッセージ ボックスが常に表示されます。 誰かがこれで私を助けてくれることを願っています。 私の質問を尊重してください。 ありがとうございました。

MS ACCESS DATABASE と VB.NET を使用しています

私が試したこと：

Private Sub deletebtn_Click(sender As Object, e As EventArgs) deletebtn.Click を処理します

If (MessageBox.Show(“このレコードを削除してもよろしいですか?”, “TIPAS FOODCOURT KIOSK”, MessageBoxButtons.YesNo, MessageBoxIcon.Question) = Windows.Forms.DialogResult.Yes) Then

試す

conn.Open()
Dim cmd As New OleDb.OleDbCommand(“DELETE FROM `tblaccts1` WHERE `StoreCODE`=[@STORE CODE]”、conn)
Dim i As New Integer
cmd.Parameters.Clear()
cmd.Parameters.AddWithValue(“@StoreCODE”, storeCode.Text)
cmd.ExecuteNonQuery()

i > 0 の場合
MessageBox.Show(“YOUR RECORD IS SUCCESFULLY DELETED”, “TIPAS FOODCOURT KIOSK”, MessageBoxButtons.OK, MessageBoxIcon.Information)
そうしないと
MessageBox.Show(“YOUR RECORD IS FAILED TO DELETE”, “TIPAS FOODCOURT KIOSK”, MessageBoxButtons.OK, MessageBoxIcon.Error)
終了条件

ex を例外としてキャッチ
MsgBox(ex.Message)
エンドトライ
conn.Close()
DGV_load()
DASHBOARD.imageload()

終了条件

サブ終了