VFP程序填空题.docVIP

VFP程序填空题（134空） 说明： 无标识 …… 基本题 （92个空） * …… 难度题 （42个空） 目录 第7章 第8章 正文 第七章 结构化程序设计 1．逐条显示学生注册表.dbf中所有女生的记录 use 学生注册表 do while .not. eof() if 性别=”男” ? 　___ SKIP __　__ ____ LOOP _______ endif wait ”按任意键显示女生的记录:” display ______SKIP ____________ _____ ENDDO ___________ use 2．完成如下程序,其功能删除std1.dbf~std5.dbf 这五个表文件的末记录 n=1 do while n=5 db= STD +STR(N,1)____ use db _______ GO BOTTOM ________ dele pack ______ N=N+1_________ enddo use 3．存款利率： 年限nx1年，利率ll＝2% 年限nx=1年或nx3年，利率ll＝3% 年限nx=3年或nx5年，利率ll＝4% 年限nx=5年，利率ll＝5% 根据输入存款年限,求出相应的利率 input “请输入存款年限：” to __ NX _____ _____ DO CASE _______ case nx1 ll=0.02 CASE NX3 ll=0.03 case nx5 ll=0.04 otherwise ll=0.05 endcase ?”存款利率是：”，ll 4．下面是计算100以内偶数之和的程序，N是偶数个数，S是偶数之和。 clea all store 0 to k,n,s do while K=100 k=k+1 if MOD(K,2)=0 n= n+1 ___ S=S+K _____ endif enddo ?n,s 5．对 stud表中数学及格的加5分，不及格的加10分。 set talk off use stud do while .NOT.EOF() if 数学60 REPL 数学 WITH 数学+10 else repl 数学with 数学+5 endif _____ SKIP ________ enddo *6．职工数据库表中有”工资表”和”职工表”,其中工资表包括字段(职工号,基本工资,奖金,扣款,实发工资),职工表中包括字段(职工号,职工姓名,年龄,)其中工资表中实发工资的字段值为空,求出实际的实发工资的字段值,并在屏幕上显出实发工资=1000的职工姓名, 实发工资. clea sele a use 职工表 INDEX ON 职工号 TO ZGH sele b use 工资表 REPL ALL实发工资 WITH 基本工资+奖金-扣款 SET RELA TO 职工号 INTO A list a.职工号,姓名, 实发工资 FOR 实发工资=1000______ close all * 7．循环输入学生的姓名,在学生表中查找，若找到则显示学生的情况,若没有则显示”没有某某学生”,直到用户停止输入 use 学生 store “Y” to m DO WHILE .T. accept “请输入要查询的学生姓名:” to xm LOCA FOR 姓名=XM if !eof() ?”学号”+学号,”姓名”+姓名 else ?”没有 +XM+”学生” _ endi wati”是否继续查找(y/n) ?” to ___ M ___ if upper(m)=”Y” ____ LOOP ______ else EXIT Endif ENDDO use 8、已知学生档案数据库表（XSDA.DBF）中，有学号、姓名、性别字段，要求将每个男生信息显示在屏幕上，请将程序补充完整。 clear clear all USE XSDA @1,16 say “学号 姓名 性别” @2,16 say “********************************” n=1 s