Visual Basic - Ayuda con recordset

POR FAVOR como puedo hacer que el campo del recordset sea variable?
la variable (STRING) es CODCAMPO

RScodigo.MoveFirst
MSHFlexGrid1.Row = 0

Do Until RScodigo.EOF
MSHFlexGrid1.Row = MSHFlexGrid1.Row + 1
RScodigo!CODCAMPO = MSHFlexGrid1.TextMatrix(MSHFlexGrid1.Row,
Ncol)
RScodigo.Update
RScodigo.MoveNext
Loop

si lo pongo de esta manera me da un error de no encuentra el campo en
el recordset

GRACIAS

Tienes que agregar el campo en tu recordset asi:

RScodigo.Fields.Append "CODCAMPO", adChar, 10, adFldUpdatable

Saludos desde Lima