湘潭大学visual foxpro课程考试备考习题28

1、试卷编号：8264所属语言：Visual Foxpro试卷方案：VF_1004261709试卷总分：100分共有题型：8种一、填空 共5题 （共计10分）第1题 （2.0分） 题号:1495一个ComboBox下拉列表对象中,属性Enable的值为【1】时,对象才能响应用户引发的事件.答案：=(答案1)=.T.第2题 （2.0分） 题号:1499已知当前表中有15条记录,当前记录为第12条记录,执行SKIP -2命令后当前记录变为第【1】条记录.答案：=(答案1)=10=或=十第3题 （2.0分） 题号:1440要将系统菜单恢复成VFP系统菜单,可执行【1】.答案：=(答案1)=SET SYS

2、MENU TO DEFAULT第4题 （2.0分） 题号:1523在SQL中,建立唯一索引要用到保留字【1】.答案：=(答案1)=UNIQUE第5题 （2.0分） 题号:1260若要使命令按钮在运行时不响应用户事件,应将其【1】属性设置为.f.(无效).答案：=(答案1)=Enabled二、判断 共9题 （共计9分）第1题 （1.0分） 题号:1061在Visual FoxPro中,打开有记录的数据库后,执行命令:go bottom和? eof()后,显示结果会是.T.答案：N第2题 （1.0分） 题号:1092执行下面的命令 dimention aa(15) asort(aa,1,15,1)

3、是对AA数组中的元素进行降序排序.答案：Y第3题 （1.0分） 题号:597Visual FoxPro中,表达式1999/02/11-1999/01/30结果是12.答案：Y第4题 （1.0分） 题号:1054在"代码"窗口中,只能编写对象的事件和方法程序代码,不能查询对象的事件和方法程序代码.答案：N第5题 （1.0分） 题号:1050用EDIT命令打开的是表的浏览窗口,用BROWS命令打开的是表的编辑窗口.答案：N第6题 （1.0分） 题号:1141在命令窗口中执行EXIT命令可结束Visual FoxPro.答案：N第7题 （1.0分） 题号:1072在Visual

4、FoxPro中，replace ALL 工资 with 工资+150时,表示数据库中所有记录的"工资"增加150.答案：Y第8题 （1.0分） 题号:1084在Visual FoxPro中数组的最小下标是0 . 答案：N第9题 （1.0分） 题号:1044新建数据库的命令为CREAT DATA.答案：Y三、单项选择 共10题 （共计10分）第1题 （1.0分） 题号:3077SET ESCAPE OFF的作用是().A:使<ESC>键生效B:使<ESC>键失效C:打开人机交互开关D:关闭人机交互开关答案：B第2题 （1.0分） 题号:3719在Vis

5、ual FoxPro中,逻辑型数据在表中占用()个字节.A:1B:2C:4D:10答案：A第3题 （1.0分） 题号:3065DBAS指的是().A:数据库管理系统B:数据库系统C:数据库应用系统D:数据库服务系统答案：C第4题 （1.0分） 题号:3064?CTOD('03/14/08') 的值应为().A:2008年3月14日B:03/14/08C:03/14/08D:08-03-14答案：B第5题 （1.0分） 题号:3902在当前表中,查找第2个女同学的记录,应使用命令(),A:LOCATE FOR 性别=女 NEXT2B:LOCATE FOR 性别=女C:LOCATE

6、 FOR 性别=女CONTINUED:LIST FOR 性别=女 NEXT2答案：C第6题 （1.0分） 题号:3721在Visual FoxPro中,删除数据库的命令是().A:QUIT DATABASEB:CREATE DATABASEC:DELETE DATABASED:CLEAR DATABASE答案：C第7题 （1.0分） 题号:3951建立事件循环的命令是().A:Begin EventsB:Read EventsC:Clear EventsD:End Events答案：B第8题 （1.0分） 题号:3841下列打开查询设计器的命令是().A:OPEN QUERYB:OPEN VI

7、EWC:CREATE QUERYD:MODIFY QUERY答案：D第9题 （1.0分） 题号:3767在现实世界中,某种商品的名称对应于计算机世界中的().A:个体B:属性值C:数据项D:性质答案：B第10题 （1.0分） 题号:3966下列关于表单控件基本操作的叙述中,不正确的一项是().A:在表单设计器中,双击表单中的控件可进入编写代码环境B:要在表单中复制新控件,可以按住Ctrl键并拖放该控件C:当表单运行时,用户可以按Tab键选择表单中的控件,控件的Tab次序决定了选择控件的次序D:要使表单中所有控件具有相同的大小,可单击"布局"工具栏中的"相同大小&q

8、uot;按钮答案：B四、多项选择 共5题 （共计10分）第1题 （2.0分） 题号:252Visual Foxpro中的表达式有().A:算术表达式B:字符表达式C:关系表达式D:逻辑表达式答案：ABCD第2题 （2.0分） 题号:350在Visual Foxpro系统中,能移动记录指针的命令有().A:LISTB:CONTC:GOD:SKIP答案：ABCD第3题 （2.0分） 题号:349以下属于结构复合索引文件特点的有().A:在打开表时自动打开B:在同一索引文件中能包含多个排序方案C:在同一索引文件中能包含多索引关键字D:在添加、更改或删除记录时自动维护答案：ABCD第4题 （2.0分）

9、 题号:342命令文件中可以实现单击一键输入一个字符的命令或函数有().A:waitB:inputC:inkey()D:x,x get VER pict 'x'答案：ACD第5题 （2.0分） 题号:343内存变量根据其作用的范围可分为().A:字符变量B:局部变量C:私有变量D:全局变量答案：BCD五、程序填空 共3题 （共计15分）第1题 （5.0分） 题号:788*- *【程序填空】*-*功能:在XSDB.DBF数据表中查找学生王迪，如果找到，则显示：* 学号、姓名、英语，生年月日，否则提示"查无此人！"。* 请在【】处添上适当的内容，使程序完整。*-

10、SET TALK OFF*SPACE*【?】XM="王迪"*SPACE*【?】姓名=XMIF FOUN() *SPACE* 【?】学号, 姓名, 英语, 生年月日ELSE ? "查无此人！"ENDIFUSESET TALK ONRETURN答案：=(答案1)=USE XSDB=或=USE XSDB .DBF=(答案2)=loca for=或=loca All for=(答案3)=display=或=?=或=display off=或=disp第2题 （5.0分） 题号:810*- *【程序填空】*-*功能：从键盘输入一个表名“XSDA”，查找"

11、姓名"为"刘洪"的记录。* 如果有该记录，则将该表结构及"姓名"为"刘洪"的记录一* 起复制成一个新表（表名为"A1"）；否则，仅复制表结构。* (设，表中有固定字段"姓名")。* 请在【】处添上适当的内容，使程序完整。*- SET TALK OFFACCEPT TO AUSE &A*SPACE*【?】 FOR 姓名="刘洪"IF NOT EOF( )*SPACE* 【?】 TO A1 FOR 姓名="刘洪"ELSE*SPACE* 【?】

12、TO A1ENDIFUSESET TALK ONRETURN答案：=(答案1)=LOCATE=或=LOCA=(答案2)=COPY=(答案3)=COPY STRUCTURE=或=COPY STRU第3题 （5.0分） 题号:807*- *【程序填空】*-*功能：通过循环程序输出图形：* * * * * * * * * * * * * * * * * 请在【】处添上适当的内容，使程序完整。*- SET TALK OFFCLEARFOR N=1 TO 9 IF N<=5*SPACE* M1=【?】 ELSE*SPACE* M1=【?】 ENDIF ?*SPACE* FOR M=1 TO ABS

13、(【?】) ? " " ENDFOR FOR M=1 TO ABS(M1-2*N+1) IF M=1 OR M=ABS(M1-2*N+1) ? "*" ELSE ? " " ENDIF ENDFORENDFORSET TALK OFFRETURN答案：=(答案1)=0=或=2+(n-1)*4=或=2+4*(n-1)=或=(n-1)*4+2=或=4*(n-1)+2=(答案2)=18=或=4* (n-5)=或=(n-5) *4=(答案3)=5-N=或=-N+5六、程序改错 共3题 （共计15分）第1题 （5.0分） 题号:793*-*【程

14、序改错】*-*题目：输入工资（以元为单位如：1568），计算出百元、伍十元、* 贰十元、拾元、伍元、贰元、壹元各多少张（要求张数最少），* 循环计算，当输入0时结束程序。*-*注意：不可以增加或删除程序行，也不可以更改程序的结构。*-SET TALK OFFGZ=1*FOUND*DO WHILE GZ=1 INPUT "输入工资：" TO GZ Y100=INT(GZ/100) Y50=INT(GZ-Y100*100)/50) Y20=INT(GZ-Y100*100-Y50*50)/20) Y10=INT(GZ-Y100*100-Y50*50-Y20*20)/10) Y5=

15、INT(GZ-Y100*100-Y50*50-Y20*20-Y10*10)/5) Y2=INT(GZ-Y100*100-Y50*50-Y20*20-Y10*10-Y5*5)/2)*FOUND* Y1=GZ-Y100-Y50-Y20-Y10-Y5-Y2 ?Y100,Y50,Y20,Y10,Y5,Y2,Y1ENDDOSET TALK ONRETU答案：=(答案1)=DO WHILE GZ<>0=或=DO WHILE GZ>0=或=DO WHILE GZ#0=(答案2)=Y1=GZ-Y100 * 100-Y50 * 50-Y20 * 20-Y10 * 10-Y5 * 5-Y2 *

16、2第2题 （5.0分） 题号:800*- *【程序改错】*-*题目:ZHG.DBF是一个职工信息文件，其中包含编号(C 5)、姓名* (C 8)、性别(C 1)、基本工资(N 8.2)等字段。其中的性* 别用代码"M"表示男、"F"表示女，此文件已按基本工资建* 立了索引，索引文件名是ZHG_GZ.IDX。* 程序MODI1.PRG功能是：按基本工资由高到低的顺序显示输 * 出所有职工的姓名、性别和基本工资，每行输出一个职工* 的信息，其中性别须输出汉字"男"或"女"。*-*注意：不可以增加或删除程序行，也不可以更

17、改程序的结构。*-Set talk offclearUSE ZHG INDEX ZHG_GZSET ORDE TO jbgz*FOUND*GO TOP DO WHILE .NOT.BOF() ? 姓名+" "*FOUND* ? IF 性别<>"M" THEN "女" ? " ",基本工资*FOUND* SKIP ENDDOUSESET TALK ONRETU答案：=(答案1)=GO BOTTOM=或=GO BOTT=(答案2)=? IIF(性别<>"M", "女

18、","男")=(答案3)=SKIP -1第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的功能是：根据客户号查询该客户的有关* 订单信息，结果按订单金额降序排序，并显示这些定单的总金额。* 修改并调试该程序，使之正确运行。*-*注意：不可以增加或删除程序行，也不可以更改程序的结构。*-SET TALK

19、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)+"签订日期"+"

20、; 金 额" ? s=0 DO WHILE !EOF() ? STR(订单号,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答案：=(答案

21、1)=SET RELA TO 职员号 INTO A=或=SET RELA TO 职员号 INTO zy=(答案2)=IF EOF()=或=IF .NOT .FOUND()=或=IF .NOT .FOUN()=(答案3)=s= s+金额=或=s=金额 +s=或=STOR s+金额 TO s=或=STOR 金额+s TO s七、程序设计 共2题 （共计10分）第1题 （5.0分） 题号:700*-*【程序设计】*-*题目：编程判断一个整数w的各位数字平方之和能否* 被5整除, 可以被5整除则返回1,否则返回0。* 将结果存入变量OUT中。* 请按照题目要求，在下面编写程序代码。 *-SET TAL

22、K ONSET LOGERRORS ON? "输入一个整数：w=39" OUT=-1w=39*Program* End *DO YZJ WITH OUTSET LOGERRORS OFFSET TALK OFF答案：-s=0 do while w>0 s=s+(w%10)*(w%10) w=int(w/10) enddo if s%5=0 out=1 else out=0endif ? out-第2题 （5.0分） 题号:725*-*【程序设计】*-*题目：编程求对某个正数的值保留3位小数，并对第4位* 进行四舍五入。* 将结果存入变量OUT中。* 请按照题目要求，在下面编写程序代码。 *-SET TALK ONSET LOGERRORS ONh=234.5367OUT=-1*Program* End *DO YZJ WITH OUTSET LOGERRORS OFFSET TALK OFF答案：-i=0i=int(h*10000)%10)if i>=5 out=int(h*1000+1)/1000else out=int(h*1000)/1000endif? out-八、VF窗体设计 共2题 （共计21分）第1题 （11.0分） 题号:107一、基本操作题1、将数据库“Stu”添加到工程“Project1”中。