09年春VFP01-07.doc

09年春VFP01 项目、数据库和表操作（12分） 打开T盘根目录的项目文件JXGL，在该项目已有一数据库JXSJ。 在JXSJ数据库中按如下表格中所示的结构创建TAB.DBF表，并按表格后的要求设置相关属性。 字段名 数据类型 宽度 字段标题 Cdcs C 40 传递城市 Cdrq D 传递日期 Cdrs I 火炬手人数 Cdlxt G 传递路线图 设置TAB表的注释：火炬传递城市信息表； 设置Cdrq字段的有效性规则及信息：传递日期必须在2008年8月8日前； 将Cdrs字段的默认值设置为100； 按Cdcs字段创建主索引，索引名为abcd。 在TAB表中输入如下记录： Cdcs Cdrq Cdrs Cdlxt 南京 2008/05/27 208 （插入lxt.jpg文件） 设置CJ表的更新触发器，要求课程代码为“60023”的记录不允许修改。 已知JS表已存在主索引gh，索引表达式为gh，KCAP表为子表按gh建立永久关系，并设置两表之间的参照完整性：插入限制。 设计查询（8分） 已知教材（JC）表存储了教材的基本信息，其中含出版社名称（CBSMC，C）、出版年份（CBNF，C）、定价（DJ，N，5.1）等字段。按如下要求修改JXGL项目中的查询CHAXUN： 基于JC表统计各出版社2000年以后（含2000年）出版的教材种数及平均定价。要求：输出出版社名称、教材种数、平均定价（字段名依次分别为CBSMC、JCZS和PJDJ），查询结果按教材种数排序，输出去向为屏幕（即主窗口）。（注：JC表中每条记录为一种教材）。 设计菜单（5分） JXGL项目中已存在菜单MENU，已定义了“系统管理”菜单栏及其中的“恢复系统菜单”菜单项。按如下要求设计菜单，完成后的运行效果如图1所示。 创建“教材信息”菜单栏，其访问键为J，子菜单“编辑”、“浏览”和“统计”，分组线如图1所示； 为“编辑”菜单项设置跳过条件，使该菜单项不可用； 为“统计”菜单创建子菜单“出版社”和“出版年月”； 为“出版社”菜单项设置快捷键CTRL+B，并为其设置过程代码：首先清除屏幕（即主窗口），然后运行查询文件CHAXUN.QPR。 表单设计（10分） 表单F081E的功能是：用鼠标在表单上写汉字等操作。按下列要求修改表单，修改后表单运行时如图2所示。 1．设置表单的有关属性，使其标题为“鼠标写字”，边框样式属性为“固定对话框”，背景颜色为“黄色”。 2．如图2所示，在表单上部添加一个标签控件，用来显示鼠标的位置，并将其对象名修改为COORD，背景样式设置为“透明”。 3．在表单的下部添加一个文本框控件（对象名为Text1）和计时器控件（对象名为Timer1），并设置计时器控件的有关属性，使得表单运行时触发计时器事件的间隔时间为5秒。 4．编写计时器控件的Timer事件代码，实现在文本框中显示当前的系统日期和时间。 程序改错（5分） 下列程序的功能是：删除字符串（不包括汉字）中的空格，并将它按字符从小到大的顺序排列以后输出。例如，字符串“B C efA”，输出结果为“ABCef”。要求： 将下列程序输入到项目中的程序文件PCODE中，并对其中的2条错误语句进行修改 在修改程序时，不允许修改程序的总体框架和算法，不允许增加或减少语句数目。 CLEAR x=B C efA y= x=STRTRAN(x,SPACE(1),SPACE(0)) n=LEN(x) DIMENSION A(n) FOR i=1 TO n A(i)=LEFT(x,1) x=SUBSTR(x,i) ENDFOR =ASORT(A) ASORT()函数的功能是对数组元素进行排序 FOR j=1 TO n y=A(j)+y ENDFOR ?y 09年春VFP02 项目、数据库和表操作（12分） 打开T盘根目录的项目文件JXGL，在该项目已有一数据库JXSJ。 在JXSJ数据库中按如下表格中所示的结构创建TAB.DBF表，并按表格后的要求设置相关属性。 字段名 数据类型 宽度 字段标题 Cdcs C 40 传递城市 Bc I 棒次 Xm C 50 火炬手姓名 Jj M 火炬手简介 设置TAB表的注释：火炬传递人员信息表； 设置Bc字段的有效性规则及信息：棒次必须在1至300之间！； 将Bc字段的默认值设置为1； 创建主索引，索引名为abcd，要求按传递城市和棒次顺序排列。 在TAB表中输入如下记录： Cdcs Bc Xm Jj 南京 1 杨阳 曾被誉为世界羽坛“四大天王”之首 修改JC表中的数据，将所有教材名称字段内容的两端加书名号“《》”，要求书名的最后一个字与右书名号“》”之间不允许留有空格。 设置JC表的删除触发器，要求只允许删除出版