vb.net - データグリッドビューでファイルを削除できません

Question

私はこのコードを使用しています：

Private Sub btnDelete_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnDelete.Click
    Dim result = MessageBox.Show("Delete This Record?", "Confirm Action", MessageBoxButtons.YesNo, MessageBoxIcon.Question)
    If result = DialogResult.Yes Then
        Dim sqldelete As String
        sqldelete = "DELETE * FROM [product info] WHERE Barcode='" & DataGridView1.CurrentRow.Cells(6).Value.ToString & "'"
        Dim adapter As New OleDbDataAdapter(sqldelete, strcon)
        Dim dt As New DataTable("[product info]")
        adapter.Fill(dt)
        DataGridView1.DataSource = dt

        RefreshDGV()
    End If

datagridview で削除したい項目を選択すると、次のエラーが表示されます。

「1 つ以上の必須パラメーターに値が指定されていません。」

以前は削除ボタンのコードが機能していたため、このエラーについてはよくわかりません。