Hola
En principio el código debería ser así:
Código vb:
Ver originalSet cnPrueba = New Connection
'Establecer sus propiedades
With cnPrueba
.Provider = "Microsoft.Jet.oledb.4.0"
.ConnectionString = "prueba.mdb"
End With
cnPrueba.Open
cnPrueba.execute "UPDATE tbl_direccion SET nombre='" & Text1 & "', apellidos='" & Text4 & "',direccion='" & Text5 & "',ciudad='" & Combo1 & "',provincia='" & Combo2 & "',telefono='" & Text2 & "',cp='" & Text6 & "' Where id = " & ID & ""
Con este código tendría que cambiar los datos del registro (simpre cuando la sentencia UPDATE este bien realizada). Luego solo te queda volver a cargar el msflexgrid
--Saludos--