例外：VB.NET和MS-ACCESS數據庫中的一個或多個所需參數沒有給出值

Question

我使用庫存系統。我的代碼有錯誤，它說

沒有給出一個或多個必需參數的值。

並且錯誤發生在cmd.ExecuteNonQuery()。這是什麼意思？有人能幫我嗎？順便說一句，這段代碼是用來扣除數據庫上的物料數量。對不起，我的英語不好。

con.Open() 
Dim sqlQry As String = "UPDATE [tbl_Stocks] 
         SET [Quantity] = [Quantity] - @QU 
         WHERE Products='" & lbPro.Text & "'" 
Using cmd As New OleDbCommand(sqlQry, con) 
    cmd.Parameters.AddWithValue("@QU", lbQuan.Text) 
    cmd.ExecuteNonQuery() 
    con.Close() 
    MsgBox("Save Successfully!") 
End Using 

Answer 1

我沒有看到任何缺陷。試試這個替代品（一個小調整通過參數發送兩個輸入端）

con.Open() 
Dim sqlQry As String = "UPDATE [tbl_Stocks] SET [Quantity] = [Quantity] - @QU " & 
         "WHERE Products=@prod" 
Using cmd As New OleDbCommand(sqlQry, con) 
    cmd.Parameters.AddWithValue("@QU", lbQuan.Text) 
    cmd.Parameters.AddWithValue("@prod", lbPro.Text) 
    cmd.ExecuteNonQuery() 
    con.Close() 
    MsgBox("Save Successfully!") 
End Using