Как сделать функцию удаления в VB.NET использование SQL

---

Короче говоря, я хочу сделать функцию SQL delete либо по порядковому местоположению, либо по gridview.selectedrow. Я пытался и не раз терпел неудачу. Я прошу помощи в решении этого вопроса.

Private Sub Single_delete()
        Try

            Dim sqlcon As New SqlConnection("Data Source=(LocalDB)\MSSQLLocalDB;AttachDbFilename=c:\users\jj\documents\visual studio 2015\Projects\WindowsApplication3\WindowsApplication3\Database1.mdf;Integrated Security=True")
            Dim sqladapt = New SqlDataAdapter("Select * from " + "[" + TreeView1.SelectedNode.Text.ToString, sqlcon)

            sqlcon.Open()
            Dim cmd As SqlClient.SqlCommand
            Dim sql As String = "Delete from " + "[" + TreeView1.SelectedNode.Text.ToString + "]" + " where Id= " + Database1DataSet.Tables(TreeView1.SelectedNode.ToString).Columns("Id").Ordinal.ToString
            cmd = New SqlClient.SqlCommand(sql, sqlcon)

            cmd.Parameters.AddWithValue("@id", Database1DataSet.Tables(TreeView1.SelectedNode.ToString).Columns("Id").Ordinal.ToString)

            cmd.ExecuteNonQuery()
            sqlcon.Close()

            MessageBox.Show("Record deleted")
        Catch ex As Exception
            MsgBox(ex.Message)

        End Try

    End Sub

Я ценю вашу помощь.

Что я уже пробовал:

Я попытался переключиться между порядковыми номерами, используя столбец "ID" в качестве источника текста, а также попытался сделать выбранное удаление сетки. Когда я сделал выбранное удаление gridrow, появилось сообщение, в котором говорилось, что запись удалена, но ни одна запись не была удалена из базы данных.

---