VFP考试题型.docx

1、VFP考试题型VFP程序考试题型一、表单操作1按要求在考生文件夹下完成下列操作：1）按下图设计一表单文件formcalc1。设置表单(名称为form1)标题为“人民币兑换美元”。2）表单中添加两个标签，设置第一个标签(label1) 标题为 “输入人民币”,第二个标签(label2) 标题为 “兑换为美元”。 3）添加两个文本框(名称分别为text1和text2)，显示美元的文本框（text2）设为只读。4）表单中添加一个命令按钮，其(名称为command1)的标题为“兑换”，编写“兑换” 命令按钮的代码,要求运行表单时,在文本框（text1）中输入人民币后，单击“兑换”命令按钮,算出兑换的的

2、美元（人民币兑换成美元的比例为：1美元=7元人民币），在文本框（text2）中显示结果。操作完成后将操作结果保存在考生文件夹下。2按要求在考生文件夹下完成下列操作：1）按下图设计一表单文件formdbca12。设置表单(名称为form1)标题为“人数统计”。2）在数据环境中添加ygb.dbf。3）表单中添加两个文本框，(名称分别为text1和text2)，显示人数的文本框设为“只读”。4）表单中添加一个命令按钮(名称为command1)的标题为“统计人数”，编写此命令按钮的代码,要求运行表单时,在在文本框（text1）中输入性别“男”（或“女”），统计文本框（text1）指定性别的人数.将结果

3、显示在文本框（text2）中。 操作完成后将操作结果保存在考生文件夹下。知识点：VFP部分/表单设计3、 按要求在考生文件夹下完成下列操作：1）按下图设计一表单文件formdbca19。设置表单(名称为form1)标题为“班级人数统计”。2）在数据环境中添加student.dbf。3）表单中添加一个列表框(名称为list1)，列表框中有4个选项：“2005会计一”,“2005会计二”, “2005会计三”, “2005会计四”。在表单中添加一个标签(名称为label1),标题为”选择班级名称”。表单中添加一个文本框(名称为text1)，此文本框设为只读。4）表单中添加一个命令按钮(名称为com

4、mand1)的标题为“统计人数”，编写此命令按钮的代码,要求运行表单时, 在列表框选择班级，按列表框指定班级统计人数，将结果显示在文本框（text1）中。 操作完成后将操作结果保存在考生文件夹下。3按要求在考生文件夹下完成下列操作：1）按下图设计一表单文件formdbca20。设置表单(名称为form1)标题为“按班级统计学生平均分”。2）在数据环境中添加student.dbf。3）表单中添加一个组合框(名称为Combo1)，组合框中有4个选项：“2005会计一”,“2005会计二”, “2005会计三”, “2005会计四”。 在表单中添加一个标签(名称为label1),标题为”选择班级名称

5、”。在表单中添加一个文本框(名称为text1)，此文本框设为只读。4）表单中添加一个命令按钮(名称为command1)的标题为“统计平均分”，编写此命令按钮的代码,要求运行表单时, 在组合框选择班级，按组合框指定班级统计平均分，将结果显示在文本框（text1）中。 操作完成后将操作结果保存在考生文件夹下。4. 按要求在考生文件夹下完成下列操作：1）按下图设计一表单文件formdbup37。设置表单(名称为form1)标题为“修改员工信息”。2）在数据环境中添加ygb.dbf。3）表单中添加三个标签和三个文本框，分别用于显示当前记录的员工编号、姓名和联系电话，且将显示员工编号的文本框设为只读。4

6、）表单中添加二个命令按钮,第一个命令按钮(名称为command1)的标题为“上一条”，第二个命令按钮(名称为command1)的标题为“下一条”。编写这两个命令按钮的代码,要求运行表单时,单击“上一条” 命令按钮(command1)时，记录指针移动到上一条记录，单击“下一条” 命令按钮(command1)时，记录指针移动到下一条记录。然后在三个文本框(text1、text2和text3)中分别显示当前记录的学号、姓名和地址。 操作完成后将操作结果保存在考生文件夹下。5按要求在考生文件夹下完成下列操作：1）按下图设计一表单文件formlogin41。设置表单(名称为form1)标题为“系统登陆”

7、。2）设置“工资管理系统”标签(label1)字号设为20，字的颜色为红色 。3）要求在运行表单时，向输入密码的文本框（text2）中输入字符，回显字符显示的是“*”。 4）编写“退出”命令按钮（command2）的代码,要求运行表单时,单击“退出”命令按钮时,关闭表单。 操作完成后将操作结果保存在考生文件夹下。6.在考生文件夹下完成如下操作： 设计名为formfont102的表单（控件名为form1，文件名为formfont102）。表单的标题设为设置字体格式。表单中有一个标签（名称为Label1,标题为“选择字体”）,一个组合框（名称为Combo1）、一个文本框（名称为Text1）和两个命

8、令按钮设置（名称为Command1）和退出（名称为Command2）。文本框的字体大小设为16 运行表单时，组合框中有三个条目宋体、黑体、隶书可供选择，在组合框中选择字体后，如果单击设置命令按钮，按组合框选定的字体设置文本框中内容的字体。单击退出按钮关闭表单。 操作完成后将操作结果保存在考生文件夹下。7在考生文件夹下完成如下操作：1）设计名为formfont105的表单（控件名为form1，文件名为formfont105）。表单的标题设为设置字体格式。2） 表单中添加一个列表框（名称为listbox1）、列表框中有三个条目宋体、黑体、隶书可供选择。3） 表单中添加一个标签（名称为label1）

9、，标题为“湖南财经高等专科学校”，同时设置此标签字号为20，字的颜色为红色。4） 表单中添加两个命令按钮设置（名称为Command1）和退出（名称为Command2）。编写其代码，要求运行表单时，在列表框中选择字体后，如果单击设置命令按钮，按列表框选定的字体设置标签中内容的字体。单击退出按钮关闭表单。 操作完成后将操作结果保存在考生文件夹下。二、程序填空1、程序功能：求150所有整数的立方和。 SET TALK OFF CLEAR （1） X= 1DO WHILE X5时，y=x-5；当x3 Y= (1) ELSE Y=X*X+19 (2) ?Y RETURN答案：（1） X-5 （2） EN

10、DIF知识点：双分支结构3、计算分段函数的值：当x0时，y=15；当x0Y= (1) CASE X0 Y= -5 OTHERWISE Y=0 ENDCASE ? ”Y=”， RETURN答案： （1） 15 （2） Y知识点：多分支结构4、设eee.dbf为职工数据表，姓名为一个字段名，查找名为“王林”的职工，若找到显示该员工信息，否则显示“查无此人”信息。 SET TALK OFF （1） LOCATE FOR 姓名=”王林” IF （2） DISP ELSE ？” 查无此人” ENDIF USE SET TALK ON答案： （1） USE EEE （2） FOUND（）或FOUND()=

11、.T. 或NOT EOF()或EOF()=.F.知识点：记录查找，双分支5、下面程序将“春光明媚”先纵向显示出来然后再横向显示“春光明媚” 请填空完成该程序：Set talk offClearSTORE “春光明媚” TO XYN=1DO WHILE N8?SUBSTR( (1) )N=N+2ENDDO? SUBSTR( (2) )?SUBSTR(XY,1,4)Return答案：（1） XY,N,2 （2） XY,5,4知识点：单循环结构6、输入一个三位整数，将其反向输出。如输入123，输出321。set talk offinput 请输入一个三位数 to （1） （2）=100*mod(a,

12、10)+10*mod(int(a/10),10)+mod(int(a/100),10)?breturn答案：(1) a(2) b知识点：顺序结构7、 子程序调用主程序：t1.prgSET TALK OFFSTORE NH TO k1,k2DO t2?k1+k2 屏幕上显示的结果是 (1) RETURN子程序：t2.prgPRIVATE k1k1=k2+100?k1 屏幕上显示的结果是 (2) RETURN答案：(1) NH100(2) NHNH知识点：子程序调用7、子程序调用主程序：z.prgSET TALK OFFSTORE 4 TO y1, y2, y3y1=y1+1? y1+y2+y3

13、&屏幕上显示的结果是 (1) DO z1? y1+y2+y3 &屏幕上显示的结果是 (2) RETURN子程序：z1.prgy2=y2+1DO z2y1=y1+1RETURN子程序：z2.prgy3=y3+1RETURN TO MASTER答案：(1) 13(2) 15知识点：子程序调用8、下面的程序实现了多次在“aaa.dbf”表中查找记录的操作。请在建立了aaa.dbf表的基础上，任意输入一位员工的“编号”，若查找到相应的记录则显示，否则给出提示“无此人！”；根据提示输入“N”或“n”则结束程序的运行。SET TALK OFFCLEARUSEaaa.dbfDO WHILE .T. CLEA

14、R ACCEPT 请输入员工编号: TO ZHGNO LOCATE FOR 编号= ZHGNO IF （1） DISPLAY 编号,姓名,部门代号,职称,基本工资 ELSE ?无此人！ ENDIF WAIT 继续查询？(Y/N): TO P IF UPPER(P) （2） USE EXIT ENDIFENDDOSET TALK ONRETURN答案：(1) NOT EOF() 或EOF()=.F. 或FOUND() 或FOUND()=.T.(2) Y知识点：表的操作9、下面程序输出如图所示的图形，请将程序补充完整。*Set talk offclearFOR N=4 TO 1 STEP -1?

15、（1） (3-N)FOR M=1 TO 2*N-1? （2） ENDFORENDFORSet talk onreturn答案：(1) SPACE (2) * 知识点：双循环结构三、编程题（一）求和类型的程序1、编程计算S=1+1/3+1/5+1/49。2、编程计算100到1000之间能被4除余1的所有数之和。参考答案：clears=0for i=100 to 1000 if i%4=1 s=s+i endiendf?sretu3、计算100到500中所有素数的和。（所谓素数是指除了1和它本身外，没有任何因子被该数整除）参考答案：cleas=0for i=100 to 500 for j=2 t

16、o i-1 if i%j=0 exit endif endf if j=i s=s+i endiendf?sretu4、编程计算1/4！+1/8！+1/10！ 5.求所有五位数中，千位数字等于个位数字的数之和。6. 求四位数中所有回文数的和。（所谓“回文数”，是指该数从左往右念与从右往左念相同，例如：1221等）参考答案：cleas=0for a=1000 to 9999 x1=int(a/1000) x2=int(a/100)%10 x3=int(a/10)%10 x4=a%10 if x1=x4 and x2=x3 s=s+a endifendf?sretu7. 已知数列f(n)：f(1)

17、=1，f(2)=3，当n=3,4,5,时，f(n)=f(n-1)-f(n-2)。试求出100以内最大的自然数n使得此数列的前n项之和第3次等于0。答案：18参考答案：cleas=0n=0dime f(50)store 1 to f(1)f(2)=3for i=3 to (50) f(i)=f(i-1)-f(i-2) ?f(i)endft=0do while .t. n=n+1 s=s+f(n) if s=0 t=t+1 endif if t=3 exit endifendd?nretu（二）统计个数的类型1、统计100到1000中能被5或9整除的所有数的个数。2、求四位数中所有“回文数”的个数

18、。（所谓“回文数”，是指该数从左往右念与从右往左念相同，例如：121，323等）3、统计所有五位数中万位数字大于等于个位数字的数的个数。4. 计算100到1000中所有素数的个数。（所谓素数是指除了1和它本身外，没有任何因子被该数整除）（三）其他类型1、已知数列的前三个数分别为1，1，2，以后每个数为前三个数之和，求第48项。2、已知S=1*2*3*N，当S超过300000时的最小N值。3、有50个学生去买小吃，一共花费100元。其中大学生每人3元，中学生每人2元，小学生每人1元，求这种分配方法一共有多少种。4、求和S=1!+4!+7!+(3k+1)!(其中K=0)，直到S180000为止，计算此时K的值。5、求出1798和1960的最大公约数。 6、一球从200m高度自由落下，每次落地后反跳回原高度的一半，再落下。求它在第10次落地时，共经过多少米？7闰年是指年号能被4整除，但不能被100整除，或者能被400整除的年份。求2000年到2080年之间共有多少闰年。8求100以内最大的自然数n，使得从1开始的连续n个自然数的倒数之和小于3.5。