selection of a string

[Angelo2449]

Hello everyone,
I have just written a string (1000), from lisp I would like to select it > (setq oldlist (entget (car (entsel)))) < replacing therefore > (entsel) < with ????? ? ? .
Thank you.

 

[Cristallo]

(entlast)

 

[Angelo2449]

thanks to crystal