标准管理系统中计算机应用实践考试上机考题及操作步骤辅导.doc

管理系统中计算机应用实践步骤教导
（历年考试题）

考试要求
一、 说明
1、 依据要求编制程序，实现给定功效
2、 考试时间1个小时
3、 所做内容放在F盘下KS目录中，同时拷贝一份在软盘中，软盘由监考老师统一发给，尤其注意检验软盘，确保拷贝正确。同时在软盘上写上考试机位、考生姓名、准考证号码和联络电话。
二、 试题
下面实营销人员业绩管理系统中三个库表，数据结构以下：
表“商品基础情况表”数据表结构定义表
字段名
标题
数据类型
字段宽度
小数点位
SNO
商品编码
C
3

SNAME
商品名称
C
10

SAMOUT
库存数量
N
5

SPRICE
单价
N
6
2
字段名最好使用汉字，这么在后面表单中字段名称就能够按汉字显示了！（在本资料中，为节省时间，没有使用汉字）

“商品基础情况表”数据表统计

表“员工销售统计表”数据表结构定义表

“员工销售统计表”

表“员工统计表”数据表结构定义表

员工统计表

三、 考试要求：（考试环境：VFP6.0以上）(1月考试真题)
1、 建立上述三个数据表和索引，并用商品编码、员工号建立表间关联。（20分）
2、 建立一个项目，名字为myproj，并把数据库加入到myproj中。在myproj建立菜单mymenu，菜单包含数据维护、查询、统计、个人信息和退出五个项目。（20分）
3、 点击数据维护时，弹出MYFORM1表单，选择某个数据表进行数据增、删、改。（20分）
4、 点击查询时，弹出MYFORM2表单，实现经过商品编码查询商品库存数量、单价等基础情况；经过部门查询该部门员工基础情况；经过员工号查询给顶日期该员工销售商品名称和单价等。（30分）
5、 点击统计时，弹出MYFORM3表单，按商品号和员工号统计销售量。（选做）
6、 点击个人信息时，弹出MYINFO表单，显示考生真实姓名、考试机位、准考证号和联络电话。（5分）
7、 点击退出时，返回系统菜单，关闭数据库。（5分）

操作指导
操作基础步骤：
一、 建立项目文件
二、 建立数据库
三、 设计菜单
四、 建立对应表单
五、 设计主控文件
六、 连编应用程序

一、建立项目文件
（1） 选择文件菜单à新建à选择建立项目文件
（2） 项目保留位置选择F：盘KS文件夹，依据要求输入项目名称，

（3） 结果图

（4） 能够设计默认文件夹，方法 【工具菜单】à【选项】à【文件位置】à【默认目录】à修改

注意：要选择“设置为默认值”按钮！

三、建立数据库
1、创建数据库
项目管理器à数据选项卡à数据库à新建
1
2
3
4

2、 选择文件夹位置和文件名（注意，这是最关键）

3、 鼠标点击“保留”按钮后，就建立了数据库。
4、 在数据库设计器中新建表，或在项目管理器中选择新建表，进入到表设计过程中。
使用项目管理器建立数据表。

在数据库设计器中，能够使用三种方法建立新数据表。
1） 使用“数据库”菜单
2） 使用快捷菜单（鼠标右键点击数据库设计器空白处）
3） 使用数据库设计工具栏
新建数据表
使用工具栏
使用快捷菜单

5、 系统弹出对话框选择新建表。
6、 输入表名字和数据表存放位置，注意保留文件夹位置。

7、 在表设计器中建立表结构，图所表示

注意：考试时候字段类型可能是英文名称注意对照
数据类型汉字名称
英文名称
简写
字符型
Character
C
日期型
Date
D
数值型
Numeric
N

8、建立索引，注意索引类型
建立一般索引

切换到索引选项卡，将索引修改为主索引

修改前
使用此组合框
修改

修改后：

9、按确定按钮，系统提醒是否输入数据，能够选择输入数据

10、输入数据，若发觉输入数据有问题，则说明表结构没有设置正确，能够重新修改。
11、假如输入数据不完整，能够使用添加统计方法补充输入。关键操作： 在项目管理器中选择数据表à选择浏览

然后选择显示菜单中添加数据命令。（注意输入数据有编辑和浏览两种方法，随意选择）

12、使用一样方法建立其它两个表，其中表索引建立以下：

13、进入到数据库设计器

使用鼠标拖动方法建立关系，结果以下：

四、 设计菜单
1）依据要求，先设计菜单结构，然后建立菜单，在以后表单建立后，再用菜单连接表单。假如事先能分配表单名称（如考试要求）则在这一步就能够分配命令了。
主菜单栏设计，依据要求，设计以下：(假如VFP不是十分熟练，设计主菜单就能够，在后面我们设计了子菜单系统，请依据自己情况决定)
菜单结构
数据维护

数据查询

数据统计

个人信息

退出

2）子菜单需要自己设计，其中“个人信息”和“退出”没有子菜单。数据维护和数据查询每一个数据表最少有一个表单，所以各有三个子菜单，对应后面设计表单。数据统计关键是针对“销售表”进行，能够建立两个统计表，分别按商品编码统计和按员工统计。所以建立菜单结构应该以下图所表示！

1
3）菜单设计，项目管理器à其它选项卡à菜单à新建
3
2

然后选择“菜单”
4

进入到菜单设计器，设计以下

注意：前三项结果全部是“子菜单”
“个人信息”结果是是“命令”，命令以下
DO form myinfo

Myinfo 个人信息表单，已经设计好，假如没有，就得自己设计了，设计方法见后面内容。
“退出”结果选择是过程，点击“创建”输入以下程序，注意程序是固定
clear events &&清除事件处理
close all
set sysmenu to default

数据维护子菜单设计以下：

注意：结果选择是 “命令”，myform是后面建立表单名称，在后面设计时候注意名称对应关系和编码方法。
其它子菜单设计类似：数据维护子菜单
切换到主菜单设计

数据查询子菜单

数据统计子菜单

4）菜单保留和生成
菜单保留名称“MYMENU”（注意要跟后面主程序一致），菜单必需“生成”才能使用。
实施 菜单à生成

在生成前保留菜单

五、设计主控程序
1、每个应用程序（项目）起点程序称为主控程序，其关键功效以下：

初始化设置

实施程序主菜单（或主控表单）

恢复系统

2、设计主控程序
1
1） 在项目管理器中第一个程序（或表单）自动为系统主控程序，项目管理器à新建à输入程序à保留文件（注意保留位置）
3
2

4

输入程序，然后选择文件菜单à保留。

2） 能够在项目管理器中指定主控程序
鼠标右键点击，选择“设置主文件”
3） 大多数主控程序文件名为“main.prg”
4） 主控程序在项目管理器中加粗显示。
鼠标右键点击，选择“设置主文件”

3、大多数主控程序基础类似，所以以下程序需要记忆
程序
说明
set talk off
set safety off
clear all
close all
set dele on
do mymenu.mpr
read event
set sysmenu to default
return
严禁显示命令对话结果
在改写已经有文件时不显示对话框
清除内存
关闭全部数据
设置操作范围不包含逻辑删除统计
实施主菜单
开始事件循环
恢复系统菜单
程序结束

六、数据维护表单设计
1、数据维护表单设计能够有多个方法，不过基础操作全部是一样，应该包含“增加、删除、修改”等功效，最简单方法时使用“表格控件”。尽管有时需要设计多个维护表单，实际上每个表单全部是类似，所以能够使用复制表单方法。
2、 表单设计基础步骤
1） 项目管理器à文档à表单à新建à新建表单（注意绝对严禁使用向导来设计表单）。

4
1
3
1
2
1
1
1

2） 修改表单CAPTION属性，输入“商品表数据维护表单”

假如看不到“属性”对话框或对应工具栏，能够使用以下两种方法设置
（1） 使用表单工具栏显示

设置TAB次序
显示数据环境
显示属性对话框
代码窗口
表单控件工具栏
调色板工具栏
布局工具栏
表单生成器
自动格式

（2） 使用显示菜单

（3） 鼠标右键点击表单

3） 添加数据环境，鼠标右键点击表单，在弹出菜单中选择“数据环境”，添加对应数据表，注意，因为设计数据添加删除，所以数据表应该使用独占方法打开。

鼠标右键点击

选择对应数据表，然后点击添加命令。然后点击关闭按钮。

选择表，然后在属性窗口中设置“Exclusive”属性为.t.

设置为.T.
Exclusive

4） 添加表格控件，并将其和数据表捆绑。有三种方法能够实现

方法一：从数据环境中拖动数据表到表单上（最简单），然后修改控件大小
拖动数据表标题到表单上，就能够在表单上添加对应表格控件。

方法二：
先在表单上添加一个表格控件，鼠标右键点击控件，在出现菜单中选择生成器，然后做对应设计
表格控件

2、添加字段
1、选择数据表

方法三：添加一个控件，然后设置对应属性。
数据源选择

5） 添加四个按钮控件，名称图，经过“CAPTIONS”属性设置。

6） 为表单和控件设置脚本程序

控件名称
事件
代码
表单
DESTROY
PACK
USE
添加
Click
APPEND BLANK
THISFORM.GRID1.COLUMN1.SETFOCUS
修改
Click
EDIT
删除
Click
if messagebox("一旦数据删除就不可恢复，真删除？",1+48+0,"信息提醒") =1
delete
thisform.refresh
endif
THISFORM.GRID1.COLUMN1.SETFOCUS
退出
Click
THISFORM.RELEASE

选择事件
选择控件

最终设计表单以下：

7） 保留表单，注意文件名和菜单保持一致

8） 其它两个表单设计大致相同，请自己设计，注意保留文件名，分别为“MYFORM12”，“MYFORM13”，在本材料中，我们设计查询表单另外两种格式，能够选择使用（注意，假如能设计有特点表单，轻易得分。）
9） ??MYFORM12设计，设计结果图显示，在左侧“列表框”（组合框）选择营业员编号，右边显示对应统计。关键操作步骤（1）新建一个表单，设定表单大小，输入“标题”à(2)在数据环境中添加对应数据表。à(3)经过鼠标拖动方法，添加对应文本框和标签à(4)添加一个列表框，使用生成器，将列表框和DNO字段绑定à（5）添加对应按钮à(6)编写对应脚本程序。(要求较高，不作要求，能够参见样本程序)

运行后表单（MYFORM12）

10） MYFORM13设计，使用“前进”，“后退”按钮，设计结果图。具体设计领省略。参见样本程序就能够了。

七、 数据查询表单设计
1、 数据查询是依据用户输入查询条件，显示满足条件统计，设计方法大致如前面，通常情况下使用“文本”控件输入查询条件。所以查询表单通常设置以下：

其中：查询CLICK事件设置以下：
set filter to sno = alltrim(thisform.text1.value)
thisform.refresh

注意：
（1） set filter to sno = alltrim(thisform.text1.value) 是设置数据过滤条件，请查看相关命令说明。
（2） sno为字段名，依据实际数据表实际字段名做对应修改
（3） 假如查询条件只有一个，表单页能够设计成以下样子：（MYFORM22.SCX）

这时，查询语句应该写在TEXT1控件LOSTFOCUS事件中

（4） 若查询包含多个表格，如“输入员工代码和日期查询商品基础情况表单”，这是比较难设计，你能够有三种选择：
1） 选择放弃，做一个简单类似替换。
2） 设计一个“本题视图”，然后和上面一样设计
3） 使用SQL查询语句，动态生成一个查询，然后挂接到表格控件上。
（5） 使用视图设计查询表单
1） 设计视图

分别选择“商品基础情况表”和“员工销售统计表”，并选择对应字段。

选择“添加”按钮，添加表关系。然后选择完成，保留视图。

输入名称，保留视图。

2） 依据视图设计查询表单（MYFORM23）
基础设计如前面表单，在添加数据环境时，注意使用视图

设计表单以下

注意：最好将TEXT2控件格式设置为日期型，方法以下

查询命令CLICK事件设置以下：
set filter to (dno = alltrim(thisform.text1.value) and;
sdate = thisform.text2.value)

thisform.refresh

注意：“；”是续行符。

假如TEXT2控件没有设计成日期格式，则以上命令要改成以下格式
set filter to (dno = alltrim(thisform.text1.value) and;
sdate = ctod(alltrim(thisform.text2.value)))

thisform.refresh

3） 使用查询（较难，若有问题，请发信至）

(1) 新建一个表单，设计标题，添加数据环境，图（注意添加两个数据表）

(2) 添加控件图

表格控件不用绑定数据表

运行结果

使用生成器，格式设置为
日期型

其中查询按钮Click脚本设计以下：（程序没有完善）

SELECT 员工销售统计表.DNO,商品基础情况表.sno,;
商品基础情况表.sname,员工销售统计表.sdate,;
员工销售统计表.damount, 商品基础情况表.sprice;
from 商品基础情况表,员工销售统计表;
where 商品基础情况表.sno = 员工销售统计表.sno AND;
DNO = ALLTRIM(THISFORM.TEXT1.VALUE) AND;
SDATE = THISFORM.TEXT2.VALUE;
INTO TABLE RESULT

THISFORM.GRID1.RECORDSOURCE = "RESULT"
THISFORM.REFRESH

八、 数据统计表单设计
1、 数据统计是依据用户输入统计条件，显示满足条件统计相关统计结果。
2、 统计相关命令：COUNT（计数）、SUM（求和）、AVERAGE（平均）
3、 设计基础步骤和上面相同，注意添加数据环境（数据表）
4、 按员工统计销售数量表单设计（MYFORM31）
1） 新建表单，添加数据表

2） 添加两个标签、两个文本框、一个命令按钮，图：

能够将TEXT2READONLY属性为 .T.
事件设计以下：

注意：对应字段名称依据实际设计做对应改变；必需使用“ALLTRIM”函数。
5、 另外一个表单设计类似。

九、 MYINFO表单设计
假如要设计话，这个表单基础使用标签就能够了，基础以下：

十、 连编应用程序

运行程序前，应该对系统进行连编，生成最终可实施文件。

十一、上交
退出VFP将F:盘整个KS文件拷贝到A:盘，在A:盘标签上写上自己信息。

祝诸位考试顺利！

上六个月《管理系统中计算机应用》模拟试题
一：说明
1.本试验课程考试，统一在Visual Foxpro 6.0环境中进行
2.考试时间1小时
3.答题内容放在E盘下KS 目录中

二：试题
暑期快要，正值旅游黄金季节，大家纷纷制订出游计划，请你设计一个北京出发中国游管理系统。系统需要设置2个表。
“旅游线路表”结构和统计
字段名
字段类型
字段宽度
小数位数
线路
字符型
6

出发日期
日期型
8

团体等级
字符型
6

交通
字符
4

导游推荐
备注型
4

线路 出发日期 团体等级 交通 导游推荐
丽江 07/01/ 豪华团 双飞 亲子产品
三亚 08/04/ 经济团 单飞 接机服务
张家界 07/28/ 舒适团 高铁
九寨沟 08/01/ 豪华团 双飞
香港 08/26/ 舒适团 高铁

“旅游销售表”结构和统计
字段名
字段类型
字段宽度
小数位数
订单号
字符型
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．建立名为“MYPROJ”项目。按要求建立上述2个库表，并建立表间关联；在旅游销售表设计器中，设置人数必需在1人到100人之间，不然，显示“人数输入有误”，字段默认值为2人；设置参考完整性:假如旅游线路表中没有此旅游线路,则不能组团参与该线路旅游，即旅游销售表中将不能有该线路统计。 （15分）
2．在项目中建立菜单MYMENU，菜单项包含数据管理、数据查询、数据统计、数据打印、个人信息和退出6项。“数据管理”项包含“录入”、“修改”2个一级子菜单；为“数据打印”设置快捷键CTRL+P；创建快捷菜单MYQUICK,含有"打开,复制,删除"三个菜单项,其中为"删除"项设置热键D,"复制"和"删除"之间用分割线隔开，然后在表单MYFORM12中调用此快捷菜单。（10分）
3.设置主控程序（5分）
4．在“数据管理”项中，以“旅游销售表”统计为依据完成对数据录入和修改，表单分别命名为MYFORM11、MYFORM12.
在【录入】页面：请经过观察“订单号”实际内容设置对应输入掩码；报价字段设置为5位整数； “专题类型”可经过组合框选择“蜜月、购物、民俗”3个选项；若使用招商卡，则每单立减500元；选择适宜表单控件，输入“招商卡”字段内容；“总价”字段内容经过报价×人数自动算出，且内容为只读；“人数”字段内容为“总价”字段前最终要输入内容。 （15分）
在【修改】页面：经过输入订单号实现对“旅游销售表”相关数据修改及删除。在此表单中设置调用快捷菜单。（10分）
5．创建以MYFORM21命名综合查询表单，用户利用组合框选择团体等级（豪华团、经济团、舒适团），经过表格控件显示线路、出发日期、团体等级和交通字段内容。 （10分）
6．点击数据统计时，经过页框控件中两页实现对“专题类型”和“交通”各类旅游统计，其中查询条件以组合框实现。查询及输出结果均在各自表中进行。（10分）
7. 点击数据打印时，输出以MYREPORT命名报表，它是一个集报表标题（旅游销售统计表）、汇总信息和表格线为一体报表，以 “旅游销售表”为内容，按专题类型横向输出：订单号、线路、人数、专题类型、总价5项内容，报表结尾显示蜜月旅行单笔最低总价及制表人姓名，标题旁显示制表年月（格式：××年××月）。（10分）
8. 创建以MYINFO命名个人信息表单。要求显示考生真实姓名、准考证号、联络电话、考试机位和试卷号。（5分）
9．点击菜单[退出]时，返回系统菜单，关闭全部VFP程序及数据。（5分）
10.连编项目，生成一个可实施文件（.EXE文件） （5分）
上六个月《管理系统中计算机应用》模拟试题答案
开发项目基础步骤:
1. 建立项目文件
2. 在项目中建立数据库、表、触发器、索引、关联并建立对应参考完整性规则；
3. 设计菜单
4. 设计主控程序；
5. 设计表单及对应脚本；
6. 设计报表；
7. 连编应用程序
一、
1. 在系统菜单中[文件]→[新建]→[创建新项目]（存为文件名MYPROJ）
2. 先建立“中国游管理”数据库[项目管理器] →[数据] →[数据库] →新建→新建数据库→[中国游管理]
在“中国游管理”数据库下表中，建立两个库表：旅游线路表和旅游销售表，并进行关联
图示：旅游线路表

图示：旅游销售表

相关人数字段设计以下：

图示：两个表之间关联，打开菜单[显示] →[数据库设计器]，调出两个表，优异行关联，然后用右键调出编辑参考完整性，然后再按提醒操作，

点击删除规则中级联

二、
1、在项目管理→[其它] →[菜单] →[新建] →菜单中新建菜单MYMENU
图示：

“录入”选项命令：DO FORM MYFORM11
“修改”选项命令：DO FORM MYFORM12
“数据查询”选项命令：DO FORM MYFORM21
“数据统计”选项命令：DO FORM MYFORM31
“数据打印”选项命令：REPORT FORM MYREPORT PREVIEW
“个人信息”选项命令：DO FORM MYINFO
“退出”菜单过程：CLEA EVENTS
CLEA ALL
SET SYSMENU TO DEFA
定义数据打印快捷键：单击“数据打印”菜单项右侧“选项”按钮，屏幕显示“提醒选项”对话框，键入快捷键CTRL+P
2、在项目管理→[其它] →[菜单] →[新建] →菜单中新建快捷菜单MYQUICK
图示：

三、设置主控程序：项目管理器→[代码] →[程序] →新建 编写完成后，关闭→保留
MAIN.PRG程序代码以下：
SET TALK OFF
SET SAFE OFF
CLEA ALL
SET DELE ON
DO MYMENU.MPR
READ EVENT
RETU
四、
1、录入表单：项目管理器→[文档] →[表单] →[新建] →[新建表单]，最终存名为MYFORM11
属性：
FORMCAPTION＝录入
TEXT1INPUTMASK=BJ9999
TEXT3INPUTMASK=99999;VALUE=0
TEXT4VALUE=0
TEXT5VALUE=0;READONLY=.T.
COMBO1ROWSOURCE=豪华团,经济团,舒适团;ROWSOURCETYPE=1
CHECK1VALUE=.F.
COMMAND1CAPTION=确定
COMMAND2CAPTION=退出

图示：

○TEXT4LOSTFOCUS事件:
IF THISFORM.CHECK1.VALUE=.T.
THISFORM.TEXT5.VALUE=THISFORM.TEXT3.VALUE*THISFORM.TEXT4.VALUE-THISFORM.TEXT4.VALUE*500
ELSE
THISFORM.TEXT5.VALUE=THISFORM.TEXT3.VALUE*THISFORM.TEXT4.VALUE
ENDIF

○确定按钮CLICK事件
APPE BLAN
REPL 订单号 WITH ALLT(THISFORM.TEXT1.VALUE)
REPL 线路 WITH ALLT(THISFORM.TEXT2.VALUE)
REPL 专题类型 WITH ALLT(THISFORM.COMBO1.VALUE)
REPL 报价 WITH THISFORM.TEXT3.VALUE
REPL 招商卡 WITH THISFORM.CHECK1.VALUE
REPL 人数 WITH THISFORM.TEXT4.VALUE
REPL 总价 WITH THISFORM.TEXT5.VALUE

THISFORM.TEXT1.VALUE=""
THISFORM.TEXT2.VALUE=""
THISFORM.COMBO1.VALUE=""
THISFORM.TEXT3.VALUE=0
THISFORM.CHECK1.VALUE=.F.
THISFORM.TEXT4.VALUE=0
THISFORM.TEXT5.VALUE=0

○退出按钮CLICK事件
THISFORM.RELEASE

2、修改表单：项目管理器→[文档] →[表单] →[新建] →[新建表单]，最终存名为MYFORM12

属性：
数据环境中”旅游销售表”EXCLUSIVE=.T.
FORMCAPTION＝修改
TEXT1INPUTMASK=BJ9999
TEXT2CONTROLSOURCE=旅游销售表.线路
TEXT3INPUTMASK=99999;VALUE=0; CONTROLSOURCE=旅游销售表.报价
TEXT4VALUE=0; CONTROLSOURCE=旅游销售表.人数
TEXT5VALUE=0;READONLY=.T.; CONTROLSOURCE=旅游销售表.总价
COMBO1ROWSOURCE=豪华团,经济团,舒适团;ROWSOURCETYPE=1; CONTROLSOURCE=旅游销售表.专题类型
CHECK1VALUE=.F.; CONTROLSOURCE=旅游销售表.招商卡
COMMAND1CAPTION=修改
COMMAND2CAPTION=删除
COMMAND3CAPTION=退出
图示:

○FORM1INIT事件:
USE 旅游销售表 EXCL
○FORM1DESTROY事件:
PACK
USE
○TEXT1LOSTFOCUS事件:
LOCA FOR 订单号=ALLT(THISFORM.TEXT1.VALUE)
IF EOF()
MESSAGEBOX("没有此订单,请重新输入！",64,"提醒")
THISFORM.TEXT1.VALUE=""
THISFORM.TEXT1.SETFOCUS
ENDIF
THISFORM.REFRESH

○TEXT4LOSTFOCUS事件:
IF THISFORM.CHECK1.VALUE=.T.
THISFORM.TEXT5.VALUE=THISFORM.TEXT3.VALUE*THISFORM.TEXT4.VALUE-THISFORM.TEXT4.VALUE*500
ELSE
THISFORM.TEXT5.VALUE=THISFORM.TEXT3.VALUE*THISFORM.TEXT4.VALUE
ENDIF
○修改按钮CLICK事件
THISFORM.TEXT1.SETFOCUS
○删除按钮CLICK事件
XZ=MESSAGEBOX("确定要删除吗？",1+64,"提醒")
IF XZ=1
DELE
ELSE
THISFORM.TEXT1.SETFOCUS
ENDIF

THISFORM.TEXT1.VALUE=""
THISFORM.TEXT2.VALUE=""
THISFORM.TEXT3.VALUE=0
THISFORM.TEXT4.VALUE=0
THISFORM.TEXT5.VALUE=0
THISFORM.COMBO1.VALUE=""
THISFORM.CHECK1.VALUE=.F.

○退出按钮CLICK事件
THISFORM.RELEASE

五、综合查询表单
图示:

属性:
FORMCAPTION=综合查询
COMMAND1CAPTION=退出
LABEL1CAPTION=按团体等级查询相关线路信息
COMBO1ROWSOURCE=豪华团,经济团,舒适团
COMBO1ROWSOURCETYPE=1

○COMBO1INTERACTIVECHANGE事件:
SELE 线路,出发日期,团体等级,交通 FROM 旅游线路表 WHERE 团体等级=THISFORM.COMBO1.VALUE;
INTO TABLE CX

THISFORM.GRID1.RECORDSOURCE="CX"

THISFORM.GRID1.COLUMN1.WIDTH=75
THISFORM.GRID1.COLUMN2.WIDTH=75
THISFORM.GRID1.COLUMN3.WIDTH=75
THISFORM.GRID1.COLUMN4.WIDTH=75

○退出按钮CLICK事件
THISFORM.RELEASE

六、数据统计表单
图示

交通查询在PAGE2

属性：
FORMCAPTION=数据统计
PAGEFRAME1.PAGE1.CAPTION=按专题类型统计
PAGEFRAME1.PAGE2.CAPTION=按交通统计
PAGE1.LABEL1.CAPTION=请选择专题类型
PAGE1.LABEL3.CAPTION=旅游共有
PAGE1.LABEL5.CAPTION=种
PAGE2.LABEL1.CAPTION=请选择交通
PAGE2.LABEL3.CAPTION=共有
PAGE2.LABEL5.CAPTION=种
COMMAND1.CAPTION=退出
PAGE1.COMBO1.ROWSOURCE=蜜月,购物,民俗
PAGE1.COMBO1.ROWSOURCETYPE=1
PAGE2.COMBO1.ROWSOURCE=双飞,单飞,高铁
PAGE2.COMBO1.ROWSOURCETYPE=1

○PAGE1.COMBO1INTERACTIVECHANGE事件:
SELE COUNT(*) FROM 旅游销售表WHERE专题类型=THISFORM.PAGEFRAME1.PAGE1.COMBO1.VALUE INTO ARRAY A
THISFORM.PAGEFRAME1.PAGE1.LABEL2.CAPTION=THISFORM.PAGEFRAME1.PAGE1.COMBO1.VALUE
THISFORM.PAGEFRAME1.PAGE1.LABEL4.CAPTION=STR(A(1),3)

○PAGE2.COMBO1INTERACTIVECHANGE事件:
SELE COUNT(*) FROM 旅游线路表 WHERE 交通=THISFORM.PAGEFRAME1.PAGE2.COMBO1.VALUE INTO ARRAY A
THISFORM.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、调出报表控件工具栏：显示→报表控件工具栏，用域控件添加日期函数YEAR(DATE())，用标签写上年，用域控件添加月函数MONTH(DATE())，用标签写上月
5、用域控件在组注脚添加变量函数页_pageno
6、在标题区用标签写上：旅游销售统计表，在页标头区用标签分别写上：订单号，线路，人数，专题类型，总价，并划上线。标题区调出：报表→标题总结→选择标题
7、在组标头区用域控件分别调出：订单号，线路，人数，专题类型，总价，并划上线
8、在总结区用标签写上：制表人：某某某 ，用标签写上：蜜月旅行单笔最低售价，用域控件在表示式中输入：IIF(旅游销售表.专题类型="蜜月", 旅游销售表.总价,99999)，点击计算选择最小值，用标签写上元.
八、创建个人信息菜单，全部用标签，加一个退出命令，退出CLICK事件为：THISFORM.RELEASE

九、连编为可实施文件。