以下是引用ppzlx在2012-12-2 18:10:44的发言:
我写了一个可是是死循环
use zyda
accept "请输入姓名:" to xm
index on 姓名 to xmsy
do while .not.eof()
seek &xm
disp
skip
enddo
use
我写了一个可是是死循环
use zyda
accept "请输入姓名:" to xm
index on 姓名 to xmsy
do while .not.eof()
seek &xm
disp
skip
enddo
use
程序代码:
accept "请输入姓名:" to xm use zyda index on 姓名 to xmsy seek xm do while .not.eof() disp skip if 姓名<>xm exit endif enddo use retu