第67套Word下载.docx

1、在考生文件夹下，打开招生数据库SDB，完成如下简单应用：1. 使用一对多表单向导选择KSB表和KSCJB表生成一个名为TWO的表单。要求从父表KSB中选择所有字段，从子表KSCJB中选择所有字段，使用建立两表之间的关系，样式为阴影式；按钮类型为图片按钮；排序字段为考生号（来自KSB），升序；表单标题为考生数据输入维护2. 在考生文件夹下打开命令文件THREE.PRG，该命令文件用来查询所有成绩都高于或等于平均分的学生的考生号和姓名。并将查询结果存储到表THREE中。注意，该命令文件在第3行、第6行、第9行有错误,打开该命令文件，直接在错误处修改，不可改变 SQL语句的结构和短语的顺序，不允许增

2、加、删除或合并行。命令文件THREE.PRG的内容如下：1.按向导的要求设置即可。2.第3行改为：INTO array tem第6行改为：WHERE not exists;第9行改为：WHERE 成绩 =330sele 4use t1appe blankgath from kkkloca for 考生号=a.考生号 do while found（）sele 3use dmloca for 考试科目=b.考试科目 do case case 考试科目名=政治repl 政治成绩 with b.成绩 case 考试科目名=外语repl 外语成绩 with b.成绩 高等数学repl 高数成绩 with

3、 b.成绩 专业课repl 专业课成绩 with b.成绩 endcasecontenddoendifskiprepl all 总成绩 with 政治成绩+外语成绩+高数成绩+专业课成绩 sort on 总成绩/D to four设置“退出”按钮的Click事件代码为：Thisform.release本题所用到的表为：在考生文件夹下，完成如下操作:1. 打开学生管理数据库，并从中永久删除学生表。2. 建立一个自由表教师，表结构如下： 编号 字符型（8） 姓名 字符型（10） 性别 字符型（2） 职称 字符型（8） 3. 利用查询设计器建立一个查询，该查询包含课程名为数据库的课程表中的全部信息，

4、生成的查询保存为query。4. 用SQL UPDATE语句将表中课程名为的课程的任课教师更改为 T2222, 并将相应的SQL语句存储在文件Four.prg中。1.单击“打开”工具，选择文件类型为“数据库”，双击考生文件夹下的“学生管理”数据库，在随后打开的“数据库设计器”中，用鼠标右键单击“学生”表，在出现的快捷菜单中单击“删除”，有出现的对话框中单击“删除”按钮。2.选使用命令CLOSE ALL关闭所有的数据库，再使用命令“CREATE 教师”建立自由表，在“表设计器”中分别输入每个字段的字段名、类型、宽度，最后单击“表设计器”中的“确定”按钮。3.单击“新建”工具，在出现的“新建”对话

5、框中选择“查询”，单击“新建文件”按钮，将“课程”表添加到查询设计器中，在“字段”卡中选择所有字段，在“筛选”选项卡中给出条件：课程名=”数据库”,单击“保存”工具，给出查询文件名“query.qpr”，单击“确定”按钮。使用命令：MODI COMM FOUR进入编辑状态，输入下列代码，并保存、运行：upda 课程 set 任课教师= where 课程名=在考生目录下完成如下简单应用：1. 建立表单，表单文件名和表单控件名均为formtest，表单标题 为考试系统，表单背景为灰色（BackColor=192,192,192）,其他要求如下:（1） 表单上有欢迎使用考试系统（Label1）8个字

6、，其背景颜色为灰色 （BackColor=192,192,192），字体为楷体，字号为24，字的颜色为桔红色 （ForeColor=255,128,0）；当表单运行时，8个字向表单左 侧移动，移动由计时器控件Timer1控制，间隔（interval属性）是每200毫秒左移 10个点（提示：在Timer1控件的Timer事件中写语句 THISFORM.Label1.Left=THISFORM.Label1.Left-10） 当完全移出表单后，又会从表单右侧移入。（2） 表单有一命令按钮（Command1） ，按钮标题为关闭，表单运行时单击 此按钮关闭并释放表单。2. 在数据库中利用视图设计器建立

7、一个视图sview，该视图包含 3个字段课程编号、课程名和选课人数。然后利用报表向导生成一个报表creport, 该报表包含视图sview的全部字段和内容。1.单击“新建”工具，在“新建”对话框中选择“表单”，单击“新建文件”按钮，进入表单设计器后，单击“保存”工具，输入文件名：formtest，用鼠标右键单击表单，在快捷菜单中选择“属性”，在属性窗口中，将Name属性改为：formtest，Caption属性改为：考试系统。打开“表单控件”工具栏，在表单上添加标签label1,打开其属性窗口，分别设置其Caption属性为：欢迎使用考试系统；设置其Backcolor属性为：192,192,1

8、92；Forecolor属性为：255,128,0；FontName属性为：楷体；Fontsize属性为24；在表单上添加计时器控件timer1,设置其Interval属性为200，设置其timer事件代码为：if thisform.label1.left+thisform.label1.width=0thisform.label1.left=thisform.widthelsethisform.label1.left=thisform.label1.left-10添加命令按钮，将其caption属性改为：关闭，其Click事件代码为：设置的结果如下图：2.先打开数据库，再使用新建视图，分别添

9、加“课程”、“考试成绩”两个表，在“选取字段”、“排序条件”、“分组字段”中分别输入下图所示的内容，以sview为名保存，最后单击“运行”工具。单击“新建”工具，在“新建”对话框内选择“报表”，单击“向导”按钮，然后按题目要求设置向导的每一步即可。在考生目录下有myform表单文件，将该表单设置为顶层表单，然后设计一个菜单，并将新建立的菜单应用于该表单（在表单的load事件中运行菜单程序）。新建立的菜单文件名为mymenu，结构如下（表单、报表和退出是菜单栏中的 3个菜单项）：表单 浏览课程 浏览选课统计 报表 预览报表 退出 各菜单项的功能如下： 选择浏览课程时在表单的表格控件中显示表的内容

10、（在过程中完成，直接指定表名）；浏览选课统计时在表单的表格控件中显示简单应用题建立的视图sview的内容（在过程中完成，直接指定视图名）；预览报表时预览简单应用题建立的报表creport（在命令中完成）；时关闭和释放表单（在命令中完成）。注意：最后要生成菜单程序, 并注意该菜单将作为顶层表单的菜单。Myform表单如下图：第一步：新建菜单，进入菜单设计器，设置菜单栏和菜单项，其中，菜单项的“过程”或“命令”代码分别设置为：浏览课程：myform.grid1.recordsource=浏览选课统计：open data 学生管理 sview预览报表：report form creport prev

11、iew退出：myform.release单击“显示”菜单下的“常规选项”功能，选中其中的“顶层表单”复选框，用文件名“mymenu”保存菜单,单击“菜单”菜单下的“生成”功能，生成菜单程序文件mymenu.mpr。第二步：打开表单，将表单的ShowWindow属性设置为2，设置该表单的Load 事件代码为：do mymenu.mpr with THIS,.t.。附：本题相关表 一、基本操作题（共4小题，第1和2题是7分、第3和4题是8分）在考生文件夹下完成如下操作:1. 新建一个名称为外汇数据的数据库。2. 将自由表rate_exchange和currency_sl添加到数据库中。外币代码字段

12、为rate_exchange 和currency_sl 建立永久联系（如果必要请建立相关索引）。4. 打开表单文件test_form，该表单的界面如下图所示，请将标签用户名口令的字体都改为黑体1.单击工具栏上的“新建”按扭，选择“数据库”，然后单击“新建文件”。3.在数据库设计器中建立关系。分析：rate_exchange为父表，currency_sl为子表。在rate_exchang中为“外币代码”建立主索引；在currency_sl中“外币代码”建立普通索引。（建立方法同前套题目中索引的建立方法，此处略）然后将主表中的主索引“外币代码”拖放到子表中的“外币代码”索引处，建立永久关系。二、简

13、单应用（2小题，每题20分，计40分）在考生文件夹下完成如下简单应用:1. rate_pro.prg中的程序功能是计算出林诗因所持有的全部外币相当于人民币的价值数量，summ中存放的是结果。注意:某种外币相当于人民币数量的计算公式：人民币价值数量= 该种外币的现钞买入价* 该种外币持有数量请在指定位置修改程序的语句，不得增加或删除程序行，请保存所做的修改。2. 建立一个名为menu_rate的菜单，菜单中有两个菜单项查询项下中还有一个子菜单，子菜单有日元、欧元美元三个选项。在菜单项下创建过程，该过程负责返回系统菜单。1.打开rate_pro.prg文件，内容如下：单击工具栏上的“新建”按扭，选

14、择“菜单”，然后单击“新建文件”。在对话框中单击“菜单”。（或用命令crea menu menu_rate） 先设置主菜单，如下：设置“查询”菜单的结果为“子菜单”，“退出”菜单的结果为“过程”，且过程的代码为：set defa to sysmenu创建“查询”的子菜单如下：保存退出，菜单文件名为：menu_rate三、综合应用（1小题，计30分）设计一个文件名和表单名均为myrate的表单，所有控件的属性必须在表单设计器的属性窗口中设置。表单的标题为外汇持有情况表单中有一个选项组控件（命名为myOption）和两个命令按钮统计（command1）和（command2）。其中，选项组控件有三个

15、按钮运行表单时,首先在选项组控件中选择或,单击命令按钮后，根据选项组控件的选择将持有相应外币的人的姓名和持有数量分别存入rate_ry.dbf（日元）或rate_my.dbf（美元）或rate_oy（欧元）中。单击按钮时关闭表单。表单建成后，要求运行表单，并分别统计的持有数量。（1）单击工具栏的“新建”按扭，选择“表单”，再单击“新建文件”，启动“表单设计器”。（2）按照题目要求添加控件，如图：选中“选项按扭组”，单击右键，选择编辑，然后设置每个选项按扭的caption依次为：日元、美元和欧元。设置两个命令按扭的caption为：统计和退出。（3）编写事件代码。“统计”按扭的click 代码如

16、下：x=thisform.myoption.valuedo casecase x=1SELECT Currency_sl.姓名, Currency_sl.持有数量;FROM 外汇数据!rate_exchange INNER JOIN 外汇数据!currency_sl ;ON Rate_exchange.外币代码 = Currency_sl.外币代码;WHERE Rate_exchange.外币名称 = ;INTO TABLE rate_ry.dbfcase x=2INTO TABLE rate_my.dbfcase x=3INTO TABLE rate_oy.dbfEndcase“退出”按扭的

17、click代码：thisform.release 解题技巧：“统计”按扭的代码可以用“查询设计器”做完，然后查看sql把代码复制过来；每个分支粘贴一次，然后作少量的修改。附数据表内容和结构如下：1. 建立一个名称为外汇管理2. 将表currency_sl.DBF和rate_exchange.DBF添加到新建立的数据库中。3. 将表rate_exchange.DBF中买出价字段的名称改为现钞卖出价4. 通过字段建立表rate_exchange.DBF和currency_sl.DBF之间的一对多永久联系（需要首先建立相关索引）。1.利用“新建”工具创建数据库。（操作略） 操作略。（见前面章节） 2

18、.在“数据库设计器”选中rate_exchange表，单击右键选择“修改”进入到“表设计器”，修改字段名。分析可知：rate_exchange表是父表，currency_sl是子表。在rate_exchange中通过“外币代码”建立主索引，在currency_sl中通过“外币代码”建立普通索引；然后为两表建立永久关系。（操作略）1. 在建立的数据库中利用视图设计器建立满足如下要求的视图:1） 视图按顺序包含列Currency_sl.姓名、Rate_exchange.外币名称、Currency_sl.持有数量和表达式Rate_exchange.基准价* Currency_sl.持有数量；2） 按

19、Rate_exchange.基准价* Currency_sl.持有数量降序排序；3） 将视图保存为view_rate。2. 使用SQL SELECT语句完成一个汇总查询，结果保存在results.dbf表中，该表含有姓名人民币价值两个字段（其中为每人持有外币的的合计），结果按降序排序。1.利用“新建”工具创建视图，启动“视图设计器”。（1）添加表到“视图设计器”中。（2）设置输出的列。（3）设置排序依据。（4）保存视图。方法一 查询设计器 新建一个查询，启动“查询设计器”。添加表。设置输出字段。人民币价值可用表达式生成器生成，如下：然后将其放到选定字段中。设置排序依据。输出设置。分组设置。（以

20、姓名分组） 运行查询。方法二 在命令窗口输入SQL语句。SELECT Currency_sl.姓名,;SUM（Currency_sl.持有数量*Rate_exchange.基准价） as 人民币价值; 外汇管理!currency_sl INNER JOIN 外汇管理!rate_exchange ; Currency_sl.外币代码 = Rate_exchange.外币代码;GROUP BY Currency_sl.姓名;ORDER BY 2 DESC;INTO TABLE results.dbf 设计一个表单，所有控件的属性必须在表单设计器的属性窗口中设置，表单文件名为外汇浏览，表单界面如下所

21、示：其中：1. 输入姓名为标签控件Label1；2. 表单标题为外汇查询3. 文本框的名称为Text1，用于输入要查询的姓名，如张三丰；4. 表格控件的名称为Grid1，用于显示所查询人持有的外币名称和持有数量，RecordSourceType的属性为4（SQL说明）；5. 命令按钮的名称为Command1，单击该按钮时在表格控件Grid1中按持有数量升序显示所查询人持有的外币名称和数量（如上图所示），并将结果存储在以姓名命名的DBF表文件中，如张三丰.DBF；6. 命令按钮的名称为Command2，单击该按钮时关闭表单。完成以上表单设计后运行该表单，并分别查询张三丰李寻欢所持有的外币名称和持

22、有数量。先建立一空白表单。添加控件到表单上。在属性窗口设置属性。标签的caption设为输入姓名表单的caption设为外汇查询表格控件的RecordSourceType的属性为4（SQL说明）两个明令按扭的caption依次设为：查询和退出编写事件代码 “查询”按扭的click代码如下：x=allt（thisform.text1.value）thisform.grid1.recordsourcetype=4thisform.grid1.recordsource=;SELECT Rate_exchange.外币名称, Currency_sl.持有数量;WHERE Currency_sl.姓名 =x;ORDER BY Currency_sl.持有数量;INTO TABLE &xthisform.refresh上面代码中的SQL部分可用“查询设计器”得