VFP编程试题 ,急!!!

来源:百度知道 编辑:UC知道 时间:2024/06/17 02:09:28
输入一个 姓名,在教师表查找是否有该教师,如果找到则显示该教师 的信息,若没有找到则显示“查无此人”? 怎么编的高手指教

use 教师表
mm="Y"
do while upper(mm)="Y"
clear
m_name=space(8)
@8,10 say "输入姓名" get m_name
read
loca for 教师=trim(m_name)
if found()
disp
else
wait "查无此人"
endif
@10 ,10 say "是否继续("Y/N") GET MM
READ
ENDDO