《Visual FoxPro程序设计实践》习题参考答案new

1、第三章二、填空题1自由表、数据库表2文件尾3通用型4DELETE NEXT 45LIST NEXT 5、GO 13、LIST NEXT 46主索引、候选索引、唯一索引、普通索引7BROWSE8文件尾9CONTINUE10物理、逻辑11多、多、一12SEEK13跟着、父表、子表14215一对一、一对多、多对多16关闭所有数据库和表、打开表ST的同时打开其索引CJ、统计2000年以后出生人数17LIST FOR 入馆日期=2005-01-0118519韦波 24201 4 2 3 521ALL 合格否 WITH .F. 、笔试成绩60 AND 上机成绩=90(5)COUNT(*) 、INNER J

2、OIN 、读者.借书证号=借阅.借书证号 GROUP BY 、HAVING COUNT(*)1(6)NOT IN 、单价1005数据库的查询和视图一、选择题12345678910ACCAACCCDD11121314151617181920AACCDBCBCB二、填空题1浏览 、查询去向 、表和临时表2QPR 、SQL-SELECT语句3本地视图 、远程视图4表 、查询5MODIFY VIEW 6联接 、JOIN ON7可以用来更新表的数据，并将更新结果保存在磁盘上 、可以从一个或多个相关联的表中提取所需的信息8JOIN 、SELECT 、WHERE9报表 、标签6结构化程序设计一、选择题123

3、45678910DCDBCACBAD11121314151617181920CCAAABBAAA212223242526272829DCBABDADCC、D、C、D、B3031323334353637A、D、A、BC、C、BAACABB383940414243ABDDDB二、填空题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)或2

4、010-05-2015N=N+11664而 17xy,n,2 、SUBSTR(xy,5,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 33634GATHER MEMVAR35

5、nh+B+dbn 、A:&bdbn36 1 2 337 15 4 3 2 4 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参考程

6、序CLEARDIME M(20)FOR I=1 TO 20 M(i)=10+INT(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

7、例6.246参见后面“Visual Foxfro程序模拟试题”中“笔试试题（一）”的“五、程序设计题”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.性别 ?

8、品名 营业额 sum=0 DO WHILE not eof() ?品名,营业额 sum=sum+营业额 CONTINUE ENDDO ?全天营业额：,sumELSE ?没有营业员代码为+dm+营业员!ENDIFCLOSE ALLSET SAFE ONSET TALK ONRETURN7表单设计一、选择题12345678910ACDCDBBDCA11121314151617181920BADCDABCBA21222324252627282930CBCCABCCCA31323334353637383940DCDDDCCADD41424344454647484950CDAAABCCAB5152535

9、4555657585960DCCBBDCBDB61626364656667686970CAABADADBC7172737475DDDBA二、填空题1属性 、方法2.F.3ReadOnly 、Enabled4零 、多5PasswordChar6Thisform.Text1.Setfocus7LOAD8Click9男10Value11.T.12布局13RightClick14对象15Thisform.Release 、Thisform.Refresh16RecordSource17SCT18Caption19前20Visible21Clear Events22This.FontItalic=.T.

10、23Combo24编辑25ControlSource26Thisform.BackColor=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分）12345678910A

11、CBDAADCAC11121314151617181920BBDCDBABAD21222324252627282930BDCBDBCCDB二、判断题（正确的打，错误的打。每小题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)

12、=010RETURN .T.四、读程序写出运行结果 （每小题5分，共20分）17524010 女 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 课程号

13、 TAG kchSELECT 3USE cjSET RELATION TO 学号 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 ONRETURN评分要求：打开、关闭给3分索引、查询给3分关联、统计给6分2笔试试题（二）100分120分钟一、单项选择题（每小题1分，共30分）12345678910CDDBDBDADA11121314151617181920DACBAABDAC21222324252627282930AABCADCABD二、判断题（正确的打，错误的打。每小题1分，共10分）12345678910三、填空题（每空2分，共20分）1mi0 或 mi02alltrim(str(ma)3