Mise a jour base acces sous vb

Bonjour,

j'arrive a mettre ma base de donnée a jour mais quand je ferme mon application la base donnée n'est pas changer (elle est juste le temps que l'application est ouverte et sous l'application) qd je regarde la base sous access, elle n'a pas changer

comment puis je faire ?

code :
Dim Myup

Myup = CreateObject("ADODB.Connection")
Myup.Open("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=Base de données1.mdb")
Dim rangees : rangees = CreateObject("ADODB.Recordset")
' MsgBox(">>>" & NomListBox.Text & "<<<<")
Myup.Execute("Update Presse Set Commentaire = '" & TextBox1.Text & "' Where Nom = '" & NomListBox.Text & "'")

Myup.Close()
rangees = Nothing
Myup = Nothing