having error at updating database

[Tengkorak]

to determine whether the data has been deleted, use:

cmdDelete.CommandText = "DELETE FROM Table2 WHERE ID = " & cint( TextBox1.Text )
 
Dim iRs As Integer = cmdDelete.ExecuteNonQuery()
if iRs > 0 then
    MessageBox.Show("         Records Deleted!!            ")
end if