Visual Basic - Duda Cadena

Hola a todos,tengo una aplicacion enlazada con dao a una bd access 2000, en ella tengo un campo llamado DIA30ET,tengo otro campo llamado DIA31ET, etc

Mediante cajas de texto debo saber en que DIA capturare informacion, es decir, si debo registrar en el dia 31 entonces el campo se llama DIA31ET por esto debo llamar a dicho campo, pero no encuentro como

data1.recordset("DIA" & "31ET") = a valor

pero me marca error que no pertenece al recordset, no encuentro la manera de llamar al campo DIA31ET para grabar el valor generado no se si me explico

intentale asi Martin:

dim d as string
dim e as string
d = "DIA"
e = "31ET"
data1.recordset(d & e) = a valor

Gracias XHkrElite , funciono perfecto,

Saludos y feliz 2011