Hola
guille y para que haces doble conversion aqui -> CDec(CDbl(TextCifraFinal.Text), simplificando lo puedes hacer con 1 y si vas a hacer restas o sumas, procura hacerlo siempre del mismo tipo CDec(txtCifraFinal.Text) - CDec(TextDif.Text). Saludos!
.