Rs!cadastro = Format(dtcad.Value, "yyyy/mm/dd")
Rs!datanasc = Format(dtnas.Value, "yyyy/mm/dd")
Gravando dados nesse modo, não precisa formatar a data. Você pode colocar o formato brazuca mesmo.
Rs!LIMITE = Replace(txtlimite.Text, ",", ".")
Não se esqueça que se o seu valor foi formatado (tipo 1.189,52), além de substituir a vírgula por ponto vc deve tb substituir o ponto por nada:
Rs!LIMITE = replace(Replace(txtlimite.Text, ",", "."),".","")
