Private Sub Button8_Click(sender As Object, e As EventArgs) Handles Button8.Click Dim CODE As String CODE = txtCode.Text Try sql = "delete from SONGS where CODE = ? " ConnD() cmd = New OleDbCommand(sql, conn) cmd.Parameters.AddWithValue("CODE", CODE) cmd.ExecuteNonQuery() Console.WriteLine(Command) MsgBox("Deleted", MsgBoxStyle.Information) Form_Load() conn.Close() Catch ex As Exception MessageBox.Show(ex.Message) End Try End Sub
Form_Load
var
This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)