利用以上两张数据表，编写能实现如下功能的一个程序：
1、计算“登记”表中的总分字段值(笔试成绩+上机成绩)；
2、将“成绩”表中笔试成绩和上机成绩均大于或等于60的纪录与“登记”表中相对应纪录的合格字段值置为“.T.”，否则置为“.F.”；
3、显示考试合格的人数和名单。
参考答案：
选择题目一
1、D2、C3、C4、B5、C
8、在表单中要使控件成为可见的，应设置控件的（14）属性。
9、利用SQL语句删除当前文件夹中一个名为temp的自由表文件为：（15）temp。
四、编写程序：（共15分）（程序就直接写在记事本中保存即可，无须运行）
设有下列两张数据表：
登记（考号C（6），姓名C（8），总分N（3），合格L）；
成绩（考号C（6），笔试成绩N（3），上机成绩N（3））
A. 3 B.9C.10D.11
14、循环完成后X的值为______ 。
A. 3 B.10 C. 18 D.11
读下列程序：
i=1
do while i<=21
i=i+2
??str(i,2)
if i=9
exit
endif
enddo
15、程序一共循环了多少次？
A.4B.5C.11D.21
16、程序执行的结果是:________
Num1＝ThisForm.Text1.Value
Num2＝ThisForm.Text2.Value
（1）
IF Max(Num1,Num2)<Num3
bel1.Caption＝Num3
ELSE
（2）
ENDIF
当按下Command2时退出整个表单，则Command2的Click事件代码为：______（3）________
Visual Foxpro程序设计练习题
一、单项选择（共10分，每题1分）
1、在关系数据库中，用来表示实体之间关系的是。
A、树结构B、网结构C、线结构D、二维表
2、数据的独立性是指。
A、数据库的数据相互独立B、DBMS和DB相互独立
C、应用程序和数据库的数据相互独立D、应用程序和DBMS相互独立
3、执行命令DIMENSION B(4,2)后，数组B的元素个数是。
SELECT A.学生号FROM选课表A，（10）WHERE A.学生号=B.学生号AND A.学生号="W1" AND（11）
6、当前目录下有"工资表"文件，现要将"职称"为"工程师"的工资增加30元，则语句为：
UPDATE工资表（12）WHERE职称="工程师"
7、在DO CASE－ENDCASE语句中，可使用（13）2分）
1、设在表单中有Text1、Text2、Text3三个文本框，一个Label1输出类控件和两个命令按钮。命令按钮Command1的Click事件代码功能是从三个文本框中找出最大值，并用Label1输出该值，命令按钮Command2的作用是退出整个表单。请填写完整下列命令按钮Command1和Command2的Click事件代码。
A、6B、4C、8D、2
4、按照传统的数据模型分类，数据库系统可以分为三种类型。
A、数据、图形和多媒体B、层次、网状和关系
C、小型、中型和大型D、西文、中文和兼容
5、在VF中，参照完整性规则不包括。
A、更新规则B、删除规则C、查询规则D、插入规则
6、要在文本框中输入密码，应通过设置属性来指定输入密码的占位符。
k1=10
k2=20
do sub
?k1,k2 &&(1)
do sub1 with k2+10,k1
?k1,k2 &&(3)
*sub.prg
PRIV k1
k1=k2+10
k2=k1+10
retu
*sub1.prg
para x1,x2
x1=str(x1,2)+str(x2,2)
x2=x1+str(x2,2)
程序编写：
clear
closeall
set talk off
seleb
use成绩
selea
use登记
indexon考号tag kh
set rela to考号into b
n=0
go top
do whilenot eof()
repl总分with b.笔试成绩+b.上机成绩
if b.笔试成绩>=60 and b.上机成绩>=60
6、D7、D8、B 9、A10、A
选择题目二
11、B12、C13、C14、D15、A
16、D17、B18、B19、A20、A
21、B 22、C 23、D24、A25、C
填空
（1）Num3＝ThisForm.Text3.Value（2）bel1.Caption＝Max(Num1,Num2)
B、SUM数学+语文+计算机TO总成绩
C、TOTAL ON总成绩FIELDS数学，语文，计算机
D、REPLACE ALL总成绩WITH数学+语文+计算机
8、函数SUBSTR（”数据库期末考试”,AT(“1”,”567890123”),4）的返回值是。
A、”数据”B、”期末”C、”数据库”D、”期末考试”
?x1,x2 &&(2)
retu
23运行到(1)处的结果是:
A、1020B、2030C、1030D、1040
24程序运行到(2)处的结果是:
A、5010501010B、6070C、7060D、3010301010
25程序运行到(3)处的结果是:
A、301040B、501040C、50101040D、30101020
IF MOD(X,3)=0
M=M+X
ENDIF
ENDFOR
?M
RETURN
11、该程序的功能是：求1到10之间（）
A. 能被3整除数的个数 B. 能被3整除数的和
C. 不能被3整除数的个数 D. 不能被3整除数的和
12、该程序执行的结果是：（ ）
A. 3 B.10 C. 18 D. 37
13、循环执行了______次
A、FontNameB、FontCharC、NameD、PasswordChar
7、学生成绩表包括：学号、姓名、数学、语文、计算机、总成绩六个字段，其中数学、语文、计算机和总成绩字段均为N型。要将每个学生的数学、语文、计算机三科成绩汇总后存入“总成绩”字段中，应使用的命令是。
A、REPLACE总成绩WITH数学+语文+计算机
9、将数据库表从数据库中移出后，该表被。
A、移出数据库B、逻辑删除C、物理删除D、放入回收站
10、设A＝[2*3+8]，B＝2*3+8，C＝”2*3+8”，正确的表达式是。
A、A+CB、A-B C、B+CD、A+B-C
二、读程序选择（共45分，每题3分）
程序分析
CLEAR
M=0
FOR X=1 TO 10
2、表单填空
以上表单中对象对应的对象名为：
标签1：Label1
显示按钮:command1隐藏按钮:command2退出按钮: command3
表单的___（4）___属性为“表单考试”
当按下“隐藏”按钮就将标签Label1的隐藏起来，应该使用的代码为：_______（5）________
当按下退出按钮，退出整个表单，应该使用的代码为：_________（6）_____
INPUT“请输入第”+STR(N,1)+”个数：”TO B
IF A<B
A=B
ENDIF
ENDDO
?A
21程序程序循环的次数为（）
A、4B、5 C、6D、1
22程序的功能是()
A、输出多个数据B、输入多个数据 C、输出多个数据中最大的一个D、输出多个数据中最小的一个
有以下三个程序段
* main.prg
18、屏幕的其始坐标为（ ）
（A）1，5 （B）0，0 （C）1，1 （D）任意
19、程序执行后J的值是（ ）
（A）1（B）5（C）0（D）6
20、程序执行后K的值是（ ）
（A）5 （B）6（C）0 （D）1
读下列程序：
clea
N=1
INPUT“请输入第1个数：”TO A
DO WHILE N<5
N=N+1
repl合格with .t.
n=n+1
else
repl合格with .f.
endif
skip
enddo
?“考试合格的人数为：”,n
list姓名for合格
close all
set talk on
表单在运行的时候要自动居中，应修改表单的Autocenter属性值为____（7）___
3、数据库管理系统常见的数据模型有层次模型、网状模型和（8）3种。
4、表达式LEN(SPACE(5)－SPACE(10))的结果为（9）。
5、当前目录下有"课程表"文件，要求查找即选修了"W1"，又选修了"W2"的学生号，则语句为：
A.9B.1 3 5 7 9C.1 3 5 7 911 13 15 17 19 21D.3 5 7 9
17、循环完成后i的值为：______
A.1B.9C.21D.22
阅读下面程序：
CLEAR ALL
STORE 1 TO J，K
DO WHILE K<5