vfp程序改错 计算机和英语,vfp程序改错讲述.doc

vfp程序改错讲述

Visual Foxpro程序改错

〖第1题〗(练习题所在文件夹:163)*题目：该程序完成口令检验功能。输入三次不正确退出。*注意：不可以增加或删除程序行，也不可以更改程序的结构。SET TALK OFFCLEARass1="AbCdEf"TT=1DO WHILE TT<4@10,20 SAY "请输入口令:"SET CONSOLE OFFACCEPT TO assSET CONSOLE ON**********FOUND**********IF ass1=ass CLEAR ?"欢迎使用本系统!"**********FOUND********** LOOPELSE**********FOUND********** TT=TT-1 CLEAR ?"口令错，按任意键再输入一次！" WAIT" "ENDIFENDDORETURN答案： 1). IF UPPER(ass1)==UPPER(ass) 或 IF UPPER(ass1)==UPPER(ass) 2). EXIT 3). TT=TT+1 或 TT=1+TT

〖第4题〗(练习题所在文件夹:500)*题目：ZHG.DBF是一个职工信息文件，其中包含编号(C 5)、姓名* (C 8)、性别(C 2)、政治面貌(C 4)、出生日期(D 8)等字* 段。性别用字符串"男"或"女"表示，政治面貌用字符串"* 党员"、"团员"或"群众"表示。此文件已按政治面貌建立* 了索引，索引文件名是ZHG_ZHZH.IDX。* 程序功能是：显示输出所有政治面貌为"群众"的女职工的* 姓名和出生日期(每行输出一个职工的信息)在屏幕上*注意：不可以增加或删除程序行，也不可以更改程序的结构。set talk offclear***********FOUND**********USE ZHGSEEK "群众"***********FOUND**********DO WHILE !EOF()IF 性别="女"DISP 姓名,出生日期***********FOUND**********ENDDSKIPENDDOUSESET TALK ON答案： 1). USE ZHG INDEX ZHG_ZHZH 2). DO WHILE政治面貌="群众" 或 DOWHILE政治面貌='群众' 或 DOWHILE政治面貌=[群众] 3). ENDIF

〖第5题〗(练习题所在文件夹:105)*题目：在RSH.dbf 中，查找职工赵红的工资，如果工资小于200元，* 则增加100元；如果工资大于等于200元且小于500元时，则增* 加50元；否则增加20元。最后显示赵红的姓名和工资。*注意：不可以增加或删除程序行，也不可以更改程序的结构。CLEARUSE RSH***********FOUND**********LOCATE FOR 姓名 =赵红DO CASE CASE 工资< 200 REPLACE 工资 WITH 工资+ 100 CASE 工资< 500 REPLACE 工资 WITH 工资+ 50 OTHERWISE REPLACE 工资 WITH 工资+ 20ENDCASE***********FOUND**********LIST 姓名,工资USE答案： 1). LOCATE FOR 姓名="赵红" 或 LOCA FOR 姓名='赵红' 或 LOCA FOR 姓名="赵红" 或 LOCATE FOR 姓名=[赵红] 或 LOCA FOR 姓名=[赵红] 或 LOCATE FOR 姓名='赵红' 2). DISP 姓名,工资 或 ?姓名,工资 或 DISPLAY 姓名,工资

〖第6题〗(练习题所在文件夹:174)*题目：计算S=2+4+6+...+98+100的程序。*注意：不可以增加或删除程序行，也不可以更改程序的结构。store 0 to s,i***********FOUND**********do i<=99***********FOUND**********i=i+1 s=s+ienddo?"s=",s答案： 1). do while i<=99 或 do while i<100 或 dowhilei<=98 或 dowhilei<99 2). I=2+