《数据库技术与应用》（VFP）操作考试题型一、表单操作1．按要求在考生文件夹下完成下列操作：1）按下图设计一表单文件formcalc1。
设置表单(名称为form1)标题为“人民币兑换美元”。
2）表单中添加两个标签，设置第一个标签(label1) 标题为“输入人民币”,第二个标签(label2) 标题为“兑换为美元”。
3）添加两个文本框(名称分别为text1和text2)，显示美元的文本框（text2）设为只读。
4）表单中添加一个命令按钮，其(名称为command1)的标题为“兑换”，编写“兑换”命令按钮的代码,要求运行表单时,在文本框（text1）中输入人民币后，单击“兑换”命令按钮,算出兑换的的美元（人民币兑换成美元的比例为：1美元=7元人民币），在文本框（text2）中显示结果。
操作完成后将操作结果保存在考生文件夹下。
command1的click代码:thisform.text2.value=val(thisform.text1.value)/72．按要求在考生文件夹下完成下列操作：1）按下图设计一表单文件formdbca12。
设置表单(名称为form1)标题为“人数统计”。
2）在数据环境中添加ygb.dbf。
3）表单中添加两个文本框，(名称分别为text1和text2)，显示人数的文本框设为“只读”。
4）表单中添加一个命令按钮(名称为command1)的标题为“统计人数”，编写此命令按钮的代码,要求运行表单时,在在文本框（text1）中输入性别“男”（或“女”），统计文本框（text1）指定性别的人数.将结果显示在文本框（text2）中。
操作完成后将操作结果保存在考生文件夹下。
代码:count for 性别=alltrim(thisform.text1.value) to xthisform.text1.value=x知识点：VFP部分/表单设计3、按要求在考生文件夹下完成下列操作：1）按下图设计一表单文件formdbca19。
设置表单(名称为form1)标题为“班级人数统计”。
2）在数据环境中添加student.dbf。
3）表单中添加一个列表框(名称为list1)，列表框中有4个选项：“2005会计一”,“2005会计二”, “2005会计三”, “2005会计四”。
在表单中添加一个标签(名称为label1),标题为”选择班级名称”。
表单中添加一个文本框(名称为text1)，此文本框设为只读。
4）表单中添加一个命令按钮(名称为command1)的标题为“统计人数”，编写此命令按钮的代码,要求运行表单时, 在列表框选择班级，按列表框指定班级统计人数，将结果显示在文本框（text1）中。
操作完成后将操作结果保存在考生文件夹下。
代码: count for 班级= thisform.list1.value to xthisform.text1.value=x3．按要求在考生文件夹下完成下列操作：1）按下图设计一表单文件formdbca20。
设置表单(名称为form1)标题为“按班级统计学生平均分”。
2）在数据环境中添加student.dbf。
3）表单中添加一个组合框(名称为Combo1)，组合框中有4个选项：“2005会计一”,“2005会计二”, “2005会计三”, “2005会计四”。
在表单中添加一个标签(名称为label1),标题为”选择班级”。
在表单中添加一个文本框(名称为text1)，此文本框设为只读。
4）表单中添加一个命令按钮(名称为command1)的标题为“统计平均分”，编写此命令按钮的代码,要求运行表单时, 在组合框选择班级，按组合框指定班级统计平均分，将结果显示在文本框（text1）中。
操作完成后将操作结果保存在考生文件夹下。
代码:average 成绩 for 班级= bo1.value to xthisform.text1.value=x4. 按要求在考生文件夹下完成下列操作：1）按下图设计一表单文件formdbup37。
设置表单(名称为form1)标题为“修改员工信息”。
2）在数据环境中添加ygb.dbf。
3）表单中添加三个标签和三个文本框，分别用于显示当前记录的员工编号、姓名和联系电话，且将显示员工编号的文本框设为只读。
4）表单中添加二个命令按钮,第一个命令按钮(名称为command1)的标题为“上一条”，第二个命令按钮(名称为command1)的标题为“下一条”。
编写这两个命令按钮的代码,要求运行表单时,单击“上一条”命令按钮(command1)时，记录指针移动到上一条记录，单击“下一条”命令按钮(command1)时，记录指针移动到下一条记录。
然后在三个文本框(text1、text2和text3)中分别显示当前记录的学号、姓名和地址。
操作完成后将操作结果保存在考生文件夹下。
command1代码:skip-1thisform.refreshcommand1代码:skipthisform.refresh5．按要求在考生文件夹下完成下列操作：1）按下图设计一表单文件formlogin41。
设置表单(名称为form1)标题为“系统登陆”。
2）设置“工资管理系统”标签(label1)字号设为20，字的颜色为红色。
3）要求在运行表单时，向输入密码的文本框（text2）中输入字符，回显字符显示的是“*”。
4）编写“退出”命令按钮（command2）的代码,要求运行表单时,单击“退出”命令按钮时,关闭表单。
操作完成后将操作结果保存在考生文件夹下。
command2代码:thisform.release6.在考生文件夹下完成如下操作：设计名为formfont102的表单（控件名为form1，文件名为formfont102）。
表单的标题设为"设置字体格式"。
表单中有一个标签（名称为Label1,标题为“选择字体”）,一个组合框（名称为Combo1）、一个文本框（名称为Text1）和两个命令按钮"设置"（名称为Command1）和"退出"（名称为Command2）。
文本框的字体大小设为16运行表单时，组合框中有三个条目"宋体"、"黑体"、"隶书"可供选择，在组合框中选择字体后，如果单击"设置"命令按钮，按组合框选定的字体设置文本框中内容的字体。
单击"退出"按钮关闭表单。
操作完成后将操作结果保存在考生文件夹下。
command1代码:thisform.text1.fontname=bo1.valuecommand2代码:thisform.release7．在考生文件夹下完成如下操作：1）设计名为formfont105的表单（控件名为form1，文件名为formfont105）。
表单的标题设为"设置字体格式"。
2）表单中添加一个列表框（名称为listbox1）、列表框中有三个条目"宋体"、"黑体"、"隶书"可供选择。
3）表单中添加一个标签（名称为label1），标题为“湖南财经高等专科学校”，同时设置此标签字号为20，字的颜色为红色。
4）表单中添加两个命令按钮"设置"（名称为Command1）和"退出"（名称为Command2）。
编写其代码，要求运行表单时，在列表框中选择字体后，如果单击"设置"命令按钮，按列表框选定的字体设置标签中内容的字体。
单击"退出"按钮关闭表单。
操作完成后将操作结果保存在考生文件夹下。
command1代码:bel1.fontname=thisform.listbox1.valuecommand2代码:thisform.release二、程序填空1、程序功能：求1~50所有整数的立方和。
SET TALK OFFCLEAR（1） s=0X= 1DO WHILE X<=50S= S+ X^3X= （2）x+1ENDDO? SRETURN答案：（1） S=0（2） X+1知识点：求和2、计算分段函数的值：当x>5时，y=x-5；当x<=5时，y=x2+19SET TALK OFFINPUT “请输入X的值:” TO XIF X〉5Y= (1)ELSEY=X*X+19(2)?YRETURN答案：（1） X-5（2） ENDIF知识点：双分支结构3、计算分段函数的值：当x>0时，y=15；当x<=0时，y= -5；当x=0时，y=0SET TALK OFFINPUT “请输入X的值:” TO XDO CASECASE X>0Y= (1)CASE X<0Y= -5OTHERWISEY=0ENDCASE? ”Y=”， yRETURN答案：（1） 15（2） Y知识点：多分支结构4、设eee.dbf为职工数据表，姓名为一个字段名，查找名为“王林”的职工，若找到显示该员工信息，否则显示“查无此人”信息。
SET TALK OFF（1）LOCATE FOR 姓名=”王林”IF （2）DISPELSE？”查无此人”ENDIFUSESET TALK ON答案：（1） USE EEE（2） FOUND（）知识点：记录查找，双分支5、下面程序将“春光明媚”先纵向显示出来然后再横向显示“明媚春光” 请填空完成该程序：Set talk offClearSTORE “春光明媚” TO XYN=1DO WHILE N<8?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,10)+10*mod(int(a/10),10)+ int(a/100)?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) NHNH(2) NH100知识点：子程序调用7、子程序调用主程序：z.prgSET TALK OFFSTORE 4 TO y1, y2, y3y1=y1+1? y1+y2+y3 &&屏幕上显示的结果是 (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”表中查找记录的操作。