VFP期中考试卷

2011年11月微38 VFP月考
一、选择题（2*11分）
1、数据库（DB）、数据库系统（DBS）、数据库管理系统（DBMS）之间的关系是（）。

A）DB包括DBS和DB B）DBMS包括DB和DBS
C）DBS包括DB和DBMS D）三者之间没有联系
2、在VFP数据表中只能有一个（）。

A）候选索引B）主索引C）普通索引D）唯一索引
3、V isual FoxPro的报表文件.FRX中保存的是( )。

A）打印报表的预览格式B）打印报表本身
C）报表的格式和数据D）报表设计格式的定义
4、如果在屏幕上直接看到查询结果："查询去向"应该选择( )。

A）屏幕B）浏览C）临时表或屏幕D）浏览或屏幕
5、在V isualFoxPro中，可以对字段设置默认值的表( )。

A）必须是数据库表B）必须是自由表
C）自由表或数据库表D）不能设置字段的默认值
6、要控制两个表中数据的完整性和一致性可以设置"参照完整性"，要求这两个表( )。

A）是同一个数据库中的两个表B）不同数据库中的两个表
C）两上自由表D）一个是数据库表另一个是自由表
7、查询设计器和视图设计器的主要不同表现在于( )。

A）查询设计器有"更新条件"选项卡，没有"查询去向"选项卡
B）查询设计器没有"更新条件"选项卡，有"查询去向"选项卡
C）视图设计器有"更新条件"选项卡，也有"查询去向"选项卡
8、在V isual FoxPro中，通用型字段C和备注型字段M在表中的宽度都是( )。

A）2个字节B）4个字节C）8个字节D）10个字节
9、有如下SQL SELECT语句SELECT * FROM stock WHERE 单价BETWEEN 12.76 AND 15.20 与该语句等价的是( )
A）SELECT*FROM stock WHERE 单价<=15.20.AND．单价>=12.76
B）SELECT*FROM stock WHERE 单价<15.20.AND．单价>12.76
C）SELECT*FROM stock WHERE 单价>=15.20.AND．单价<=12.76
D）SELECT*FROM stock WHERE 单价<>15.20.AND．单价<12.76
10、在当前盘当前目录下删除表stock的命令是( )
A）DROP stock B）DELETE TABLE stock
C）DROP TABLE stock D）DELETE stock
11、下列控件中，不需要绑定数据源的控件是( )
A）文本框B）命令按钮C）复选框D）单选按钮
二、填空题（2*6分）
1、{^2005-1-3 10:0:0}-{^2005-10-3 9:0:0}结果的数据类型是____________。

2、在V isual FoxPro 中，可以使用____________语句跳出SCAN……ENDSCAN循环体外
执行ENDSCAN后面的语句。

3、参照完整性规则包括插入规则、________________和____________规则。

4、设x="20.45"，执行?STR(&X,2)+"85&X"的结果是______________________。

5、自由表的字段名最长为_________，数据库表的字段名最长为___________。

6、函数BETWEEN（40，34，50）的运算结果是____________。

三、判断题（1*4分）
（）1、可以链接或嵌入OLE对象的字段类型是通用型和备注型字段。

（）2、创建索引是创建一个指向数据库表文件记录的指针构成的文件。

（）3、使用HA VING子句的同时不能使用WHERE子句。

（）4、表之间的“一对多”关系是指一个表中的记录对应多个表中的一个记录。

四、根据已知的环境与题意，写出相应的VFP操作命令或SQL语句。

（4*5分）
使用如下三个表：
部门.DBF：部门号C（8），部门名C（12），负责人C（6），电话C（16）
职工.DBF：部门号C（8），职工号C（10），姓名C（8），性别C（2），出生日期 D 工资.DBF：职工号C（10），基本工资N（8,2），津贴N（8,2），奖金N（8,2），扣除N （8,2）
1、查询有10名以上（含10名）职工的部门信息（部门名和职工人数），并按职工人数降
序排序。

（SQL）
1
2、在部门表中按部门号建立候选索引，索引标识为BM。

（VFP）
3、将所有职工的基本工资上调10%（VFP）
4、给部门表增加一条记录（”XH01”，”宣化一汽”，”高一丹”）。

（SQL）
5、设置职工表中性别的默认值为“男”。

（SQL）
五、程序分析（5分）
设有一个名为GZ．DBF的表文件，包含以下字段：姓名(C，8)、职务(C，10)、工资(N，6，2)、出生日期(D)和正式工(L)。

阅读以下程序：
USE GZ
DO WHILE.NOT.EOF()
IF 职务="工程师" .AND.出生日期>{^1960/10/20}
D=出生日期
NAME=姓名
SALARY=工资
EXIT
ENDIF
SKIP
ENDDO
Y=YEAR(DATE())-YEAR(D)
IF .NOT. EOF()
?NAME,Y,SALARY
ELSE
?"没查到!"
ENDIF
USE
该程序的功能是：
六、程序填空（3*8分）
1、完善下列程序，以实现通过字符串变量操作竖向显示“天长地久”、横向显示“地久天
长”的功能。

STORE “天长地久”TO ch
CLEAR
n=1
DO WHILE n<8
? _____________
n=n+2
ENDDO
? _____________
?? SUBSTR(ch , 1, 4 )
RETURN
2、分数.DBF有字段：学号（C，2）、姓名（C，8）以及数学、语文、英语、平均成绩（均
为：N，6，2）。

以下程序用来统计该表中每一门课成绩不及格的学生人数，并调用子程序显示统计结果（若某门课程没有不及格的则该课程不显示，并要求显示的人数前没有空格）。

SET TALK OFF
USE 分数
DO WHILE
IF语文<60
X=X+1
ENDIF
IF 数学<60
Y=Y+1
ENDIF
IF 英语<60
2
Z=Z+1
ENDIF
ENDDO
DO SC WITH X,”语文”
DO SC WITH Y,”数学”
DO SC WITH Z,”英语”
SET TALK ON
RETURN
*子程序SC.PRG
IF
CH=LEN(LTRIM(STR(RS)))
?KC+”不及格人数为”+STR(RS, )+”人”
ENDIF
RETURN
七、写出程序的运行结果（5分）
CLEAR
FOR K＝1 TO 4
A="$"
FOR J=1 TO k
A=A+STR(K,1)
ENDFOR
@ K,5 SAY A
ENDFOR
WAIT
RETURN
结果：
3。