vf模拟试卷

试卷编号：8095
所属语言：Visual Foxpro
试卷方案：VF期末模拟练习
试卷总分：100分
共有题型：4种
一、程序填空共1题（共计20分）
第1题（20.0分）题号:77
*------------------------------------------------------- *【程序填空】
*-------------------------------------------------------
*功能：复制表XSDA.DBF，生成新表XS.DBF，在新表中查找所有
* 男同学的记录，并将男同学的记录逻辑删除。

* 请在【】处添上适当的内容，使程序完整。

*------------------------------------------------------- SET TALK OFF
USE XSDA
***********SPACE**********
【?】
USE XS
LOCATE FOR 性别="男"
DO WHILE FOUND()
***********SPACE**********
【?】
***********SPACE**********
【?】
ENDDO
USE
SET TALK ON
RETURN
答案：
=======(答案1)=======
COPY TO XS
=======(答案2)=======
DELETE
=========或=========
DELE
=======(答案3)=======
CONTINUE
=========或=========
CONT
二、程序改错共1题（共计20分）
第1题（20.0分）题号:107
*-------------------------------------------------------
*【程序改错】
*-------------------------------------------------------
*题目：根据姓名查询RSH.dbf中的职工情况，如果有则显示该职工的* 工资和职称，否则显示"查无此人!"。

*-------------------------------------------------------
*注意：不可以增加或删除程序行，也不可以更改程序的结构。

*------------------------------------------------------- SET TALK OFF
USE RSH
XM="赵红"
LOCATE FOR 姓名 = XM
***********FOUND**********
IF BOF()
WAIT "查无此人! "
ELSE
***********FOUND**********
? "工资+职称"
ENDIF
USE
SET TALK ON
RETU
答案：
=======(答案1)=======
IF EOF()
=========或=========
IF .NOT. FOUN()
=========或=========
IF EOF() = .T.
=========或=========
IF NOT EOF() = .F.
=========或=========
IF !EOF() = .F.
=========或=========
IF EOF () <> .F.
=========或=========
IF NOT EOF() <> .T.
=======(答案2)=======
? 工资 , 职称
=========或=========
? STR( 工资 )+ 职称
=========或=========
DISPLAY FIELD 工资, 职称
三、程序设计共1题（共计30分）
第1题（30.0分）题号:438
*------------------------------------------------------- *【程序设计】
*-------------------------------------------------------
*题目：编程求一个整数，它加上100后是一个完全平方数，
* 再加上168又是一个完全平方数，请问该数是多少？。

* 将结果存入变量OUT中。

* 请按照题目要求，在下面编写程序代码。

*------------------------------------------------------- SET TALK ON
SET LOGERRORS ON
OUT=-1
**********Program**********
********** End **********
DO YZJ WITH OUT
SET LOGERRORS OFF
SET TALK OFF
答案：----------------------
i=1
do while i<100000
x=int(sqrt(i+100))
y=int(sqrt(i+268))
if x*x=i+100 and y*y=i+268
exit
endif
i=i+1
enddo
out=i
? out
----------------------
四、VF窗体设计共1题（共计30分）
第1题（30.0分）题号:101
一、基本应用
1、打开“学生管理”数据库，为成绩表的分数字段定义默认值为0。

2、为成绩表的分数字段定义约束规则：分数>=0 and 分数<=100，
违背规则的提示信息是“考试成绩输入有误”。

3、为表stu添加字段“备注”，该字段的数据类型为字符型(8)。

二、简单应用
1、打开表单Form1，表单上有三个按钮，在按钮单击事件中加入代码，当单击任何
一个按钮时，都使其他两个按钮的标题互换。

2、根据表作者和表图书建立一个查询，该查询包含的字段有“作者姓名”、
“书名”、“价格”和“出版单位”。

要求按“价格”排序（升序），并将该查询保存，文件名为chaxun.qpr。