06秋上机案.doc

06年秋VFP01 一、项目、数据库和表操作(12分) 打开软盘根目录中的项目文件TEST，在该项目中已有一数据库SJK及若干表。 1．按以下要求修改SJK数据库中图书(TS)表： （1）设置lsh字段和sm字段的标题属性，分别为“流水号”和“书名”。 （2）设置表的记录有效性规则，要求lsh字段值的前四位为入库日期字段(rkrq)中的年份。Left(lsh,4)=str(year(rkrq)) （3）添加一字符型字段，字段名为bc、宽度为20，然后设置其标题为“版次”、字段注释为“出版年月和版次”。 （4）创建一个候选索引abcd，要求以流水号(lsh)为索引关键字，降序排序。索引表达式：lsh 2．在项目中，将TS表设置为“包含”状态。 3．TS表和JY表已存在以分类号(flh)字段为索引表达式的主索引tsflh和普通索引flh。以TS表为主表、JY表为子表，基于flh字段建立永久关系，并根据以下要求设置参照完整性规则： ●在TS表中修改记录(flh字段的值)时，若JY表中有相关的记录,则系统自动对JY表(flh字段的值)进行修改；更新级联 ●在JY表中插入记录时，若TS表中无相关的记录(flh字段的值)，则禁止在JY表中插入。插入限制 二、设计查询(8分) 已知在SJK数据库的学生(XS)表中含有学号(xh)、姓名(xm)等字段，成绩(CJ)表中含有学号(xh)、成绩(cj)等字段。按如下要求修改查询CHAXUN： 基于XS表和CJ表查询两门或两门以上课程成绩不及格(即低于60)的学生，要求输出xh、xm和不及格课程门数，查询结果按不及格门数降序排序，相同时按学号排序。 不及格门数：sum(iif(cj60,1,0)) as 不及格门数 分组：xh 满足条件：不及格门数 = 2 三、设计菜单(5分) 项目TEST中已存在菜单MENU，利用菜单设计器按如下要求修改菜单 1.如图所示，增加“教师管理”菜单栏及其子菜单(包含访问键和快捷键的设置)； 2.为“系统管理”菜单中的“恢复系统菜单”菜单项设置命令，功能为：将菜单恢复为VFP系统菜单； 命令：set sysmenu to default 3.在“系统管理”菜单栏下增加VFP系统菜单项“导入”。 图1 四、设计表单(10分) 下列表单FORMA用来设置用户的权限，根椐下列要求修改表单。 1．将表单的标题设置为“权限设置”。Caption 2．将表格的前二列数据改成只读但能获得焦点，且将表格设置为只显示垂直滚动条。ReadOnly,ScrollBars 3．已知A盘根目录下存在用户(USER)表和菜单(MENUTABLE)表，USER表含有用户名(username)、用户权限(userright)等字段；MENUTABLE表含有菜单名(menuname)、模块名(modulename)、权限(isright)等字段。假定USER表的username字段值不重复，MENUTABLE表的modulename字段值也不重复。完善“确定”按钮的Click事件代码(提示：在原代码的末尾处添加一行语句),使得选定的模块名存入USER表的userright字段中，每个模块名之间用逗号隔开。 update user set userright=sright where username=allt(thisform.cbousername.value) 4．添加名为cmdall、标题为“全选”的命令按钮，并为之编写Click事件代码：单击该按钮时选中所有模块的权限(即将所有的复选框选中)。update menutable set isright=.t. 完成上述修改后，运行表单，界面如下图所示： 五、程序改错(5分) 下列程序的功能是：在一个英文句子中找出最长的单词(单词间以一个或多个空格分隔)，若有多个结果则只需显示第一个单词。要求： ①将下列程序输入到项目中的程序文件PCODE中，并对其中的2条错误语句进行修改； ②在修改程序时，不允许修改程序的总体框架和算法，不允许增加或减少语句数目。 cString=’This is one of the best books nCount=0 cResult=SPACE(O) DO WHILE LEN(cString)0 n=AT(SPACE(1)，cString) cWord=ALLT(IIF(n=0