>CLEAR >CREATE CURSOR crsTest (myField Char(15)) >INSERT INTO crsTest VALUES([3.50]) >INSERT INTO crsTest VALUES([-4]) >INSERT INTO crsTest VALUES([a3.50]) >INSERT INTO crsTest VALUES([3a.50]) >INSERT INTO crsTest VALUES([5433.123]) >INSERT INTO crsTest VALUES([12345.6789]) >INSERT INTO crsTest VALUES([12.50a]) > >SCAN > ? myField , IIF(ALLTRIM(STR(VAL(myField),15,5)) = ALLTRIM(myField),[ is Number],[ not number]) >ENDSCAN >This test (wrongly) returns .F. if the input string has a leading "0" ...