临时写的2层嵌套的代码, 供参考~~~ 看过你在另贴中贴出的代码, 如果那段代码是你自己编写的话, 你在这方面应该不会有什么问题的吧??
** proc test
clea
lssec =seco()
do whil seco()-lssec<30
set colo to rgb(rand()*254,rand()*254,rand()*254,,,)
@ rand()*20,rand()*80 say "这是外层嵌套~ "
do whil .t.
wait wind at rand()*20,rand()*80 "这是内层嵌套~ " time 0.1
exit
enddo
enddo
messagebox("嵌套运行 已结束, 你明白了嘛 ??","")
retu