Visual Basic - Datos Decimales

Hola a todos.
Tengo el siguiete problema.Una base de datos con access.Un campo llamado riego definido como decimal.Escala 2.Precision digamos 5 lugares decimales 2.
Cuando en el codigo del programa le digo :
text1.text=\"2.5\"
!riego=cdec(text1.text)
Me da el error \"la escala de valores decimales trunco los datos\"
He cambiado el valor de la escala de la precision y todo lo que se me ha ocurrido y sigue sin funcionar.Estoy desesperado me podeis echar una mano?

Me da igual cualquiermetodo con tal de poder meter un dato decimal en un campo de access

Mil gracias

Ya probaste la funcion ROUND ???

Debes decir que lo que esta en el textbox es numerico ejemplo si en una variable pones el siguente valor text1.text+text2.text suponiendo que la primera fuera 1 y la segunda 2 el resultado seria 12, de esta forma val(text1)+val(text2) el resultado seria 3. Prueba poniendo val antes del text.