《《Visual FoxPro程序设计实践》习题参考答案.doc》由会员分享，可在线阅读，更多相关《《Visual FoxPro程序设计实践》习题参考答案.doc（10页珍藏版）》请在三一文库上搜索。
1、Visual FoxPro程序设计实践习题参考答案1Visual FoxPro基础一、选择题12345678910CDAACACBAC11121314151617181920DBADCDBDBB二、填空题1菜单、命令2关系模型3关系4数据5326数据库管理系统7属性 或 字段、元组 或 记录8元组 或 记录9选择10F1、HELP、帮助11菜单操作方式、命令操作方式、程序操作方式12向导、设计器、生成器2VFP 语言基础一、选择题（注：40、41题已经删除，后面答案编辑依次减2）12345678910CCAABBDCDB11121314151617181920BADBCBCA(3,5)BBC2
2、1222324252627282930CBDDDCDBAC31323334353637383940DCBDADABCD41424344454647484950ABAAAABCDD51525354555657585960CDCACBDCDC61626364656667686970CDDDDBCBBDC71727374757677787980DCDABBDBCA 818283848586878889AACCABDBC二、填空题1所赋值常量的数据类型23*18、31834561237894STORE 0 TO M,N5 AB CD、AB CD6500、555557奔腾4个人计算机、奔腾4个人计算机8
3、INT(X%10/10)、INT(X/10)%10、VAL(RIGHT(ALLTRIM(STR(X),2)9.T.、.T.101011逻辑运算符12-123.67、-12313函数1412315.T.166175.1418.F.19D20-1、-22110022.F.233624T= Y+年+M+月+D+日258B、1B、8B、8B26A!=B、A#B、AB27-102839、1230029STORE 学分 TO M.学分301、2631日期时间型、货币型32字段名变量33结婚否、是34135436？A+B=,A+B37VAR、STR38139ROUND(3.1415926,3)405000.
4、456841.F.、出错42TO PRINTER43C44C、N、D、L、Y、T451046SET EXACT ON47SET CENTURY ON48日期、日期时间49MM=050SCATTER5138、.F.52.F.53.F.、054.T.、.F.55年龄=20 AND 年龄=2005-01-0118619韦波 24201 4 2 3 521ALL 合格否 WITH .F. 、笔试成绩60 AND 上机成绩=90(5)COUNT(*) 、INNER JOIN 、读者.借书证号=借阅.借书证号 GROUP BY 、HAVING COUNT(*)1(6)NOT IN 、单价1005数据库的查
5、询和视图一、选择题12345678910ACCAACCCDD11121314151617181920AACCDBCBCB二、填空题1浏览 、查询去向 、表和临时表2QPR 、SQL-SELECT语句3本地视图 、远程视图4表 、查询5MODIFY VIEW 6联接 、JOIN ON7可以用来更新表的数据，并将更新结果保存在磁盘上 、可以从一个或多个相关联的表中提取所需的信息8JOIN 、SELECT 、WHERE9报表 、标签6结构化程序设计一、选择题（39题已删除，后面答案题号减一）12345678910DCDBCACDBAD11121314151617181920有问题CAAABBAA出错
6、212223242526272829DCBABDAB、AC、D、C、D、B3031323334353637A、D、A、BC、C、BAACABB38394041424344ABD有问题BDB二、填空题1顺序结构、选择结构、循环结构2LOCAL32009-8-20或CTOD(08/20/09)4y1005成绩最高分6s=727姓名=xm8(编号,8)=19无效，需重新选择103.14159 、12.5663611tt =5或tt=512REPLACE 等级 WITH A13NUM14CTOD(05/20/10)或2010-05-2015N=N+1166417xy,n,2 、SUBSTR(xy,5,
7、4) 说明：横向显示“重庆平安”18LOOP1910、200 、10020s=1532110 2022q=200 、q=10023按ASCII码字符顺序，将原字符串的每一个字符变为：加上其位置号和字符串总长度后，组成一个新的字符串。24ABCD142530 22 10 20 、40 22 1 2026Y或N（大小写均可）27学号=xh 、DELETE 、PACK28此题超纲，不要求29?30K=1 TO J 、STR(J*K,6)31932&AA 、&BB 、&CC 、J=2733634GATHER MEMVAR35nh+B+dbn 、A:&bdbn36 1 2 337 15 4 3 2 4
8、638&fname 、field_type39y=3340LOOP41j=9 、j=10-i 、a(j)a(j+1)42GATHER FROM ar243a(i)A(j) 、j=j+144P1,P2,P3,P4 、N 、5,5,1,045INT(SQRT(I) 、(i,j)=0 、flag=0三、程序设计题1参考程序CLEARINPUT 请输入一个自然数： TO ns=1FOR i=1 TO ns=s*iENDFOR?自然数+ALLTRIM (STR(n)+的阶乘为：+ALLTRIM(STR(n)RETURN2参考程序CLEARDIME M(20)FOR I=1 TO 20 M(i)=10+I
9、NT(RAND()*90)ENDFOR? 随机产生的20个两位整数的逆序结果为：?FOR i=1 TO 20 ? M(21-i)ENDFORRETURN3参见教材P142例6.154参考程序* 建立如下程序文件：sushu.prgPARAMETERS mg=.T.FOR i=2 TO INT(SQRT(m) IF m%i=0 g=.F. EXIT ENDIFENDFORIF g k=ALLTRIM(STR(m)+是素数！ELSE k=ALLTRIM(STR(m)+不是素数！ENDIFRETURN k5参见教材P150例6.246参见后面“Visual Foxfro程序模拟试题”中“笔试试题（一
10、）”的“五、程序设计题”7参考程序CLEARCLEAR ALLSET SAFE OFFSET TALK OFFSELECT 1USE rxsREPLACE ALL 营业额 WITH 数量*单价SELECT 2USE yyyINDEX ON 营业员代码 TAG dmSELECT 1SET RELATION TO 营业员代码 INTO BACCEPT 请输入要查询的营业员代码： TO dmLOCATE FOR 营业员代码=dmIF not eof() ? 代码：+营业员代码 ? 姓名：+B.姓名+ 性别：+B.性别 ? 品名 营业额 sum=0 DO WHILE not eof() ?品名,营业额
11、 sum=sum+营业额 CONTINUE ENDDO ?全天营业额：,sumELSE ?没有营业员代码为+dm+营业员!ENDIFCLOSE ALLSET SAFE ONSET TALK ONRETURN7表单设计一、选择题12345678910ACDCDBBDCA11121314151617181920BADCDABCBA21222324252627282930CBCCABCCCA31323334353637383940DCDDDCCADD41424344454647484950CDAAABCCAB51525354555657585960DCCBBDCBDB6162636465666768
12、6970CAABADADBC7172737475DDDBA二、填空题1属性 、方法2.F.3ReadOnly 、Enabled4零 、多5PasswordChar6Thisform.Text1.Setfocus7LOAD8Click9男10Value11.T.12布局13RightClick14对象15Thisform.Release 、Thisform.Refresh16RecordSource17SCT18Caption19前20Visible21Clear Events22This.FontItalic=.T.23Combo24编辑25ControlSource26Thisform.Ba
13、ckColor=RGB(0,0,255)27AutoSize 、.T.28使用鼠标或键盘改变控件的值29控件类 、容器类30方法8 报表与标签一、选择题123456789BDABBCBDA二、填空题132布局3分组字段4数据环境5“文件”菜单下的“页面设置”功能9 菜单与工具栏一、选择题123456789BADCCBDAD二、填空题1插入栏2表单控件3结果 、预览4菜单级5ToolbarVisual FoxPro程序模拟试题笔试试题（一）100分120分钟一、单项选择题（每小题1分，共30分）12345678910ACBDAADCAC11121314151617181920BBDCDBABAD
14、21222324252627282930BDCBDBCCDB二、判断题（正确的打，错误的打。每小题1分，共10分）12345678910三、填空题（每空2分，共20分）1x%80 或 MOD(x,8)#0 或 x/8!=INT(x/8)2N=N+13Thisform.text1.value4Thisform.text2.value=x5Thisform.release6tag 编号 或 编号7not eof() （不要此条件也对，送分）8BH,K1,K2,K3,K1+K2+K39NOT s1$m 或 AT(s1,m)=010RETURN .T.四、读程序写出运行结果 （每小题5分，共20分）1
15、7524010 女 893 * * * *10 20 30 2 4 30 4 2 3五、程序设计题（共20分，第1小题8分，第2小题12分）参考程序：CLEARINPUT 请输入n的值： TO Ns=0for i=1 to ns=s+tENDFOR? 1+2+3+ALLTRIM(STR(n)+ =, SRETURN2分4分2分1CLEARCLEAR ALLSET SAFE OFFSET TALK OFFSELECT 1USE xsINDEX ON 学号 TAG xhSELECT 2USE kcINDEX ON 课程号 TAG kchSELECT 3USE cjSET RELATION TO 学
16、号 INTO xsSET RELATION TO 课程号 INTO kc ADDIACCEPT 请输入课程号： TO kchLOCATE FOR 课程号=kch? 选修的课程号：+kch+ 课程名：+kc.课程名? 学生姓名 成绩DO WHILE not eof()?xs.姓名,考试成绩CONTINUEENDDOCALCULATE AVG(考试成绩),MAX(考试成绩),MIN(考试成绩) TO a, b, c FOR =kch? 平均分：+STR(a,5,1), 最高分：+STR(b,5,1), 最低分：+STR(c,5,1)CLOSE ALLSET SAFE ONSET TALK ONRE
17、TURN评分要求：打开、关闭给3分索引、查询给3分关联、统计给6分2笔试试题（二）100分120分钟一、单项选择题（每小题1分，共30分）12345678910CDDBDBDADA11121314151617181920DACBAABDAC21222324252627282930AABCADCABD二、判断题（正确的打，错误的打。每小题1分，共10分）12345678910三、填空题（每空2分，共20分）1mi0 或 mi02alltrim(str(ma)3出版单位 LIKE4单价 Top 15Order by 单价 DESC6USE RZ7WITH D1,D2,T8R1-R29Month(生日)=7 OR Month(生日)=910ENDSCAN四、读程序写出运行结果 （每小题5分，共20分）113 21215 53建国 .F. 1 60年大庆4赵维 季石雨五、程序设计题（共20分，第1小题8分，第2小题12分）参考程序：1参见实践教材“实验16”2参见P153例6.27上机试题（略）