exam6.prg

专业数据库程序

clear
use sb.dbf
i=1
do while !eof() 
skip 1
i=i+1
if price>10000 
?no,name,price
endif
enddo
use