湘潭大学visual foxpro课程考试备考习题23.docx

1、湘潭大学visual foxpro课程考试备考习题23试卷编号：8259所属语言：Visual Foxpro试卷方案：VF_1004261709试卷总分：100分共有题型：8种一、填空 共5题 （共计10分）第1题 （2.0分） 题号:1580在命令窗口中输入【1】命令后按回车键可退出Visual FoxPro.答案：=(答案1)=QUIT第2题 （2.0分） 题号:1507有两个实体集合,它们之间存在着一个MN的联系,根据转换规则,该ER结构转换为【1】个关系模式.答案：=(答案1)=3第3题 （2.0分） 题号:1210控件的数据绑定是指将控件与某个【1】联系起来.答案：=(答案1)=数据

2、源第4题 （2.0分） 题号:1177对于对象的操作,实质上就是对其属性的操作,体现在对其【1】的修改上.答案：=(答案1)=数据第5题 （2.0分） 题号:1181复选框控件的Value属性值可以是【1】.答案：=(答案1)=1 0 NULL=或=1 0二、判断 共9题 （共计9分）第1题 （1.0分） 题号:974执行?MOD(3,-9)后的结果为-3.答案：N第2题 （1.0分） 题号:996表格控件的ColumnCount属性的值默认为2.答案：N第3题 （1.0分） 题号:589Visual FoxPro的日期型字段的长度为6位.答案：N第4题 （1.0分） 题号:1145表单文件保

3、存着表单的各项规则和定义. 答案：Y第5题 （1.0分） 题号:591Visual FoxPro的字符串运算符有+、-、$和%.答案：N第6题 （1.0分） 题号:1063在Visual FoxPro中,函数trim()可以将字符串中所有空格去掉.答案：N第7题 （1.0分） 题号:613表达式中每一项都必须是同一类型的.答案：N第8题 （1.0分） 题号:1135使用SORT命令排序表的缺点是较费时与浪费磁盘空间.答案：Y第9题 （1.0分） 题号:620日期型常量2004/05/07比日期型常量1999/06/08大.答案：Y三、单项选择 共10题 （共计10分）第1题 （1.0分） 题号

4、:3298下列方法中,不能退出Visual FoxPro的是().A:单击文件菜单中的关闭命令B:单击文件菜单中的退出命令C:单击窗口标题栏右端的关闭按钮D:按Alt+F4组合键答案：A第2题 （1.0分） 题号:3325下面严格日期书写格式正确的一项是().A:2002-06-27B:06/27/02C:2002-06-27D:02-06-27答案：C第3题 （1.0分） 题号:3064?CTOD(03/14/08) 的值应为().A:2008年3月14日B:03/14/08C:03/14/08D:08-03-14答案：B第4题 （1.0分） 题号:3088Visual FoxPro是一种(

5、).A:数据库管理系统B:数据库C:文件管理系统D:语言处理程序答案：A第5题 （1.0分） 题号:3169如果要在上、下级菜单之间进行切换,可在菜单设计器窗口中的()下拉列表中选择.A:菜单级B:菜单项C:插入D:插入栏答案：A第6题 （1.0分） 题号:3853学生关系中有姓名、性别、出生日期等字段,要显示所有1985年出生的学生名单,应使用的命令是().A:LIST 姓名 FOR 出生日期=1985B:LIST 姓名 FOR出生日期=1985C:LIST 姓名 FOR YEAR(出生日期)=1985D:LIST 姓名 FOR YEAR(出生日期)=1985答案：C第7题 （1.0分） 题

6、号:3560创建两个具有一对多关系的表之间的关联,应当().A:通过纽带表B:通过某个同名字段C:通过某个索引的同名字段D:通过主索引字段和不同字段答案：D第8题 （1.0分） 题号:3351与某字段绑定的复选框对象运行时呈灰色显示,说明当前记录对应的字段值为().A:0B:.F.C:NULLD:答案：C第9题 （1.0分） 题号:3121对列表框的内容进行一次新的选择,将发生()事件.A:CLICKB:WHENC:InterActiveChangeD:GotFocus答案：C第10题 （1.0分） 题号:3728在Visual FoxPro中,一次最多可以传递()个参数.A:255B:27C

7、:128D:10答案：B四、多项选择 共5题 （共计10分）第1题 （2.0分） 题号:339关于程序(命令)文件,下列说法正确的有().A:程序文件不再是逐条发出和执行,而是批处理方式发出和执行B:程序文件是用户和数据之间的一种软件接口C:依赖程序文件可以保证数据管理的高效率D:程序文件不能相互调用答案：ABC第2题 （2.0分） 题号:254以下表达式中,合法的是().A:8-3=5B:8+310C:AT(ad,xyadvanad)-len(adadad)D:.not. (a=b) .and. a-b0 .or. b=0答案：ACD第3题 （2.0分） 题号:342命令文件中可以实现单击一

8、键输入一个字符的命令或函数有().A:waitB:inputC:inkey()D:x,x get VER pict x答案：ACD第4题 （2.0分） 题号:348下面关于属性、方法和事件的叙述中,正确的是().A:属性用于描述对象的状态,方法用于表示对象的行为B:基于同一个类产生的两个对象可以分别设置自己的属性值C:事件代码也可以像方法一样被显示调用D:在新建一个表单时,可以添加新的属性、方法和事件答案：ABC第5题 （2.0分） 题号:338打开Visual FoxPro项目管理器的文档(Docs)选项卡,其中包含的文件类型有().A:表单(Form)文件B:报表(Report)文件C:标

9、签(Label)文件D:程序(PRG)文件答案：ABC五、程序填空 共3题 （共计15分）第1题 （5.0分） 题号:793*- *【程序填空】*-*功能:列出XSDB.DBF数据表中法律系学生记录，将结果显示输出。* 请在【】处添上适当的内容，使程序完整。 *-SET TALK OFF*SPACE*【?】DO WHILE .T. IF 系别=法律 DISP ENDIF*SPACE* 【?】 IF EOF()*SPACE* 【?】 ENDIFENDDOUSESET TALK ONRETURN答案：=(答案1)=USE XSDB=(答案2)=SKIP=或=SKIP 1=(答案3)=EXIT第2题

10、 （5.0分） 题号:798*- *【程序填空】*-*功能：以下程序的功能如(图1)。*- SET TALK OFF*SPACE*【?】*SPACE*【?】 TO NFOR I=0 TO N*SPACE* T=T+【?】ENDFOR?T的值是:,TSET TALK ONRETURN答案：=(答案1)=STOR 0 TO T=或=T=0=(答案2)=INPUT=或=INPU=(答案3)=2*I=或=2i第3题 （5.0分） 题号:855*- *【程序填空】*-*功能: 一个10磅重的板碎成4块，每块正好是一个整数磅，且用这* 4块当砝码能称出110磅的整数重量的物体。编程求这4块* 的各自重量。

11、* 请在【】处添上适当的内容，使程序完整。*-SET TALK OFFCLEARFOR I=1 TO 7*SPACE* FOR J=I TO 【?】-I*SPACE* FOR 【?】=J TO 8-I-J*SPACE* L=【?】 -I-J-K FOR P=1 TO 9 T1=-1 DO WHILE T12 T2=-1 DO WHILE T22 t3=-1 do while t32 t4=-1 do while t42 if i*t1+j*t2+k*t3+l*t4=10*SPACE* 【?】 i,j,k,l endif t4=t4+1 ENDD T3=T3+1 ENDD T2=T2+1 END

12、D t1=T1+1 ENDD ENDF ENDF ENDF ENDFset talk onreturn答案：=(答案1)=7=(答案2)=K=(答案3)=10=(答案4)=?六、程序改错 共3题 （共计15分）第1题 （5.0分） 题号:770*-*【程序改错】*-*题目：从键盘输入一个表“xsda”，打开该表， 查找姓名是* 张三的记录，并显示该记录， 最后输出姓名是张* 三的记录个数。(设被打开的表中有固定字段姓名)*-*注意：不可以增加或删除程序行，也不可以更改程序的结构。*-SET TALK OFFACCEPT TO AUSE &A*FOUND*N=1SCAN FOR 姓名= 张三*F

13、OUND* LIST N=N+1ENDSCAN*FOUND*? 记录个数是,NUSESET TALK ONRETU答案：=(答案1)=N=0=或=Store 0 To N=(答案2)=DISPLAY=或=DISP=(答案3)=? 记录个数是,N=或=? 记录个数是,str(N)=或=? 记录个数是,N=或=? 记录个数是,str(N)=或=? 记录个数是,N=或=? 记录个数是,str(N)第2题 （5.0分） 题号:825*- *【程序改错】*-*题目:有计算机等级考试成绩数据库cj.dbf，包括考号、笔试成绩* 和上机成绩等字段，其中考号的前两位是单位编码；还有统* 计数据库tj.dbf，

14、包括单位编码、笔试平均分、上机平均分* 、笔试最高分、上机最高分等字段。 * 请编写程序 MODI1.PRG，其功能是：按单位进行各项统计，* 结果存于统计数据库tj.dbf的相应字段中。*-*注意：不可以增加或删除程序行，也不可以更改程序的结构。*-SET TALK OFFSET SAFETY OFFCLOSE DATABASECLEARSELE 2USE TJZAPSELE 1USE CJSORT ON 考号 TO CJ1USE CJ1DO WHILE .NOT. EOF() STORE 0 TO BS1,SJ1,BSMAX,SJMAX DWCODE=SUBSTR(考号,1,2) N1=0

15、 BSMAX=笔试成绩 SJMAX=上机成绩 DO WHILE 考号=DWCODE*FOUND* IF 上机成绩BSMAX BSMAX=笔试成绩 ENDIF BS1=BS1+笔试成绩 SJ1=SJ1+上机成绩 N1=N1+1*FOUND* go 1 ENDDO SELE 2*FOUND* APPEND REPLACE 单位编码 WITH DWCODE,笔试平均分 WITH BS1/N1,上机平均分 WITH SJ1/N1,笔试最高分 WITH BSMAX, 上机最高分 WITH SJMAX SELE 1ENDDOSELE 2LISTCLOSE DATABASESET TALK ONSET SA

16、FETY ONRETU答案：=(答案1)=IF 上机成绩 SJMAX=(答案2)=SKIP=(答案3)=APPEND BLANK第3题 （5.0分） 题号:841*- *【程序改错】*-*题目:有如下数据库文件：* ZY.DBF：职员号N(3,0)，姓名C(6)，性别C(2)，职务C(10)；* DD.DBF：订单号N(3,0)，客户号N(3,0)，职员号N(3,0)，* 签订日期D(8)，金额N(6,2)。* 给定程序MODI1.PRG的功能是：根据客户号查询该客户的有关* 订单信息，结果按订单金额降序排序，并显示这些定单的总金额。* 修改并调试该程序，使之正确运行。*-*注意：不可以增加或

17、删除程序行，也不可以更改程序的结构。*-SET TALK OFFSET SAFETY OFFSELECT 1USE zyINDEX ON 职员号 TO zyiSELECT 2USE ddINDEX ON -金额 TO ddi*FOUND*SET RELATION ON -金额 TO ADO WHILE .T. CLEAR KH=202 ? 请输入客户号： , kh ? LOCATE FOR 客户号=kh*FOUND* IF .NOT.EOF() ? 没有该客户! ELSE ? 订单号+ 职 员+SPACE(5)+签订日期+ 金 额 ? s=0 DO WHILE !EOF() ? STR(订单号

18、,3)+SPACE(5)+A-姓名+SPACE(5)+DTOC(签订日期)+ +STR(金额,6,2)*FOUND* s=金额 CONTINUE ENDDO ? ? 总金额为:+STR(s,8,2) ENDIF ? WAIT 继续查询吗(Y/N)? TO p IF !UPPER(p)=Y EXIT ENDIFENDDOCLOSE DATASET SAFETY ONSET TALK ONRETU答案：=(答案1)=SET RELA TO 职员号 INTO A=或=SET RELA TO 职员号 INTO zy=(答案2)=IF EOF()=或=IF .NOT .FOUND()=或=IF .NOT

19、 .FOUN()=(答案3)=s= s+金额=或=s=金额 +s=或=STOR s+金额 TO s=或=STOR 金额+s TO s七、程序设计 共2题 （共计10分）第1题 （5.0分） 题号:689*-*【程序设计】*-*题目：判断整数是否为质数 (只能被1和本身整除的数) 。* 是质数则函数返回1，否则函数返回0* 请按照题目要求，在下面编写程序代码。 *-SET TALK OFFSET LOGERRORS ONOUT=1?FUN(77)YZJ()SET TALK ONRETURNFUNCTION FUN(N)*Program* End *RETURN OUTFUNCTIO YZJ()U

20、SE INLOCA FOR TIHAO=21IF FOUND() OUT=FUN(N2) DO YZJ21 WITH 1ELSE ?试题输入文件已损坏，请重新配置考试环境ENDIFRETURN答案：-j=2do while jn if mod(n,j)0 j=j+1 loop else OUT=0 exit endifenddo-第2题 （5.0分） 题号:735*-*【程序设计】*-*题目：编程求sum=1/3+1/33+1/333+1/3333+1/33333的值。* (要求使用循环语句求解)* 将结果存入变量OUT中。* 请按照题目要求，在下面编写程序代码。 *-SET TALK ONSET LOGERRORS ONOUT=-1*Progr