Kludgy way to avoid replacment is to use EVALUATE() or macro expansion -- since these are executed at runtime and not during compile into pcode.

cFieldName = "SOMESTRING"
x = THISFORM.&cFieldName..Value

cExpr = "THISFORM.SOMESTRING.Value"
x = EVALUATE(cExpr)