Hi, Лисонька !

ПРОГРАММНО прерывание цикла возможно - только по EXIT или RETURN
(кстати и не обязательно, чтобы он был с -1)
Это - как раз и есть единственный ответ на задававшийся вначале вопрос. :)

А прерывание по нажатию клавиши - все равно ведь тоже происходит с помощью этих же команд.
Хотя можно еще определить прерывание цикла DO WHILE и в самом условии (т.е. без этих команд):

DO WHILE LASTKEY()#27
...
ENDDO

Правда, не всегда это бывает удобно, тогда вместо этого после какой-то команды, где происходит приостановка и нужно сделать выбор, вставляют:
IF LASTKEY()=27
EXIT
ENDIF

А в твоем последнем примере - для чего вот так, вручную, прерывать цикл FOR...ENDFOR ? Просто так, потому что надоело ждать, когда это все там сосчитается? :)

Цикл DO WHILE <условие> , конечно же еще будет прерываться ПРОГРАММНО и по указанному условию (без EXIT и RETURN).

Само собой. Другое толкование этой фразы - было бы и вовсе бессмысленно :)
Просто, скажем, условие:
DO WHILE EMTY(a)=.T.
Абсолютно аналогичео
DO WHILE EMTY(a)
Но первое как-то не принято среди большинства программистов. Может у теоретиков разве что... :) То же самое, кстати, когда вместо RETURN.T. пишут просто RETURN.

2Лисонька
(то, что я написал чуть выше - это на замечание Urri, извиняюсь, забыл уточнить)

Лисонька иногда, бывает, так запишешься, что твой цикл зацикливается на самом себе, а клавиша ESC не помогает.
Если такое бывает... :) - выполняй сначала сомнительный код через Debugger - точно никогда не зациклишься. :)
Или уж ставь такую возможность прерывания на период отладки - в самом начале программы - пока достаточно не напрактикуешься.