vfp编程题练习及参考答案-一定要看

《vfp编程题练习及参考答案-一定要看》由会员上传分享，免费在线阅读，更多相关内容在行业资料-天天文库。

1、这是以往的考试题第一套编程题参考答案1.请打开D盘试题文件夹下的program1.prg文件，按要求完成以下程序：输入长方形的长L和宽W的值，计算长方形的面积S并输出，最后按原文件名存盘。program1.prgCLEARINPUT“请输入长方形的长：”TOLINPUT“请输入长方形的宽：”TOWS=L*W?”长方形的面积S=”,S2.请打开D盘试题文件夹下的program2.prg文件，编一个计费程序，按托运规定，行李不超过50千克时，运费为每千克0.15元，如超过50千克，其中50千克，运费按每千克0.15元，超过50千克部分的运费为每千克0.22元，输入行李重量，显示托运费。pr

2、ogram2.prgClearInput“请输入行李重量”toxIfx<=50Y=x*0.15ElseY=50*0.15+(x-50)*0.22Endif?“托运费=”,y3.请打开D盘试题文件夹下的program3.prg文件，编写循环程序实现：在rcda.dbf表中，统计姓“刘”的人数并输出。最后按原文件名存盘。program3.prgclearusercdan=0scanallforleft(姓名,2)=“刘”n=n+1endscan?nUse4.请打开D盘试题文件夹下的表单文件Program5.scx，要求在文本框Text1中输入某一年份，单击“计算”命令按钮则判断该年是否闰年

3、，如果是闰年，则在文本框Text2中显示“是闰年！”，如果不是闰年，则在文本框Text2中显示“不是闰年！”；单击“退出”命令按钮，则关闭表单。请编写“计算”和“退出”10命令按钮的代码，最后按原文件名存盘。判断某一年份是否闰年的方法如下：(1)年份能被4整除，但不能被100整除；(2)年份能被400整除；符合上述二个条件之一者即为闰年，如1996年是闰年。“计算”按钮click事件：nf=thisform.text1.valueifmod(nf,4)=0.and.mod(nf,100)<>0.or.mod(nf,400)=0y="是润年！"elsey="不是润年！"endifThis

4、form.text2.value=y10Thisform.refresh10“退出”按钮click事件：thisform.release第二套编程题参考答案1.请打开D盘试题文件夹下的program1.prg文件，按要求完成以下程序：输入梯形的上底A、下底B和高H的值，计算梯形的面积S并输出，最后按原文件名存盘。program1.prgCLEARINPUT“请输入梯形的上底：”TOAINPUT“请输入梯形的下底：”TOBINPUT“请输入梯形的高：”TOHS=（A+B）*H/2?”梯形的面积S=”,S2.请打开D盘试题文件夹下的program2.prg文件，按下列要求完成以下程序，要求

5、根据某人的收入计算他应交的个人所得税，方法如下：如果收入在1600元以内，则不用计税，显示“未达到交税标准”；如果收入超过1600元，则超过部分应交纳5%的个人所得税，计算并显示应交税额。最后按原文件名存盘。program2.prgClearInput“请输入个人输入”toxIfx<=1600?“未达到交税标准”ElseY=(x-1600)*0.05?“应交税额=”,yEndif3.请打开D盘试题文件夹下的program3.prg文件，编写循环程序实现：在10rcda.dbf表中，统计“出生日期”在1980年以前出生的人数并输出。最后按原文件名存盘。program3.prgclearu

6、sercdan=0scanallforyear(出生日期)<1980n=n+1endscan?nUse4.请打开D盘试题文件夹下的表单文件Program5.scx，要求在文本框Text1中输入一正整数N，单击“计算”命令按钮则计算N以内的所有奇数的乘积，并将结果显示在文本框Text2中，单击“退出”命令按钮，则关闭表单。请编写“计算”和“退出”命令按钮的代码，最后按原文件名存盘。“计算”按钮click事件：N=thisform.text1.valueS=1ForI=1toNstep2S=S*IEndforThisform.text2.value=S“退出”按钮click事件：thisf

7、orm.release第三套编程题参考答案1.请打开D盘试题文件夹下的program1.prg文件，按要求完成以下程序：输入长方体长L、宽W、高H，求长方体的表面积S并输出计算结果，最后按原文件名存盘。program1.prgCLEARINPUT“请输入长方体的长：”TOLINPUT“请输入长方体的宽：”TOWINPUT“请输入长方体的高：”TOHS=2*（L*W+L*H+W*H）?长方体的表面积S=”,S2.请打开D盘试题文件夹下的progr