To Modify An existing Record in DataBase
Dim mcmd As OleDbCommand
mcmd = New OleDbCommand("update notice set notice='" & ta.Value & "' where noticeno='" & tb1.text & "'", Application("con"))
Dim r As Integer
r = mcmd.ExecuteNonQuery
To Delete An existing Record in DataBase
Dim dcmd As OleDbCommand
dcmd = New OleDbCommand("delete from notice where noticeno='" & dl2.SelectedItem.ToString & "'", Application("con"))
Dim r As Integer
r = dcmd.ExecuteNonQuery