1、2008-2009 第 2 期 VFP 程序设计期末考试_一、程序填空第 1 题、设有职工表 ZG(职工号，部门号，工资) ，用 SQL 语句检索每个部门的部门号及职工工资总和的语句是SELECT 部门号,SUM(工资) FROM ZG _ 参考答案:GROUP BY 部门号第 2 题、在 SQL 中删除表 XS 中全部记录的命令是_。 参考答案:DELETE FROM XS第 3 题、如图所示:表单上三个文本框将绑定学生.dbf 相关字段，则设计时在表单设计器中，应将数据表“ 学生.dbf“ 添加到表单的( )设计器中。 参考答案:数据环境第 4 题、如图所示:表单上命令按钮 command
2、1 的标题为“上一条“ ，如果在 init 事件代码中进行设置，应使用如下命令:Tmand1.( )=“上一条“参考答案:caption第 5 题、如图所示:命令按钮 command1 的标题为“绝对值“, 可在表单 init 事件过程中设置:( )=“绝对值“参考答案:THISFORM.COMMAND1.CAPTION第 6 题、用文本框 text1 输入正方体的边长，利用选项按钮组，选择计算表面积，体积等要求：当选中某项（计算表面积和体积）时：显示表面积的值（text2）和体积值(text3):为此，选项组 optiongroup1 的相应事件写入相应计算代码为。n= thisform.t
3、ext1.valueThisform.text2.visible=.t.Thisform.text3.visible=.t.Y=6*n*nZ=n*n*nX= thisform.optiongroup1.valueDo casecase x=1Thisform.text3.visible=.f.Thisform.text2.value=str(y,10,2)Case x=2Thisform.text2.visible=.t.Thisform.text3.value=str(z,10,2)Case x=3Thisform.text2.value=str(y,10,2)Thisform.text3.
4、value=str(z,10,2)Endcase 请在括号里面补充对应的内容。（黑体两处）第 1 题、在成绩表中，只显示分数最高的前 5 名学生的记录，SQL 语句为:SELECT * top 5 FROM 成绩表_总分 DESC参考答案:ORDER BY第 5 题、如下图所示，用标签，命令按钮构成一个表单在标签中显示以下文字“当前时间“ ，运行表单时，单击“显示“ 按钮将显示系统时间；单击“清除“按钮，文本框中的内容将被清除，单击 “退出“按钮，将退出表单运行“显示“ 按钮的 click 事件代码是 ( ) 参考答案:thisform.text1.value=time()第 4 题、用文本框
5、 text1 输入正方体的边长，利用选项按钮组，选择计算表面积，体积等要求：当选中第三项（计算表面积和体积）时：显示表面积的值（text2）和体积值(text3):为此相应计算代码写入选项组 optiongroup1 的( )事件。参考答案:click第 4 题、如图所示:表单上单击 command1(上一条按钮 )，显示上条记录,则应设置 command1 的单击事件代码为:skip -1Thisform.( )参考答案:Refresh第 2 题、在成绩表中，只显示分数最高的前 5 名学生的记录，SQL 语句为:SELECT * top 5 FROM 成绩表_总分 DESC参考答案:ORDE
6、R BY第 6 题、如下图所示，用标签，命令按钮构成一个表单在标签中显示以下文字“当前时间“ ，运行表单时，单击“显示“ 按钮将显示系统时间；单击“清除“按钮，文本框中的内容将被清除，单击 “退出“按钮，将退出表单运行“显示“ 按钮的 click 事件代码是 ( ) 参考答案:thisform.text1.value=time()第 3 题、如图所示:单击 command1(绝对值按钮),显示绝对值,则应设置 command1 的单击事件代码为:x=val(thisform.text1.value)Thisform.text2.value=( )参考答案:abs(x)第 4 题、用文本框 te
7、xt1 输入正方体的边长，利用选项按钮组，选择计算表面积，体积等要求：文本框 text2 和 text3 用于显示表面积和体积的值，初始时不可见:text2 与 text3 的 ( )属性为.t.参考答案:visible第 5 题、用文本框 text1 输入正方体的边长，利用选项按钮组，选择计算表面积，体积等要求：初始时，选项组一个也不选，则：Thisform.optiongroup1.value=( )参考答案:0第 5 题、当前目录下有“课程表 “文件,要求查找既选修了课程号 “W1“,又选修了“W2“的学生号,则语句为:SELECT A.学生号 FROM 选课表 A, 选课表 B;WHE
8、RE A.学生号=B.学生号 AND A.课程号=“W1“ AND_参考答案:B. 课程号 =W2第 2 题、在 SQL 可以删除表 XS 的命令是_。 参考答案:DROP TABLE XS第 4 题、如图所示:设计一个四则运算的表单如下表单中的确定按钮的 click 代码如下：X1=val(thisform.text1.value)X2=val(thisform.text2.value)XX=( )Do case Case xx=1thisform.text3.value=x1+x2Case xx=2thisform.text3.value=x1-x2Case xx=3thisform.te
9、xt3.value=x1*x2Case xx=4thisform.text3.value=x1/x2endcase 请在括号里面补充对应的内容。 参考答案:thisform.optiongroup1.value第 6 题、如图所示:表单上三个文本框的值在运行时不能修改,则在表单设计器中，可设置它们的( ) 属性为.T.参考答案:Readonly二、读程序选择第 7 题、读下列程序：USE GZY=YDO WHILE Y$YyCLEAACCE 请输入姓名 TO XMINDEX ON 职称 TO ZX FOR 姓名=ALLT（XM）L=3M=10DO WHILE .NOT.EOF() L,M GE
10、T 姓名 L,M+20 GET 基本工资L=L+2SKIPENDDOWAIT 下一个（Y/N）？ TO YENDDOUSERETU（1）这个程序的功能是_。A) 输入 B) 查询 （C）修改 （D ）统计（2）程序中变量 Y 的作用是 _。A) 控制整个程序循环 B) 把指针指向下一条记录C) 等待 D) 没有作用参考答案:BA第 8 题、已知 proc.prg 程序清单如下：（ 12）n=10t=15S=1M=0DO proc_1 WITH nM=M+SDO proc_1 WITH TM=M+S?MCANCproc_1.prg 程序清单如下：PARAMETERS aS=1FOR K=1 TO
11、 AS=S*KENDFORRETURN(1)程序 proc.prg 的功能是( )A）输出 N 和 T 的乘积 B）输出 N 和 T 的阶乘C）输出 N 和 T 的阶乘之和 D）输出 N 和 T 的值(2) 在程序中变量 S 是()A)全局变量 B) 私有变量 C) 本地变量 D) 局部变量参考答案:CD第 9 题、设表文件 XS.DBF 有 10 条记录，程序如下：USE XSGO BOTTOMN=3DO WHILE N=1DISPLAYSKIP -1WAITN=N-1ENDDOUSERETURN （1）程序的功能是（）（A）显示所有记录 （B）分别显示前 3 个记录（C）显示第 3 个记录
12、 （D）分别显示后三个记录（2）退出循环后，N 的值是（）（A）0 （B）1 （C）3 （D）4参考答案:DA第 10 题、阅读下列程序CLEARM=0FOR K=0 TO 2FOR J=3-k TO 3+KK,J SAY STR(K，2)+STR(J,1)M=M+1NEXT KNEXT 1?MRETURN(1)输出图形为： ( )(A) 03 (B) 03 (C) 03 (D) 0314 12 14 1225 250 250 2 5(2)程序结束时，M 的值是： ( )(A)11 (B)9 (C)10 (D)8参考答案:AB第 7 题、CLEAR DIME A（20） P=1 FOR N=1 TO 20 INPUT“请输入数据： “ TO A(N) ENDFOR FOR L=1 TO 19 FOR M=L+1 TO 20 IF A(L)表示的 ACS码字符参考答案:CD第 10 题、读下列程序：社)=TRIM(CBS)IF FOUND()SH=书号ELSESKIP -1SH=STR(val(书号)+1，4)APPE blanREPL 书名 WITH SM，书号 WITH SH，作者 WITH ZZ，出版社 with cbsENDIFSELE 2USE skcAPPE BLANREPL 书号 with sh
