Pedro,
You can use alines() to pull that string apart. In VFP6 you need to use:
n = alines( laNumbers, chrtran( lcString, ',', chr(13) )
In VFP7 a new parameter was added so that you can specify , as the delimiter.
>lcString = "18,21,33,45,150,999"
>
>I want extract numbers
>
>18
>21
>33
>45
>150
>999