hola perdon por la otra pregunta probe la funciona y me funciono :P. pero bue
, ahora el tema que me paso es que quiero ejecutar la consulta pero no me funciona y no se porque
a=len(lcApellido)
sql= "Select ctaapelli,ctadni From cuentas Where right(ctaapelli,A)= '"& lcApellido &"'"
espero ahora si no estar preguntando una pabada