da quel che vedo apri e chiudi la connessione senza però fare nulla, prova

Dim myCommand As New oleDbCommand(CommandText, myConnection)
myConnection.Open()
myCommand.ExecuteNonQuery()
myConnection.Close()