2011春VFP上机试卷含答案
VFP上机习题(附带答案版)
VFP习题（红色部分为答案，不过答案不是百分百准确）第一周(1)如下不正确的数值型常量是( )。
[多选题,答案不够或超出时,此题按零分计!](A)π(B)E-6(C)1E-6(D)1/2(E)30% ABDE(2)在Visual FoxPro中，合法的字符串是（）。
[多选题,答案不够或超出时,此题按零分计!](A){ [计算机水平测试] }(B)[ (计算机水平测试) ](C)" '计算机水平测试’'(D)" '计算机水平测试] "(E)" "计算机水平测试" " BD(3)日期时间型常量又称为T型常量，如下错误的形式是( )。
[多选题,答案不够或超出时,此题按零分计!](A){2008-03-03,10.45p}(B){^2008-03-03;10:45p}(C){^2008-03-03,13:45p}(D){^2008-03-03,13:45a}(E){^2008-03-03-10:45p} ACDE(4)如下正确的逻辑常量是（）。
[多选题,答案不够或超出时,此题按零分计!](A),T,(B).真.(C).F.(D).f.(E).y.(F).n. CDEF(5)如下选项（）是正确的内存变量名。
[多选题,答案不够或超出时,此题按零分计!](A)ABCDE(B)_A A(C)不是变量(D)非变量(E)A变量(F)_ASD ACDEF(6)如下选项（）是正确的赋值命令。
[多选题,答案不够或超出时,此题按零分计!](A)STOR 2 TO AA,SS(B)STOR 2,3 TO AA,SS(C)DD=.F.(D)DD=.真.(E)FF=[广东医](F)FF=3+4 ACEF(7)对于赋值命令：X=''，如下与此命令等价的有( )。
[注意空字符串与一个空格符组成的非空字符串。
][多选题,答案不够或超出时,此题按零分计!](A)STOR [] TO X(B)STOR "" TO X(C)STOR ' ' TO X(D)X=[](E)STOR " " TO X ABD(8)常见表达式有四种，如下选项（）是错误的。
2011卷VFP考试试卷
10、VFP刚开始工作时，系统默认选择为第一号工作区。(）
得分
阅卷人
四、写命令语句题（本大题共10小题，每题2分，共20分）
项目中包括数据表文件ZG.DBF，结构如下：（编号C(4)，姓名C(6)，性别C(2)，出生日期D(8)，基本工资N(8,2)，津贴N(3)，职称C(10)，婚否L，简历M(4))。其他文件包括main.prg、名为cd的菜单和名为myform的表单及名为out的报表。
A．“代码”选项卡B．“类”选项卡
C．“数据”选项卡D．“文档”选项卡
得分
阅卷人
三、判断题（本大题共10小题，每小题1分，共10分）
1、建立自由表分两步：定义表结构和输入数据。(）
2、表间的关系分三种：一对一关系、一对多关系和多对多关系。(）
3、在应用程序中不可以通过使用该工作区的表的别名来标识工作区。(）
4、恢复表中所有被逻辑删除记录的命令是___________。
5、日期型转化为字符型和数值型转化为字符型分别为__________和__________函数。
6、在Visual FoxPro中，视图可以分为___________视图和远程视图。
7、返回记录指针的记录号函数为____________，测试表记录指针是否到文件头函数为____________。
8、若A=78、B=56、C=99，当执行?IIF(A<B,IIF(A<C,A,C),IIF(B<C,B,C))命令时，结果是（）
A．78 B．56 C．99 D．无结果
9、在VFP中字段的数据类型不可以指定为（）。
A．货币型B．通用型C．时间型D．备注型（二进制）
10、当执行“ALTER TABLE SB DROP备注”命令时，结果是（）
vfp上机习题及答案
1 VFP上机实践习题及答案一、选择题：1. 在关系理论中，把能够唯一地确定一个元组的属性或属性组合称之为A) 索引码B) 关键字C) 域D) 外码2. 运行V isual Foxpro 6.0，错误的方法是A) 双击V isual Foxpro 6.0 图标B) 单击V isual Foxpro 6.0 图标回车C) 右击V isual Foxpro 6.0 图标，并单击其快捷菜单中的"打开"命令D) 拖动V isual Foxpro 6.0 图标到一个新位置3. 学生性别的取值只能为"男"，"女"，这个范围在关系模型中被称为A) 域B) 码C) 分量D) 集合4. V isual Foxpro 6.0 的系统配置文件是A) config.sys B) config.fpw C) win.ini D) autoexec.bat5. 启动V isual Foxpro6.0 屏幕上出现两个窗口：一个是V isual Foxpro 6.0 的主窗口，另一个是A) 文本B) 命令C) 帮助D) 对话框6. 在V isual Foxpro 6.0 中，可以在同类数据之间进行减运算的数据类型是A) 数值型，字符型，逻辑型B) 数值型，字符型，日期型C) 数值型，日期型，逻辑型D) 字符型，日期型，逻辑型7. 下列表达式中不符合V isual Foxpro 6.0 语法要求的是A) 04/05/99 B) T+t C) 1234 D) 2X>158. 在以下四组中，每组有两个分别运算的函数，运算结果相同的是A) LEFT("FoxBASE",3)与SUBSTR("FoxBASE",1,3)B) YEAR(DA TE())与SUBSTR(DTOC(DA TE()),7,2)C) TYPE("36-5*4")与TYPE(36-5*4)D) 假定A= "this ", B= "is a string"，A-B与A+B9. 学生数据库的性别字段为逻辑型，男为逻辑真，女为逻辑假。
2010年至2011春江苏计算机二级VFP真题及答案
2010年春计算机基础知识和应用能力等级考试试卷语种:VFP语言第一部分计算机基础知识1．下面关于通信技术的叙述中，错误的是___1___ 。
A．任何一个通信系统都有信源、信道和信宿这三个基本组成部分B．为了实现远距离传输信息，在模拟通信和数字通信中均采用载波技术C．为了降低传输信息的成本，在通信中广泛采用多路复用技术D．数字通信系统的一个主要性能参数是信道带宽,它指实际进行数据传输时单位时间内传输的二进位数目2．在下列有关集成电路及其应用的叙述中，错误的是___2___。
A．集成电路的制造工序繁多，工艺复杂且技术难度高B．经过抛光后的硅片称为晶圆，每个晶圆最多可以制成一个合格的集成电路芯片C．IC卡分为接触式IC卡和非接触式IC卡，后者通常又称为射频卡或感应卡D．集成电路应用十分广泛，目前我国第2代居民身份证中就有集成电路芯片3．在下列有关数字技术的一些叙述中，错误的是_____3_____。
A．数字技术是采用有限个状态(例如"0"和"1")来表示、处理、存储和传输信息的B．在逻辑代数中，1与1进行逻辑加(V)和逻辑乘(^)的结果相同c．任何一个十进制数，均可以精确地转换成等值的二进制数D．在PC机中，通常用原码表示正整数、用补码表示负整数4．在下列有关PC机主机的叙述中，错误的是___4___。
A．BIOS和CMOS存储器安装在主板上，普通用户一般不能自己更换B．由于PC机主板的物理尺寸等没有标准化，所以不同PC机的主板均不能互换C．芯片组是PC机各组成部分相互连接和通信的枢纽，一般由2块VLSI芯片组成D．芯片组决定了主板上所能安装的内存最大容量、速度及可使用的内存条类型5．在下列4个Intel微处理器产品中，采用双核结构的是_____5_____。
A. Core 2 DuoB．Pentium PROC．Pentium IIID．Pentium 46．在下列四种PC机主存储器类型中，目前常用的是_____6_____。
2011年VFP程序设计参考答案
2011年VFP程序设计参考答案《Visual FoxPro程序设计》（1）1.thisform.list1.rowsourcetype=3thisform.list1.rowsource="select 姓名 from xsqk" thisform.list1.listindex=1locate for 姓名=thisform.list1.valuethisform.refresh2.locate for 姓名=this.valuethisform.refresh《Visual FoxPro程序设计》（2）1.if thisform.Optiongroup1.value=dadf=df+5endifskipbel1.caption=题目skipthisform.Optiongroup1.Option1.caption=题目skipthisform.Optiongroup1.Option2.caption=题目skipthisform.Optiongroup1.Option3.caption=题目skipthisform.Optiongroup1.Option4.caption=题目skipda=val(题目)2.if df>=60messagebox("祝贺您，考试合格！")elsemessagebox("考试不合格，继续努力！")endif《Visual FoxPro程序设计》（3）1．locate for 商品名称=thisform.text1.valueif found()bel2.caption=品牌bel4.caption=str(单价,4,2)mand2.enabled=.t.endif2．continueif found()bel2.caption=品牌bel4.caption=str(单价,4,2)elsemessagebox("已没有该品牌的商品！")this.enabled=.f. endif《Visual FoxPro程序设计》（4）Form1.init:public n1,n2,n3,n4OptionGroup1.Click:mand1.enabled=.t.Text3.Lostfocus:mand2.enabled=.t.mand2.setfocusCommand1.Click:a=int(100*rand())b=int(100*rand())if a>=bthisform.text1.value=athisform.text2.value=belsethisform.text1.value=bthisform.text2.value=a endifthisform.text3.setfocus Command2.Click:ch=thisform.OptionGroup1.valuen1=thisform.text1.valuen2=thisform.text2.valuen3=val(thisform.text3.value)do casecase ch=1n4=n1+n2case ch=2n4=n1-n2case ch=3n4=n1*n2case ch=4n4=n1/n2endcaseif n4=n3messagebox("恭喜你答对了！") thisform.text3.value=""elsemessagebox("不正确，再试！") thisform.text3.value=""thisform.text3.setfocus endif《Visual FoxPro程序设计》（5）1． Use tjdLocate for 书名=“VFP数据库”Dj=单价Use sdbLocate for 书名=“VFP数据库”Replace 单价 with dj,金额 with 单价*册数use2．“Text1”的Lostfocus事件代码Use mmLocate for alltrim(upper(thisform.text1.value))=upper(allt rim(用户名))If found()Messagebox("该用户名已存在，重新输入！","提示")Thisform.text1.setfocusThisform.text1.value=""ElseThisform.text2.setfocusEndif“Text3”的Lostfocus事件代码b=alltrim(thisform.text2.value)c=alltrim(thisform.text3.value)if b<>cmessagebox("两次密码不一致!")Thisform.text2.value=""Thisform.text3.value=""Thisform.text2.setfocuselsemand1.enabled=.t.endif“添加”按钮的Click事件代码a=alltrim(thisform.text1.value)b=alltrim(thisform.text2.value)Append blankReplace 用户名 with a,密码 with bmessagebox("你的用户名是 "+a+",你的密码是:"+b+",注册成功!")《Visual FoxPro程序设计》（6）1．SkipIf eof()Messagebox(“已到文件末！”)Go bottomEndifThisform.refresh2. append appendThisform.refresh3. r=messagebox(“真的要删除吗？”,292,”删除记录”)If r=6DeletePackEndif4. if nkeycode=13Locate for this.value=学号If not found()Messagebox(“未找到！”)EndifThisform.refreshEndif《Visual FoxPro程序设计》（7）1. Interval2.Timer1的Timer事件代码ifthisform.shape1.top<thisform.height-thisform.sh ape1.heightthisform.shape1.top=thisform.shape1.top+1 elsethisform.timer1.enabled=.f.thisform.timer2.enabled=.t.endififthisform.shape1.left>thisform.width-thisform.sh ape1.widththisform.shape1.left=0elsethisform.shape1.left=thisform.shape1.left+1 endifTimer2的Timer事件代码if thisform.shape1.top>0thisform.shape1.top=thisform.shape1.top-1 elsethisform.timer2.enabled=.f.thisform.timer1.enabled=.t.endififthisform.shape1.left>thisform.width-thisform.sh ape1.widththisform.shape1.left=0thisform.shape1.top=0elsethisform.shape1.left=thisform.shape1.left+1 endif《Visual FoxPro程序设计》（8）1.public ctCt=0Use YJThisform.timer1.enabled=.t.Thisform.timer1.interval=4004.if ct=1skipif eof()go topendifbel1.caption=left(手机号码,9)+"**"endif综合试题11. 表单的Init事件代码Thisform.timer1.enabled=.f.Thisform.timer1.Interval=100“开始”按钮的Click事件代码Thisfor.timer1.enabled=.t.“停止”按钮的Click事件代码Thisfor.timer1.enabled=.f.“timer1”按钮的Timer事件代码SkipIf eof()Go topEndifbel3.Caption=身份证号综合试题21.C1=thisform.text1.valueN1=val(thisform.text2.value)N2=val(thisform.text3.value)N3=val(thisform.text4.value)N4=val(thisform.text5.value)N5=val(thisform.text6.value)Df=(n1+n2+n3+n4+n5)/5bel1.caption=str(df,5,2)Ret=messagebox(“是否保存数据？”,292,”保存”)If ret=6Insert into xs values (c1,n1,n2,n3,n4,n5) Endif“清空”按钮的Click事件代码是Thisform.setall(“value”,””,”textbox”)bel1.caption=””综合试题31.“添加->”flag=.f. for n=1 to thisform.list2.listcountifthisform.list1.value=thisform.list2.list(n)flag=.t.exitendifendforif flag=.f.thisform.list2.additem(thisform.list1.value) endif“<-删除”if thisform.list2.listindex>=1thisform.list2.removeitem(thisform.list2.listin dex)endif“全部->”for n=1 to thisform.list1.listcountthisform.list2.additem(thisform.list1.list(n)) endfor<-全部”thisform.list2.clear综合试题41.（1）① n=0ScanIf 基本工资>val(bo1.value) Thisform.list1.additem(姓名)N=n+1EndifEndscanThisform.text1.value=n②thisform.list1.clearthisform.text1.value=""③thisform.release(2)③This.option1.value=0This.option2.value=0④ do casecase this.value=1thisform.setall("readonly",.t.,"textbox") case this.value=2thisform.setall("readonly",.f.,"textbox") endcase。
0306 2011年9月全国计算机等级考试二级VFP笔试试卷及答案
2011年9月全国计算机等级考试二级VFP笔试试卷及答案一、选择题（（1）～（35）每小题2分，共70分）下列各题A）、B）、C）、D）四个选项中，只有一个选项是正确的，请将正确选项涂写在答题卡相应位置上，答在试卷上不得分。
（1）下列叙述中正确的是A）算法就是程序B）设计算法时只需要考虑数据结构的设计C）设计算法时只需要考虑结果的可靠性D）以上三种说法都不对（2）下列线性链表的叙述中，正确的是A）各数据结点的存储空间可以不连续，但它们的存储顺序与逻辑顺序必须一致B）各数据结点的存储顺序与逻辑顺序可以不一致，但它们的存储空间必须连续C）进行插入与删除时，不需要移动表中的元素D）以上三种说法都不对（3）下列关于二叉树的叙述中，正确的是A）叶子结点总是比度为2的结点少一个B）叶子结点总是比度为2的结点多一个C）叶子结点数是度为2的结点数的两倍D）度为2的结点数是度为1的结点数的两倍（4）软件按功能可以分为应用软件、系统软件和支撑软件（或工具软件），下面属于应用软件的是A）学生成绩管理系统 B）C语言编译程序C）UNIX操作系统 D）数据库管理系统（5）某系统总体结构图如下图所示：该系统总体结构图的深度是A）7 B）6 C）3 D）2（6）程序调试的任务是A）设计测试用例 B）验证程序的正确性C）发现程序中的错误 D）诊断和改正程序中的错误（7）下列关于数据库设计的叙述中，正确的是A）在需求分析阶段建立数据字典B）在概念设计阶段建立数据字典C）在逻辑设计阶段建立数据字典D）在物理设计阶段建立数据字典数据库设计的步骤：需求分析，概念设计，逻辑设计，物理设计（8）数据库系统的三级模式不包括A）概念模式 B）内模式 C）外模式 D）数据模式外模式概念模式内模式（存储模式）则由关系R和S得到关系T的操作是A）自然连接 B）差 C）交 D）并（10）下列选项中属于面向对象设计方法主要特征的是A）继承 B）自顶向下 C）模块化 D）逐步求精（11）在创建数据库表结构时，为了同时定义实体完整性可以通过指定哪类索引来实现A）唯一索引B）主索引 C）复合索引 D）普通索引完整性约束实体完整性：主索引或候选索引（主关键字或候选关键字）域完整性：取值范围（类型，宽度）和字段有效性规则（表设计器）参照完整性：更新：级联，限制，忽略更新父表记录，如果子表有相关记录级联：更新子表限制：禁止更新忽略：不做限制删除：级联，限制，忽略删除父表记录，如果子表有相关记录级联：删除子表限制：禁止删除忽略：不做限制插入：限制，忽略如果要在子表中插入记录限制：如果在父表中没有相匹配的关键字值（12）关系运算中选择某些列形成新的关系的运算是A）选择运算B）投影运算 C）交运算 D）除运算关系运算的基本运算：选择：选行投影：选列连接：两张或两张以上的表（13）在数据库中建立索引的目的是A）节省存储空间B）提高查询速度C）提高查询和更新速度D）提高更新速度（14）假设变量a的内容是“计算机软件工程师”，变量b的内容是“数据库管理员”，表达式的结果为“数据库工程师”的是A）left(b,6)-right(a,6)1.可以相互转换2.一个表只能属于一个数据库3.数据库表有主索引，自由表没有4.数据库表支持长表名和长字段名5.数据库表可以设置字段有效性（22）在Visual FoxPro中，查询设计器和视图设计器很像，如下描述正确的是A）使用查询设计器创建的是一个包含SQL SELECT语句的文本文件B）使用视图设计器创建的是一个包含SQL SELECT语句的文本文件C）查询和视图有相同的用途D）查询和视图实际都是一个存储数据的表查询和视图：1.视图可以创建远程视图和本地视图2.视图依赖于数据库3.视图具有更新源表的功能4.视图是一个虚拟表。
VFP期末上机复习题及答案
VFP期末上机复习题第一套１、建立一个运动会成绩管理数据库(文件名为VFLX1.DBC)，并在其中建立如下两个数据表并输入表中的数据（40分）运动员基本情况表（K1.DBF）和运动成绩表（K2.DBF）。
其数据形式如下：运动员基本情况表（K1.DBF）运动成绩表（K2.DBF）要求：将数据库（VFLX1.DBC）中的K1.DBF(父表)和K2.DBF（子表）以“编号”建立一对多永久关系。
2、建立程序文件VFLX1.PRG，要求将完成下列各小题任务的VFP数据表操作命令或VFP-SQL命令写在该程序文件中。
在程序首行用注释语句注明学生姓名和学号，并请用注释语句标注小题号。
（30分）（1）试完成如下任务：要求输出每个参赛人员的姓名，所属部门及所得总分，并且按所得总分降序排序；（2）试编写程序，要求任意一个输入比赛项目的名称后，能查询出参加该项目的人员姓名及所属部门名称；当直接按下回车键后退出查询。
（3）输出各部门的名称及该部门参赛所得总分；3、表单设计。
按以下要求设计程序界面，表单文件名为:F1.SCX。
（30分）设计如图所示一个表单，包括3个标签，3个文本框，2个命令按钮（各控件的大小、颜色、字体、字号等属性由考生自定）。
其中，①表单窗口名用来显示考生自己的姓名和学号的后四位数；(如图中式样)②文本框text1 、text2和text3的显示初值为0；③该表单运行后，可以在文本框text1 、text2中分别输入一个数，左键单击“比较大小”命令按钮，则在文本框text3中显示较大一个数；④左键单击“退出”命令按钮，结束表单程序的运行。
第二套１、建立一个工资管理数据库(文件名为VFLX2.DBC)，并在该数据库中建立如下两个数据表并输入数据（40分）职工数据表（K21.DBF ）和工资数据表（K22.DBF ）。
其数据形式如下：职工号”建立一对一永久关系。
2、建立程序文件VFLx2.PRG ，要求将完成下列各小题任务的VFP 数据表操作命令或VFP-SQL 命令写在该程序文件中。
2011年3月计算机等级考试二级VFP笔试试题及答案解析word版
B）软件详细设计说明书
C)用户手册
D）软件需求规格说明书
D解析：软件需求规格说明书是需求分析阶段的最后结果，是软件开发中的重要文档之一。
（5）结构化程序所要求的基本结构不包括
A）顺序结构
B）GOTO跳转
C）选择（分支）结构
D）重复（循环）结构
B解析：结构化程序设计的三种基本控制结构为：顺序结构、选择结构和循环结构。
C）SELECT s.学号，姓名，课程名，成绩
FROM（student s JOIN score sc ON s.学号＝sc.学号）．
JOIN course cON sc.课程号＝c．课程号
WHERE院系＝’计算机系’
D）SELECT学号，姓名，课程名，成绩
FROM（student s JOIN score sc ON s.学号＝sc.学号）
B）SELECT学号，姓名FROM student s WHERE NOT EXISTS
（SELECT * FROM score sc WHERE sc.学号=s.学号AND成绩>= 85)
C）SELECT学号，姓名FROM student s，score sc
WHERE s.学号=sc.学号AND成绩>= 85
A
（16）在Visual FoxPro中，如果希望跳出SCAN…ENDSCAN循环语句、执行ENDSCAN后面的语句，应使用
A）LOOP语句
B）EXIT语句
C）BREAK语句
D）RETURN语句
B解析：在循环体中遇到LOOP语句时，程序就结束本次循环，不再执行其后面的语句。如果是在循环体内遇到EXIT语句时，就结束循环，并转去执行ENDSCAN后面的语句。
- 1、下载文档前请自行甄别文档内容的完整性，平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益，请联系客服反馈,我们会尽快为您处理(人工客服工作时间：9:00-18:30)。
2011年春VFP上机试卷2011C VFP01一、项目、数据库和表操作打开T盘根目录中的项目文件JXGL，在该项目中已有一数据库JXSJ。
1、在JXSJ数据库中按如下表格中所示的结构创建AB.DBF表，并按表格中的要求设置相关属性。
(1)(2)设置RQ字段的默认值：当前系统日期；Date()(3)设置单位字段的显示类：选项按钮组；OptionGroup(4)设置表的更新触发器：日期字段的值等于当前系统日期时可以更新记录；Rq =Date()(5)创建普通索引，索引名为abcd，要求按日期排序，日期相同时按单价排序。
2、在3、为项目设置项目信息：项目的图标为PC.ICO文件。
右击项目管理器4、KC表已存在主索引KCDM，索引表达式为KCDM；CJ表已存在普通索引KCDM，索引表达式为KCDM。
以KC表位主表，CJ表为子表，根据KCDM建立永久关系，并设置两表之间的参照完整性：删除级联、插入限制。
二、设计查询已知自由表图书表（TSB）含有分类号（flh，C）、册数（cs，N）、价格（jg，N）等字段。
按如下要求修改JXGL项目中的查询CHAXUN；基于TSB表查询图书类别、藏书册数等信息。
要求：查询输出字段为图书类别、藏书册数和平均单价；查询结果按藏书册数降序排序，相同时按平均单价升序排序；输出去想为文本文件TEMP。
注：图书类别为flh中“.”前的内容（可用LEFT(…, A T(“.”, …)) 形式的表达式求得），藏书册数为同一图书类别册数之和。
LEFT(flh, AT(“.”,flh)-1) as 图书类别Sum(cs) as 藏书册数Avg(jg) as 平均单价分组：图书类别排序：自己写去向：自己写三、设计菜单JXGL项目中已存在菜单MENU，其中已定义了“文件”菜单栏及其中的“退出菜单”项。
按如下要求设计菜单，菜单运行后的效果如图1所示。
1、在“文件”菜单栏右侧创建“图书管理系统”菜单栏。
2、为“图书管理系统”菜单栏创建子菜单“预约”、“借书”和“还书”。
3、在菜单项“预约”、“借书”和“还书”之间插入分组线。
4、为“借书”菜单项设置命令代码：DO FORM js5、在“文件”菜单栏下插入系统菜单“全部关闭”。
四、设计表单表单F102F用了按小组查看世界杯球队信息。
按下列要求修改表单，修改后表单运行时如图2所示。
1、设置表格Grid1的数据只读，无滚动条，删除“组别”列。
ReadOnly .T.在“属性”窗口中，选择组别这一列（Column3还是Column2来着?），然后在组别这一列的Text处点一下，再按键盘上的“Delete”删除键即可2、在“组别”标签下方添加一个列表框控件List1（用来选择组别），设置其数据源类型为“3-SQL语句”，数据源为“SELECT DIST 组别FROM fifa INTO CURSOR tmp”。
RowSourceType RowSource里把代码抄进去，不要引号3、编写表单的Load事件代码，实现：定义一个全局变量sGroup，并赋初值为字符“A”。
Public sGroupsGroup=‟A‟4、世界杯球队信息存储在自由表fifa中，表结构如下：组别（C，1）、编号（C，1）、国旗（G）、国家（C，12）、简介（M），且fifa表已添加在表单的数据环境中。
编写List1的InterActiveChange事件代码，实现：（1）将List1中当前选定的值赋给变量sGroup，并对当前数据工作区中的fifa标设置筛选条件；按sGroup变量中的值对“组别”字段进行记录筛选；（2）将记录指针指向首行记录，并刷新表单。
会哪行写哪行，不会的空一行sGroup=Thisform.List1.ValueSet Filter to 组别=sGroupGo topThisform.Refresh五、程序改错回文数是指正读和反读都是一样的数，例如1001、1221等。
下列程序的功能是：求出大于1000小于2000的所有回文数，并将它们打印出来（每行打印5个数，最后一行打印总个数）。
要求：①将下列程序输入到项目中的程序文件PCODE中，并对其中的2条错误语句进行修改；②在修改程序时，不允许修改程序的总体框架和算法，不允许增加减少语句数目。
STORE 0 TO n, n1, n2FOR i=1000 TO 2000s=ALLT(STR(i))n1=LEN(s)n2=INT(n1/2)s1=‟‟FOR j=1 TO n2s1=s1+RIGHT(s, 1)s=LEFT(s, n1-1)ENDFORIF LEFT(s, n1)=s1n=n+1??iIF INT(n/5)=n/5?ENDIFENDFOR &&改为ENDIFENDFOR?‟小于2000的回文数共‟+STR(n)+‟个‟2011C VFP02一、项目、数据库和表操作打开T盘根目录中的项目文件JXGL，在该项目中已有一数据库JXSJ。
1、在JXSJ数据库中按如下表格中的结构创建AB.DBF表，并按表格中的要求设置相关属性。
(1) 设置表的注释：影视记录；(2) 设置片名字段的格式：删除字段值的前导空格；T(3) 设置时长字段的有效性规则：大于或等于30；SC>=30(4) 设置语种字段的显示类：列表框；ListBox(5) 创建普通索引，索引名为abcd，要求按语种排序，语种相同时按时长排序。
第一种方法：浏览cjb表，在命令窗口中输入ZAP第二种方法：（1）浏览cjb表，“表”菜单-“删除记录”，范围写ALL，FOR不写（2）“表”菜单-“彻底删除”4、KC表已存在主索引KCDM，索引表达式KCDM；CJ表已存在普通索引KCDM，索引表达式为KCDM。
以KC表为主表、CJ表为子表，根据KCDM建立永久关系，并设置两表之间的参照完整性，更新级联、删除级联、插入限制。
二、设计查询已知课程表（KC）含有课程代号（kcdm，C）、学分（xf，N）和课程名称（kcmc，C）等字段；成绩表（CJ）含有成绩（cj，N）、课程代码（kcdm，C）和备注（bz，M）等字段，成绩等级信息存放在备注字段的前7个字节中，按如下要求修改JXGL项目中的查询CHAXUN：基于KC表和CJ表查询每门课程成绩优秀和不及格的学生信息。
要求：查询输出字段为kcmc、xh、学分、成绩等级、补考日期；查询结果按课程名称排序，课程名称相同的按成绩等级排序；仅输出成绩等级为“A优秀”或“F不及格”的记录。
注：当cj.cj>=60时，学分为xf字段的值，否则为0；当cj.cj <60时，补考日期的值为“2010.09.06”，否则为10个字符的空字符串。
Iif(cj.cj>=60,xf,0) as 学分Left(bz,7) as 成绩等级IIF(cj.cj<60,”2010.09.06”,Space(10)) as 补考日期满足条件：两行成绩等级= “A优秀”OR成绩等级= “F不及格”排序：自己排分组：没有使用合计函数，不用分组三、设计菜单JXGL项目中已存在菜单MENU，其中已定义了“文件”菜单栏及其中的“退出菜单”项。
按如下要求设计菜单，菜单运行后的效果如图1所示。
1、在“文件”菜单栏下插入系统菜单“发送（D）…”。
2、在“文件”菜单栏右侧创建“管理信息系统”菜单栏。
3、为“管理信息系统”菜单栏创建子菜单“使用说明”和“主程序”。
4、为“使用说明”菜单项设置命令代码：MODI COMM 操作说明.TXT。
5、设置有关选项，使菜单运行时执行“清理”代码：CLOSE TABLES ALL“显示”菜单-“常规选项”-勾选“清理”，然后点“确定”，会有一个“清理窗口”，在其中输入代码即可四、设计表单表单F102E用来按小组查看世界杯球队信息。
按下列要求修改表单，修改后表单运行时如图2所示。
1、设置表格grdFifa不显示删除标记列；不显示滚动条，行高设置为27.DeleteMark .F. ScrollBars .F.RowHeight 272、在表格grdFifa的“国旗”列中，删除文本框控件Text1，添加一个OLE绑定型控件。
并设置该控件在显示图像时按“等比填充”方式显示。
增加控件：在属性窗口中选中column3然后在“控件”工具栏里选择“OLEBoundCnontrol”（蓝色的那一个），然后用鼠标在Column3的Text处点一下，即可添加一个OLE控件。
不用删除Text，而是在属性窗口中选中该列修改CurrentControl选择为新增加的变比填充：在属性窗口中选中OLE控件，修改Stretch属性。
3、世界杯球队信息存储在自由表fifa中，表结构如下：组别（C，1）、编号（C，1）、国旗（G）、国家（C，12）、简介（M）。
该表已添加在表单的数据环境中。
表单中的选项按钮组Optiongroup1用来选择小组赛的组别。
在表单的Init事件代码中，已定义了一个全局变量cGroup，用来存储当前选定的组别，完善Init事件代码，实现：（1）对当前数据工作区中的fifa表设置筛选条件：按cGroup变量中的值对“组别”字段进行筛选；（2）将记录指针指向首行记录。
Set filter to 组别=cGroupGo top4、编写选项按钮组Optiongroup1的InterActiveChange事件代码，实现：调用表单Init 事件的方法程序，并刷新表单。
Thisform.InitThisform.Refresh五、程序改错下列程序用来产生20个0~100之间不重复的随机整数，并将结果输出。
要求：①将下列程序输入到项目中的程序文件PCODE中，并对其中的2条错误语句进行修改；②在修改程序时，不允许修改程序的总体框架和算法，不允许增加减少语句数目。
CLEARDIMENSION a(20)a=0FOR i=1 TO 20x=INT(RAND()*100)iscf=.F.FOR j=0 TO i-1 &&FOR j=1 TO i-1IF a(j)=xIscf=.T.EXITENDIFENDFORIF iscf=.F.a(i)=xOTHERWISE &&elsei=I-1ENDIFENDFORDISPLAY MEMORY LIKE a*2011C VFP03一、项目、数据库和表操作打开T盘根目录中项目文件JXGL，在该项目中已有一数据库JXSJ。
1、在JXSJ数据库中按如下表格中所示的结构创建AB.DBF表，并按表格中的要求设置相关属性。
(1) 设置机器编号字段的输入掩码：第一个字符为任意字符，其它只能输入数字字符；(2) 设置单位字段的默认值：南京大学；(3) 设置IP地址字段的注释：只能为C类地址；(4) 设置责任人字段的有效性规则：不能为空；not empty(zrr)(5) 创建普通索引，索引名为abcd，要求按注册日期排序，注册日期相同时按单位排序。