发布时间 : 星期四 文章《VFP语言程序设计》考试试题及参考答案更新完毕开始阅读79b29ff7f90f76c661371a6e
RETURN
*过程PP1
PROCEDURE PP1 PRIVATE X X=1
X=X*4+1
ENDPROC 运行结果是
5．指出下列程序的功能：
SET TALK OFF CLEAR
OPEN DATABASE XSXK USE XS IN 0 SELE XS
STORE 0 TO M,W
SCAN FOR SUBSTR(学号,3,2)=”03” IF 性别=”男”
M=M+1 ELSE
W=W+1 ENDIF ENDSCAN
?”男生人数：”,M ?”女生人数：”,W CLOSE DATABASE
RETURN 程序的功能是
四、编程题（每空1分，共10分）
得
分 1．已知一个运动会成绩数据表SPORT.DBF结构如下： 号码（C/5），班级（C/3），得分（N/3）
其中号码中前3位代表所在班级，后2位为顺序号，且要求“班级”字段的值从“号码”中获取。试设计一个成绩管理程序，要求执行时，先逐个输入运动员的号码和得分（号码为空，结束输入），并存入SPORT.DBF中，全部输完后，程序自动统计出各班所得总分，并存入SPORT1.DBF中。 SET TALK OFF USE SPORT DO WHILE .T. CLEAR
ACCEPT \请输入运动员号码：\ IF LEN(TRIM(HM))=0
__________ ENDIF
INPUT \请输入得分：\ APPEND BLANK
REPLACE 号码WITH HM,得分 WITH DF, 班级WITH _______ ENDDO
INDEX ON ______ TO BJ
_________ ON 班级 TO SPORT1 USE SPORT1 BROW USE
SET TALK ON RETURN
2设计一个如下图所示的可供抽奖的表单。
其中客户数据表KHSJK.DBF结构如下： 客户名（C/8）、身份证号（C/18）、商品名称（C/14）、购货商店（C/20）、购货日期（D） 要求完成：
（1）从所有的记录中随机抽取一个中奖信息并显示在Label3与Label4中。
（2）为了反复抽奖并防止同一个人两次被抽中，被抽中记录应该立即在数据表中加上逻辑删除标记。
（3）下次抽奖从余下的记录中随机抽取。
（4）抽奖结束恢复逻辑删除记录、关闭数据表并释放表单。 请将以下操作步骤和程序填写完整：
首先打开表单设计器，在该表单的 _________ 中加入客户数据表KHSJK.DBF，并完成表单的布局。然后在表单的下方添加命令按钮组，其中含有“开始抽奖”、“退出系统”两个按钮。以下是该命令按钮组的__________事件代码：
DO CASE
CASE This.Value=1
SET DELETE ______ COUNT TO JLS IF JLS>0
ZJH=INT(JLS*________)+1 GO ZJH
Thisform.Label3.Caption=客户名 Thisform.Label4.Caption=身份证号 _____________ ELSE
Thisform.Label3.Caption=\
Thisform.Label4.Caption=\
Messagebox(\没有客户，无法抽奖！\系统提示:\ ENDIF
Thisform.Refresh
CASE THIS.Value=2
_______________ CLOSE DATABASE Thisform.Release ENDCASE
《VFP语言程序设计》考试试题参考答案
一、单项选择（每题2分，共50分）
01．C 02．A 03．B 04．D 05．B 06．B 07．B 08．A 09．C 10．C 11．D 12．A 13．B 14．D 15．C 16．C 17．B 18．C 19．B 20．B 21．B 22．A 23．A 24．A 25．A 二、填空题（每空1分，共15分） 01．数据
02．备注、通用（或M、G） 03．（a+b）*h/2 04．永久 05．CDX或复合 06．Continue( 或CONT) 07．List next 5 (或display next 5) 08．结构化查询语言
09．Set defa to d:\\vfpdir或Set default to d:\\vfpdir) 10．exit
11．Para 或paramaters 12．私有变量 13．属性 14．\\< 15．_screen
三、阅读下列程序，写出运行结果或程序的功能（每题5分，共25分） 1、5、3、-8、-3 2、 0
2 4
3、1 1 2 3 5 4、x=2
5、统计XS数据表中学号第3、4位为“03”的男女生人数
四、编程2题（每空1分，共10分） 注：不区分大小写 1.
EXIT、LEFT(HM,3)、班级、TOTAL 2.
数据环境 、Click、ON、rand()、delete、RECALL ALL