2017-2018下学期期中试卷
成都大学教务系统-个人思想工作汇报
2017-2018下学期期中考试试卷（VF）
一、选择题。（每题2分，共30分）
1. 在Visual FoxPro中，查询结果保
存到文本文件中，如果文件已经存在，则将结果追加到该文件
的末尾的选项是..
..................................（ ）
A.
ADD B. ADDITIVE C. APPEND D.
INSERT
2. 在Visual
FoxPro中，表单的数据源不包括.........................（ ）
A. 数据库表 B. 自由表 C. 视图
D. 查询
3. 在Visual FoxPro中，使用SQL中的SELECT命令进行条件查询
时，WHERE条件中可以使用LIKE
进行格式匹配，LIKE格式中的字符串可以使用通配符，下面
的字符中用来代表多个字符的是
A. & B. %
C. _ D. +
4. 在Visual FoxPro中，将两个数
据库文件按某个条件筛选部分（或全部）记录及部分（或全部）
字段，组合成一个新的数据库文件的关系
操作为...........（ ）
A. 投影 B. 连接
C. 筛选 D. 更新
5. 在Visual
FoxPro中，执行以下命令后显示的结果是................（ ）
?
A．.T. B．.F. C．0
D．1
6. 在Visual
FoxPro中，不允许出现重复字段值的索引是..............（ ）
A.
侯选索引和主索引 B. 普通索引和主索引
C.
侯选索引和唯一索引 D. 普通索引和侯选索引
7. 在Visual
FoxPro中，下面关于类、对象、属性和方法的叙述中，错误的是.........（ ）
A. 类是具有相同特征的对象的集合，这些对象具有相同的属性和方法
B.
属性用于描述对象的特征，方法用于表示对象的行为
C.
基于同一个类产生的两个对象可以分别设置自己的属性值
D.
通过执行不同对象的同名方法，其结果必然是相同的
8．在Visual
FoxPro中，以下表达式正确的是........................（ ）
A. {^2008-05-01 10:10:10 AM}-10
B. {^2008-05-01}+DATE()
C.
AT(智能ABC微软拼音
D.
9.
设有关系R1和R2，经过关系运算得到结果S，则S是______。
A、一个关系
B、一个表单 C、一个数据库 D、一个数组
10. 设有变
量sr=年上半年全国计算机等级考试，能够显示年上半年计算机等级考试的
命令是______。
1
A、?sr全国、?SUBSTR(sr,1,8)+SUBSTR(sr,11,17)
C、?STR(sr,1,12)+STR(sr,17,14)
D、?SUBSTR(sr,1,12)+SUBSTR(sr,17,14)
11.
打开一个建立了结构复合索引的数据表，表记录的顺序将按______。
A、第一个索引标识
B、最后一个索引标识
C、主索引标识 D、原顺序
12. 可以伴随着表的打开而自动打开的索引是______。
A、单一索引文件（IDX） B、复合索引文件（CDX）
C、结构化复合索引文件 D、非结构化复合索引文件
13. 表达式VAL(SUBSTR(奔腾586的结果是______。
A、13.00
B、14.00 C、45.00 D、65.00
14.
在Visual Foxpro中，下面4个关于日期或日期时间的表达式中，错误的是______。
A、{＾2002.09.01 11：10：10AM}-{＾2001.09.01
11：10：10AM}
B、{01012002}+20
C、{＾2002.02.01}+{＾2001.02.01}
D、{＾20020201}-{＾20010201}
15．在下列关于Visual
FoxPro变量的叙述中，正确的是．．．．．．．．．．．．．．．．．．．．．．．．．（ ）
A．使用一个简单变量之前要先声明
B．在Visual
FoxPro中，变量分为字段变量和内存变量
C．如果内存变量名与当前数据表中的字段变量名相同，则内存变量优先被使用
D．不能将不同类型的数据赋给同一个变量
二、填空题。（每题1分，共5分）
属性设置为“姓名”。
2．在Visual
FoxPro中，在当前记录之前插入一条空白记录的命令
是
。
3. 在Visual FoxPro中，?IIF(VAL((
的输出结果为：
。
4．在Visual FoxPro中，选择当前未使用的最小编号工作区的命令是
。
5. 将系统菜单恢复为默认配置，可使用的命令为
。
1. 表单中有一个名为label1的标签控件，使标签上显示的内容为“姓名”，需要将标签的
三、根据已知的环境与题意，写出相应的Visual FoxPro操作命令或SQL语句，要求每<
br>小题用一条命令或语句完成（本大题共5小题，每小题4分，共20分，请填写在
答题纸上）。
现有数据库“”，其中包含表“order_”，该表有以下字段：客户号(C,6)、
订单号
(C,6)、订购日期(D)、数量(I)、单价(N,10,2)，总金额(N,15,2)。在相应数据库和
表已
打开的前提下，写出完成下述功能的命令(注意：只能写一条语句，多于一条不得分)。
1．恢复“order_list”表中被逻辑删除的记录中“数量”大于等于1000的记录。
（用Visual FoxPro
命令）
2. 使用“order_list”表，建立以“
订单号”为关键字，名称为“订单”的降序的唯一索引，复合
索引文件名为。（用Visual
FoxPro命令）
3. 建立“zgxxb”表，字段为：职工号(C,6)，姓名(C,8)，性
别(C,2)，设置“职工号”字段为主索
引，并对“性别”字段建立有效性规则为：“性别”字段只能
填“男”或“女”，如果填入其他数据则
提示信息“性别输入错误”。（用SQL语句）
4．计算“order_list”表中“总金额”字段的值，总金额=数量*单价。（用SQL语句）
5. 查询“order_list”表中“客户号”为100001、“总金额”小于等于10000
的记录，按“总金额”
降序输出，结果保存到“”表中。（用SQL语句）
S=S+KK(M,N)*X
ELSE
S=S+KK(M,N)*Y
ENDIF
ENDIF
ENDFOR
ENDFOR
?S
FUNCTION
ZHI
PARAMETERS TT
SUM1=0
FOR I=1 TO
TT-1
IF TT%I=0
SUM1=SUM1+I
ENDIF
ENDFOR
IF SUM1=TT
RETURN 1
ELSE
RETURN 0
ENDIF
该程序的功能是计算S=
的值（写出包含X和Y的表达式）
2．有Visual ForPro程序如下:
CLEAR
I=2
DO WHILE .T.
COUNT=0
M=I
FOR K=0 TO 2
J=M2*3+1
M=J
IF J % 2=0
2
四、看程序，写结果。(每题10分，共50分)
1．有Visual
ForPro程序如下
CLEAR
INPUT 请输入X=
INPUT
请输入Y=
DIMENSION KK(2,2)
I=1
DO WHILE
I<=2
J=1
DO WHILE J<=2
IF
I%2=0
KK(I,J)=I*J*7
ELSE
KK(I,J)=I*J*3
ENDIF
J=J+1
ENDDO
I=I+1
ENDDO
S=0
FOR M=1
TO 2
FOR N=1 TO 2
IF
ZHI(KK(M,N))=1
IF KK(M,N)%4=0
COUNT=COUNT+1
ELSE
EXIT
ENDIF
ENDFOR
IF COUNT=2
?J
EXIT
ENDIF
I=I+2
ENDDO
运行上面的程序，显示的结果为 。
根据下表完成3、4题
设有数据库文件“学生管理.DBC”，包含3个表，分别是“课程设
置”、“学生档案”、“学生
成绩”。其中“课程设置”表的结构为：课程编号(C，4)、课程名称(
C，20)、学时(N，3，0)，学分
(N，3,1)；“学生档案”表的结构为：学号(C，6)、
姓名(C，10)、班级(C，20)，院系(C，20),“学
生成绩”表的结构为：学号(C，6)
、课程(C，20)、成绩(N，5，1)。各表中数据如下：
课程设置.DBF
记录号
课程编号 课程名称 学时 学分
1 0001 数据结构
64 3.5
2 0002 操作系统 54
3.0
3 0003 软件工程 46 2.5
学生档案.DBF
记录号 学号 姓名 班级
院系
1 100101 龙继坤 机电1班 机电系
2 100102 王玉玉 机电1班 机电系
3
100204 李玉红 机电2班 机电系
4 200101
杨彬彬 工商管理1班 工商管理系
5 200102 梁洪波
工商管理1班 工商管理系
6 200301 李继华 工商管理3班
工商管理系
学生成绩.DBF
3
记录号 学号
课程 成绩
1 100101 0001
79.0
2 100101 0002 89.0
3
100101 0003 80.0
4 100102
0001 45.0
5 100102 0002
98.0
6 200101 0001 99.0
7
200102 0002 65.0
8 200102
0003 88.0
3. 有如下Visual
FoxPro程序：（代码中行末的分号为逻辑行连接符）
CLEAR
OPEN
DATABASE 学生管理
SELECT * FROM 学生成绩 WHERE 学号
IN(SELECT 学号 FROM;
学生档案) INTO DBF KECHENG
USE
ADD TABLE KECHENG
SELECT
学号,课程,MAX(成绩) AS CHENGJI FROM KECHENG GROUP BY;
课程 ORDER BY CHENGJI ASC INTO DBF HZ
SELECT
HZ.学号,HZ.课程,I,学生档案.姓名 AS XINGMING;
FROM
学生档案,HZ WHERE 学生档案.学号=HZ.学号 ORDER BY;
I INTO
DBF JG
USE JG
GO TOP
KECHH=课程
XMING=XINGMING
CLOSE DATABASE
USE 课程设置
GO TOP
DO WHILE NOT EOF()
IF
TRIM(课程编号)==TRIM(KECHH)
?XMING,课程名称,学分
EXIT
ENDIF
SKIP
ENDDO
运行上面的程序，显示的结果是：
4. 有如下Visual FoxPro程序：（代码中行末的分号为逻辑行连接符）
CLEAR
OPEN DATABASE 学生管理
CREATE TABLE
TJS(X1 C(20),X2 N(5,1))
SELECT DISTINCT 院系 AS
Y1,SUBSTR(学号,1,2) AS Y2 FROM;
学生档案 ORDER BY Y2
INTO DBF JTS
USE
SELECT 1
USE JTS
GO TOP
SELECT 2
USE 学生成绩
GO TOP
SELECT 1
DO WHILE NOT EOF()
ZHI=0
SHU=0
SELECT 2
GO TOP
DO
WHILE NOT EOF()
IF SUBSTR(学号,1,2)==JTS.Y2
ZHI=ZHI+成绩
SHU=SHU+1
ENDIF
SKIP
ENDDO
IF SHU!=0
INSERT INTO TJS VALUES(JTS.Y1,ZHISHU)
ENDIF
SELECT 1
SKIP
ENDDO
CLOSE DATABASE
USE TJS
DO WHILE NOT
EOF()
?X1,X2
SKIP
ENDDO
运行上面的程序，显示的结果是：
5．有Visual ForPro程序如下:
CLEAR
INPUT
请输入数据SHU=
FOR I=3 TO SHU2
IF CHULI(I)=1
J=SHU-I
IF CHULI(J)=1
?TRIM(STR(I))+和
ENDIF
ENDIF
ENDFOR
PROCEDURE CHULI
PARAMETERS X
M=1
IF X>3
FOR
IX=2 TO SQRT(X)
IF X%IX=0
M=0
EXIT
ENDIF
ENDFOR
4
ENDIF
RETURN
M
ENDPROC
运行上面的程序，输入16，显示的结果为
2017-2018下学期期中考试试卷（VF）
学号
班级 姓名
一、
选择题。（每题2分，共30分）
1-5.
6-10. 11-15.
五、程序填空。（每空5分，共15分）
(Visual FoxPro试题)程
序的功能是：输入字符串，将字符串中的所有不是数字、字母的字符删除；
将字母字符移到数字字符尾部
，各自保持原来的先后顺序，形成新的字符串输出。如输入的字符串为
“1Wq+2_3A”，则输出“
123WqA”。程序如下，请在空白位置填写正确的代码。
CLEAR
ACCEPT
请输入字符串：
（1）
?XX
FUNCTION SHUCHU
PARAMETERS SS
N=LEN(SS)
DIME A(N)
FOR I=1 TO N
A(I)=SUBSTR(SS,I,1)
ENDFOR
B=
C=
FOR I=1 TO N
IF
(A(I)>=
（2）
ELSE
IF (A(I)>=
（3）
ENDIF
ENDIF
ENDFOR
SS=B+C
RETURN SS
5
二、 填空题。（每题1分，共5分）
1.
2.
3.
4.
5.
三、 命令题。（每题4分，共20分）
1.
2.
3.
4.
5.
四、
看程序，写结果。（每题10分，共50分）
1. 2.
3. 4. 5.
五、
程序填空。（每题5分，共15分）
1.
2.
3.