第6章 结构化程序设计(2)(5)

VFP资料

6.3.2 分支结构例2:在学生表中查找并显示某学生的有关情况。(对上节课例1的程序进行改进，判断查找是否成功) *程序名称：CZ1.PRG SET TALK OFF CLEAR USE 学生 ACCEPT "请输入要查找的学生姓名：" TO XM LOCATE FOR 姓名=XM IF FOUND( ) && 判断是否找到该记录 DISP ENDIF 用另一方法： USE IF NOT EOF( ) SET TALK ON DISP RETURN ENDIF