No se actualizan los registros o cambios en la base de datos

[agustin_09]

Hola estoy trabajndo en un proyecto en vb.net y tengo conectada la base a una base de datos de acces..

el codigo es este, pero despues de borrar no se actualiza nada, si cierro el test y vuelvo a abrirlo la base est como al principio, la base no esta en solo lectura.

Public Class Form1

Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
'TODO: This line of code loads data into the 'Base_de_datos1DataSet.Tabla1' table. You can move, or remove it, as needed.
Me.tabla1adapt.Fill(Me.database.Tabla1)
database.AcceptChanges()

End Sub

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click


Me.tabla1direct.RemoveAt(Me.tabla1direct.Position)



MsgBox("New Record added to the Database")

End Sub

Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
Me.tabla1adapt.Update(Me.database.Tables("Tabla1") )
End Sub
End Class