Actualizar registros de un formulario continuo con un Recordset

Buenas de nuevo,

Sigo peleándome con el Recordset...

En el siguiento código intento recorrer los registros de un formulario continuo para actualizar el campo DATACOMGOV de cada registro con el valor de un cuadro de texto independiente DATACOMGOVPRAL:

Dim rst As Recordset

Do While rst.EOF = False
rst.Edit
rst!DataComGov = Me.TxtDataComGovPral
rst.Update
rst.MoveNext
Loop

Me.Recalc

No me funciona... Dónde está la equivocación?
Gracias