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

VFP资料

6.3.2 分支结构例3:在学生表中查找并显示某学生的有关情况。如 果没找到，则显示提示信息。SET TALK OFF CLEAR USE 学生 ACCEPT "请输入要查找的学生姓名：" TO XM LOCATE FOR 姓名=XM IF NOT EOF( ) DISP ELSE ? "查无此人" ENDIF USE SET TALK ON RETURN