clear all
set talk off
set safety off
set stat bar off
do form E:\实例\main.scx
Read Events
set talk on
set safety on
return

这个主程序代码是个死循环．哪个大哥帮我解决一下．
谢谢

把read events给放到main.scx里去
然后在main.scx中放置个退出按钮，写入Thisform.release
clear event