... y digo a medias xq la siguiente funcion solo me devuelve error si la cadena que le paso es menor que 17. xcierto, la cadena la saco de una bbdd y he comprobado que no hay valores nulos...
el codigo es el siguiente:
PRIVATE FUNCTION Cortar(cadena)
IF Len(cadena) > 17 THEN
Cortar = LEFT(CADENA,14) & "..."
ELSE
Cortar = cadena
END IF
END FUNCTION
y el error es:
error '80020009'
Ocurrió una excepción.
el explorador ademas me indica que es en la linea del if len...
un saludo.