Usando il metodo execute della Connection:
codice:
Dim StringaSQL as String
StringaSQL = "UPDATE NomeTuaTabella SET NomeTuoCampo = " & NuovoValoreCampo & "  where NomeTuoCampo = " & VecchioValoreCampo 
NomeTuaConnessione.Execute (StringaSQL)
Ovviamente la sintassi puo' variare in dipendenza del tipo di dati contenuti nel campo e al tipo di database che usi.

Spero sia utile.

Ciauz

CHico