>I want to locate and extract a YEAR in a text string (a reference). The year is always 4 digits as in 'the book was published in 1806 or later'. Is there an easier way to do this than a rather clumbsy parsing prg I have written.
cPhrase = "the book was published in 1806 or later"
nYear = VAL( CHRTRAN( UPPER( cPhrase ), "ABCDEFGHIJKLMNOPQRSTUVWXYZ ,.:!@#$%^&*()" + CHR(34), "" ))
censored.