上半年管理系统中计算机的应用模考及答案整理.docx

1、上半年管理系统中计算机的应用模考及答案整理2012年上半年管理系统中计算机应用模拟试题一：说明1.本实验课程考试，统一在Visual Foxpro 6.0环境中进行2.考试时间1小时3.答题内容放在E盘下KS 目录中二：试题暑期将近，正值旅游黄金季节，人们纷纷制定出游计划，请你设计一个北京出发的国内游管理系统。系统需要设置2个表。 “旅游线路表”的结构与记录字段名字段类型字段宽度小数位数线路字符型6出发日期日期型8团队等级字符型6 交通字符4导游推荐备注型4 线路 出发日期 团队等级 交通 导游推荐 丽江 07/01/2012 豪华团 双飞 亲子产品 三亚 08/04/2012 经济团 单飞

2、接机服务 张家界 07/28/2012 舒适团 高铁 九寨沟 08/01/2012 豪华团 双飞 香港 08/26/2012 舒适团 高铁 “旅游销售表”的结构与记录字段名字段类型字段宽度小数位数订单号字符型6线路字符型6报价整型4人数数值型3招商卡逻辑型1主题类型字符型4总价数值型5 订单号 线路 报价 人数 招商卡 主题类型 总价 BJ0001 三亚 2710 4 .T. 蜜月 8840 BJ0002 香港 4699 2 .F. 购物 9398 BJ0003 丽江 2360 3 .F. 民俗 7080 BJ0004 香港 4699 2 .T. 蜜月 8398 三、考试要求1建立名为“MYP

3、ROJ”的项目。按要求建立上述2个库表，并建立表间关联；在旅游销售表设计器中，设置人数必须在1人到100人之间，否则，显示“人数输入有误”，字段的默认值为2人；设置参照完整性:如果旅游线路表中没有此旅游线路,则不能组团参加该线路旅游，即旅游销售表中将不能有该线路记录。 （15分）2在项目中建立菜单MYMENU，菜单项包括数据管理、数据查询、数据统计、数据打印、个人信息和退出6项。“数据管理”项包括“录入”、“修改”2个一级子菜单；为“数据打印”设置快捷键CTRL+P；创建快捷菜单MYQUICK,具有打开,复制,删除三个菜单项,其中为删除项设置热键D,复制和删除之间用分割线隔开，然后在表单MYF

4、ORM12中调用此快捷菜单。（10分）3.设置主控程序（5分）4在“数据管理”项中，以“旅游销售表”记录为依据完成对数据的录入和修改，表单分别命名为MYFORM11、MYFORM12.在【录入】页面：请通过观察“订单号”实际内容设置相应输入掩码；报价字段设置为5位整数； “主题类型”可通过组合框选择“蜜月、购物、民俗”3个选项；若使用招商卡，则每单立减500元；选择合适的表单控件，输入“招商卡”字段的内容；“总价”字段内容通过报价人数自动算出，且内容为只读；“人数”字段内容为“总价”字段前最后要输入的内容。 （15分）在【修改】页面：通过输入订单号实现对“旅游销售表”相关数据的修改及删除。在此

5、表单中设置调用快捷菜单。（10分）5创建以MYFORM21命名的综合查询表单，用户利用组合框选择团队等级（豪华团、经济团、舒适团），通过表格控件显示线路、出发日期、团队等级和交通字段的内容。 （10分）6点击数据统计时，通过页框控件中的两页实现对“主题类型”和“交通”各类旅游的统计，其中查询条件以组合框实现。查询及输出结果均在各自表中进行。（10分）7. 点击数据打印时，输出以MYREPORT命名的报表，它是一个集报表标题（旅游销售统计表）、汇总信息和表格线为一体的报表，以 “旅游销售表”为内容，按主题类型横向输出：订单号、线路、人数、主题类型、总价5项内容，报表结尾显示蜜月旅行的单笔最低总价

6、及制表人姓名，标题旁显示制表年月（格式：年月）。（10分）8. 创建以MYINFO命名的个人信息表单。要求显示考生的真实姓名、准考证号、联系电话、考试机位和试卷号。（5分）9点击菜单退出时，返回系统菜单，关闭所有VFP程序及数据。（5分）10.连编项目，生成一个可执行文件（.EXE文件） （5分）2012年上半年管理系统中计算机应用模拟试题答案开发项目基本步骤:1. 建立项目文件2. 在项目中建立数据库、表、触发器、索引、关联并建立相应参照完整性规则；3. 设计菜单4. 设计主控程序；5. 设计表单及相应脚本；6. 设计报表；7. 连编应用程序一、1. 在系统菜单中文件新建创建新项目（存为文件

7、名MYPROJ）2. 先建立“国内游管理”数据库项目管理器 数据 数据库 新建新建数据库国内游管理在“国内游管理”的数据库下的表中，建立两个库表：旅游线路表和旅游销售表，并进行关联图示：旅游线路表图示：旅游销售表关于人数字段的设计如下：图示：两个表之间的关联，打开菜单显示 数据库设计器，调出两个表，先进行关联，然后用右键调出编辑参照完整性，然后再按提示操作，点击删除规则中的级联二、1、在项目管理其他 菜单 新建 菜单中新建菜单MYMENU图示：“录入”选项的命令：DO FORM MYFORM11“修改”选项的命令：DO FORM MYFORM12“数据查询”选项的命令：DO FORM MYFO

8、RM21“数据统计”选项的命令：DO FORM MYFORM31“数据打印”选项的命令：REPORT FORM MYREPORT PREVIEW“个人信息”选项的命令：DO FORM MYINFO“退出”菜单的过程：CLEA EVENTS CLEA ALL SET SYSMENU TO DEFA定义数据打印的快捷键：单击“数据打印”菜单项右侧的“选项”按钮，屏幕显示“提示选项”对话框，键入快捷键CTRL+P2、在项目管理其他 菜单 新建 菜单中新建快捷菜单MYQUICK图示：三、设置主控程序：项目管理器代码 程序 新建 编写完成后，关闭保存MAIN.PRG程序代码如下：SET TALK OFF

9、SET SAFE OFFCLEA ALLSET DELE ONDO MYMENU.MPRREAD EVENTRETU四、1、录入表单：项目管理器文档 表单 新建 新建表单，最后存名为MYFORM11属性：FORM的CAPTION录入TEXT1的INPUTMASK=BJ9999TEXT3的INPUTMASK=99999;VALUE=0TEXT4的VALUE=0TEXT5的VALUE=0;READONLY=.T.COMBO1的ROWSOURCE=豪华团,经济团,舒适团;ROWSOURCETYPE=1CHECK1的VALUE=.F.COMMAND1的CAPTION=确定COMMAND2的CAPTIO

10、N=退出图示：TEXT4的LOSTFOCUS事件:IF THISFORM.CHECK1.VALUE=.T.THISFORM.TEXT5.VALUE=THISFORM.TEXT3.VALUE*THISFORM.TEXT4.VALUE-THISFORM.TEXT4.VALUE*500ELSETHISFORM.TEXT5.VALUE=THISFORM.TEXT3.VALUE*THISFORM.TEXT4.VALUEENDIF确定按钮CLICK事件APPE BLANREPL 订单号 WITH ALLT(THISFORM.TEXT1.VALUE)REPL 线路 WITH ALLT(THISFORM.TE

11、XT2.VALUE)REPL 主题类型 WITH ALLT(THISFORM.COMBO1.VALUE)REPL 报价 WITH THISFORM.TEXT3.VALUEREPL 招商卡 WITH THISFORM.CHECK1.VALUEREPL 人数 WITH THISFORM.TEXT4.VALUEREPL 总价 WITH THISFORM.TEXT5.VALUETHISFORM.TEXT1.VALUE=THISFORM.TEXT2.VALUE=THISFORM.COMBO1.VALUE=THISFORM.TEXT3.VALUE=0THISFORM.CHECK1.VALUE=.F.THI

12、SFORM.TEXT4.VALUE=0THISFORM.TEXT5.VALUE=0退出按钮的CLICK事件THISFORM.RELEASE2、修改表单：项目管理器文档 表单 新建 新建表单，最后存名为MYFORM12属性：数据环境中的”旅游销售表”的EXCLUSIVE=.T.FORM的CAPTION修改TEXT1的INPUTMASK=BJ9999TEXT2的CONTROLSOURCE=旅游销售表.线路TEXT3的INPUTMASK=99999;VALUE=0; CONTROLSOURCE=旅游销售表.报价TEXT4的VALUE=0; CONTROLSOURCE=旅游销售表.人数TEXT5的VA

13、LUE=0;READONLY=.T.; CONTROLSOURCE=旅游销售表.总价COMBO1的ROWSOURCE=豪华团,经济团,舒适团;ROWSOURCETYPE=1; CONTROLSOURCE=旅游销售表.主题类型CHECK1的VALUE=.F.; CONTROLSOURCE=旅游销售表.招商卡COMMAND1的CAPTION=修改COMMAND2的CAPTION=删除COMMAND3的CAPTION=退出图示:_FORM1的INIT事件:USE 旅游销售表 EXCLFORM1的DESTROY事件:PACKUSETEXT1的LOSTFOCUS事件:LOCA FOR 订单号=ALLT(

14、THISFORM.TEXT1.VALUE)IF EOF()MESSAGEBOX(没有此订单,请重新输入！,64,提示)THISFORM.TEXT1.VALUE=THISFORM.TEXT1.SETFOCUSENDIFTHISFORM.REFRESHTEXT4的LOSTFOCUS事件:IF THISFORM.CHECK1.VALUE=.T.THISFORM.TEXT5.VALUE=THISFORM.TEXT3.VALUE*THISFORM.TEXT4.VALUE-THISFORM.TEXT4.VALUE*500ELSETHISFORM.TEXT5.VALUE=THISFORM.TEXT3.VAL

15、UE*THISFORM.TEXT4.VALUEENDIF修改按钮CLICK事件THISFORM.TEXT1.SETFOCUS删除按钮CLICK事件XZ=MESSAGEBOX(确定要删除吗？,1+64,提示)IF XZ=1DELEELSETHISFORM.TEXT1.SETFOCUSENDIFTHISFORM.TEXT1.VALUE=THISFORM.TEXT2.VALUE=THISFORM.TEXT3.VALUE=0THISFORM.TEXT4.VALUE=0THISFORM.TEXT5.VALUE=0THISFORM.COMBO1.VALUE=THISFORM.CHECK1.VALUE=.F

16、.退出按钮的CLICK事件THISFORM.RELEASE五、综合查询表单图示:属性:FORM的CAPTION=综合查询COMMAND1的CAPTION=退出LABEL1的CAPTION=按团队等级查询相关线路信息COMBO1的ROWSOURCE=豪华团,经济团,舒适团COMBO1的ROWSOURCETYPE=1COMBO1的INTERACTIVECHANGE事件:SELE 线路,出发日期,团队等级,交通 FROM 旅游线路表 WHERE 团队等级=THISFORM.COMBO1.VALUE;INTO TABLE CXTHISFORM.GRID1.RECORDSOURCE=CXTHISFORM

17、.GRID1.COLUMN1.WIDTH=75THISFORM.GRID1.COLUMN2.WIDTH=75THISFORM.GRID1.COLUMN3.WIDTH=75THISFORM.GRID1.COLUMN4.WIDTH=75退出按钮的CLICK事件THISFORM.RELEASE六、数据统计表单图示交通查询在PAGE2属性：FORM的CAPTION=数据统计PAGEFRAME1.PAGE1.CAPTION=按主题类型统计PAGEFRAME1.PAGE2.CAPTION=按交通统计PAGE1.LABEL1.CAPTION=请选择主题类型PAGE1.LABEL3.CAPTION=旅游共有P

18、AGE1.LABEL5.CAPTION=种PAGE2.LABEL1.CAPTION=请选择交通PAGE2.LABEL3.CAPTION=共有PAGE2.LABEL5.CAPTION=种COMMAND1.CAPTION=退出PAGE1.COMBO1.ROWSOURCE=蜜月,购物,民俗PAGE1.COMBO1.ROWSOURCETYPE=1PAGE2.COMBO1.ROWSOURCE=双飞,单飞,高铁PAGE2.COMBO1.ROWSOURCETYPE=1PAGE1.COMBO1的INTERACTIVECHANGE事件:SELE COUNT(*) FROM 旅游销售表WHERE主题类型=THIS

19、FORM.PAGEFRAME1.PAGE1.COMBO1.VALUE INTO ARRAY ATHISFORM.PAGEFRAME1.PAGE1.LABEL2.CAPTION=THISFORM.PAGEFRAME1.PAGE1.COMBO1.VALUE THISFORM.PAGEFRAME1.PAGE1.LABEL4.CAPTION=STR(A(1),3)PAGE2.COMBO1的INTERACTIVECHANGE事件:SELE COUNT(*) FROM 旅游线路表 WHERE 交通=THISFORM.PAGEFRAME1.PAGE2.COMBO1.VALUE INTO ARRAY ATHI

20、SFORM.PAGEFRAME1.PAGE2.LABEL2.CAPTION=THISFORM.PAGEFRAME1.PAGE2.COMBO1.VALUE THISFORM.PAGEFRAME1.PAGE2.LABEL4.CAPTION=STR(A(1),3)退出按钮的CLICK事件THISFORM.RELEASE七、数据打印：文档报表新建新建报表1、在报表设计器空白处：右键数据环境在数据环境设计器中 右键 添加旅游销售表2、报表设计器中的数据环境选中旅游销售表，右键属性 ORDER=主题类型3、报表数据分组 点击浏览按钮双击旅游销售表.主题类型4、调出报表控件工具栏：显示报表控件工具栏，用域控

21、件添加日期函数YEAR(DATE()，用标签写上年，用域控件添加月函数MONTH(DATE()，用标签写上月5、用域控件在组注脚添加变量函数页_pageno6、在标题区用标签写上：旅游销售统计表，在页标头区用标签分别写上：订单号，线路，人数，主题类型，总价，并划上线。标题区的调出：报表标题总结选择标题7、在组标头区用域控件分别调出：订单号，线路，人数，主题类型，总价，并划上线8、在总结区用标签写上：制表人：某某某 ，用标签写上：蜜月旅行单笔最低售价，用域控件在表达式中输入：IIF(旅游销售表.主题类型=蜜月, 旅游销售表.总价,99999)，点击计算选择最小值，用标签写上元.八、创建个人信息菜单，全部用标签，加一个退出命令，退出的CLICK事件为：THISFORM.RELEASE九、连编为可执行文件。