Cargar en un array las palabras de una cadena

Podemos cortar una cadena en palabras y cargarlas en un array de "n" posiciones, donde "n" es el número de palabras contenidas en la cadena.

lc = "Bienvenidos a Visual FoxPro"
ln = ALINES(la, STRTRAN(ALLTRIM(lc), " ", chr(13)))
FOR i = 1 TO ln
    ? la(i)
ENDFOR

Luis María Guayán