Le Vendredi 9 Avril 2004 21:31, ron a écrit : > PUBLIC FUNCTION Cdate_calc(Dte AS String) AS String > dim ndate as date > ndate=cdate(Dte) > Datej.text = "" > RETURN ndate > > CATCH > message.Error("Verifiez votre saisie SVP !") > > END > Thank you Ron, I better understand now how work a function. °~ Jack ~°