航空公司管理信息系统论文SQL

1、航空公司管理信息系统一个正常营运的航空公司需要管理所拥有的飞机、航线的设置、客户的信息等，更重要 的还要提供票务管理。面对各种不同种类的信息，需要合理的数据库结构来保存数据信息以 及有效的程序结构支持各种数据操作的执行。本设计讲述如何建立一个航空公司管理信息系统。一般而言，航空公司的管理信息系统 应该包括人事、工资管理模块 。1 系统设计1.1 系统功能分析 系统开发的总体任务是实现各种信息的系统化、规范化和自动化。 系统功能分析是在系统开发的总体任务的基础上完成。本例子中的航空公司管理信息系 统需要完成功能主要有：舱位信息的输入和修改， 包括舱位等级编号、 舱位等级名称、 提供的各种服务类别

2、， 以及备注信息等。 客机信息的输入、修改和查询，包括客机编号、客机型号、购买时间、服役时间、 经济舱座位数量、公务舱座位数量、头等舱座位数量以及备注信息等。 航线信息的输入、修改和查询，包括航线编号、出发城市、到达城市、航班日期、 出发时间、到达时间、客机编号、经济舱价格、公务舱价格、头等舱价格和备注信 息等。 客户等级信息的输入、修改，包括客户等级编号、客户等级名称、折扣比例和备注 信息等。客户信息的输入、 修改和查询，包括客户编号、客户姓名、客户性别、身份证号码、 联系电话、客户类型和备注信息等。订票信息的输入、查询和修改，包括订票编号、客户编号、客户姓名、客户类型、 折扣比例、航线编号

3、、出发城市、到达城市、出发时间、舱位类型、票价、结算金 额和备注信息等。1.2 系统功能模块设计 对上述各项功能进行集中、分块，按照结构化程序设计的要求，得到如图 9-1 所示的系 统功能模块图。图9-1系统功能模块图2数据库设计数据库在一个信息管理系统中占有非常重要的地位，数据库结构设计的好坏将直接对应 用系统的效率以及实现的效果产生影响。合理的数据库结构设计可以提高数据存储的效率， 保证数据的完整和一致。设计数据库系统时应该首先充分了解用户各个方面的需求，包括现有的以及将来可能增 加的需求。数据库设计一般包括如下几个步骤：数据库需要分析。数据库概念结构设计。 数据库逻辑结构设计。2.1数据

4、库需求分析用户的需求具体体现在各种信息的提供、保存、更新和查询，这就要求数据库结构能充 分满足各种信息的输出和输入。收集基本数据、数据结构以及数据处理的流程，组成一份详 尽的数据字典，为后面的具体设计打下基础。9-2所示的本系统所处图9-2航空公司管理信息系统数据流程图仔细分析调查有关航空公司管理信息需求的基础上，将得到如图 理的数据流程。针对一般航空公司管理信息系统的需求，通过对航空公司管理工作过程的内容和数据流 程分析，设计如下面所示的数据项和数据结构：舱位等级信息，包括的数据项有：舱位等级编号、舱位等级名称、是否有礼品、是 否有报纸、是否有饮料、 是否有午餐、是否有电影、是否可以改签、是

5、否可以退票、 是否可以打折、备注信息等。客机信息，包括的数据项有：客机编号、客机型号、购买时间、服役时间、经济舱 座位数量、公务舱座位数量、头等舱座位数量、备注信息等。航线信息，包括的数据项有：航线编号、出发城市、到达城市、航班日期、出发时 间、到达时间、客机编号、经济舱价格、公务舱价格、头等舱价格、备注信息等。客户类型信息，包括的数据项有：客户类型编号、客户类型名称、折扣比例、备注 信息等。客户信息，包括的数据项有：客户编号、客户姓名、客户性别、身份证号码、联系 电话、客户类型、备注信息等。订票信息，包括的数据项有：订票编号、顾客编号、顾客姓名、顾客类型、折扣比 例、航线编号、出发城市、到达

6、城市、舱位类型、机票价格、结算金额、备注信息有了上面的数据结构、数据项和数据流程，我们就能进行下面的数据库设计。22数据库概念结构设计得到上面的数据项和数据结构以后，就可以设计出能够满足用户需求的各种实体，以及 它们之间的关系，为后面的逻辑结构设计打下基础。这些实体包含各种具体信息，通过相互 之间的作用形成数据的流动。本实例根据上面的设计规划出的实体有：舱位等级信息实体、客机信息实体、航线信息 实体、客户类型信息实体、客户信息实体、订票信息实体。各个实体具体的描述图如下。舱位等级信息实体图如图 9-3所示。客机信息实体图如图 9-4所示。图9-4客机信息实体图航线信息实体图如图 9-5所示。客

7、户宪型匠原实体图9-6客户类型信息实体图客户信息实体图如图9-7所示。客户倍息卖体图9-7客户信息实体图订票信息实体图如图 9-8所示。图9-8订票信息实体图实体之间关系的图如图9-9所示。图9-9实体之间关系的图2.3数据库逻辑结构设计现在需要将上面的数据库概念结构转化为2000数据库系统所支持的实际数据模型，也就是数据库的逻辑结构。航空公司管理信息系统数据库中各个表格的设计结果如下面表格所示。每个表格表示在 数据库中的一个表。表9-1为供应商信息表。表9-1舱位等级信息表夕U 名数据类型可否为空说明舱位等级编号舱位等级名称是否有礼物是否有报纸是否有饮料是否有午餐是否有电影是否可以改签是否可

8、以退票是否可以打折备注信息表9-2为顾客信息表格。表9-2客机信息表格列名数据类型可否为空说明客机编号客机型号购买日期服役日期经济舱座位数量公务舱座位数量头等舱座位数量备注信息表9-3为航线信息表。表9-3航线信息表列名数据类型可否为空说明航线编号出发城市到达城市航班日期岀发时间到达时间客机编号经济舱价格公务舱价格头等舱价格备注信息表9-4为客户类型信息表格。表9-4客户类型信息表列名数据类型可否为空说明客户类型编号客户类型名称折扣比例列名数据类型可否为空说明备注表9-5为客户信息表格。表9-5客户信息表列名数据类型可否为空说明客户编号客户姓名客户性别身份证号码客户联系电话客户类型备注表9-6

9、为订票信息表格。表9-6订票信息表列名数据类型可否为空说明订票编号客户编号客户姓名客户类型折扣比例航线编号出发城市到达城市出发日期舱位类型机票价格结算金额备注3数据库结构的实现经过前面的需求分析和概念结构设计以后，得到数据库的逻辑结构。现在就可以在2000数据库系统中实现该逻辑结构。这是利用2000数据库系统中的查询分析器实现的。下面给出创建这些表格的语句。3.1创建系统用户表.1(10)(10)(10)3.2 创建舱位等级信息表. ( (4), (20), (2), (2), (2), (2), (2), (2), (2), (2), ) 3.3 创建客机信息表. ( (18) (20),

10、, , (20), (20), (20), ) 3.4 创建航线信息表. ( (14) (50), (50), (10), (10), (10), (18), (18, 2) , (18, 2) , (18, 2) , ) 3.5 创建客户类型信息表. ( (14), (20), (2, 0) , ) 3.6 创建客户信息表. ( (14), (50), (2), (18), (20), (14), ) 3.7 创建订票信息表. ( (14), (14), (50), (14), (18, 0), (14), (50), (50), , (20), (18, 2) , (18, 2) , )

11、4 航空公司管理信息系统主窗体的创建面的语句在 2000 中查询分析器的执行， 将自动产生需要的所有表格。 有关数据库结 构的所有后台工作已经完成。现在将通过航空公司管理信息系统中各个功能模块的实现，讲 解如何使用来编写数据库系统的客户端程序。4.1创建工程项目一一启动后，单击 菜单，在工程模板中选择 ，将自动产生一个窗体，属性都是缺省设置。这里我们删除这个窗体，单击菜单，将这个工程项目命名为。4.2创建航空公司管理信息系统的主窗体这个项目我们使用多文档界面，单击工具栏中的按钮，产生一个窗体。在这个窗体上添加所需的控件，窗体和控件的属性设置见表9-7。创建好的窗体如图 9-10所示。表9-7主

12、窗体及其控件属性设置控件属性属性取值()大唐航空公司信息管理系统()(1)(3)图9-10航空公司管理信息系统主窗体在主窗体中加入状态栏控件，可以实时反映系统中的各个状态的变化。状态栏控件需要 在通常的属性窗口中设置一般属性，还需要在其特有的弹出式菜单中进行设置。选中状态栏 控件，单击鼠标右键，选中菜单，然后设置属性。面板1用来显示各种文本信息，面板 2用来显示当前日期，面板 3用来显示当前时间。4.3创建主窗体的菜单在如图9-10所示的主窗体中，单击鼠标右键，选择弹出式菜单中的，创建如图9-11所示的菜单结构：諭JU甬户 ”迪L，她橹息.血就涪总 ”唐户类型 尊户倍息.SjlSKif-.-A

13、bour图9-11主窗体中的菜单结构4.4创建公用模块在 中可以用公用模块来存放整个工程项目公用的函数、过程和全局变量等。这样可以极大地提高代码的效率。在项目资源管理器中为项目添加一个，保存为1。下面就可以开始添加需要的代码了。由于系统中各个功能模块都将频繁使用数据库中的各种数据，因此需要一个公共的数据操作函数，用以执行各种语句。添加函数，代码如下：(_,)_'执行语句，并返回记录集对象'声明一个连接'声明一个数据集对象()'异常处理'用函数产生一个包含各个子串的数组=()'创建一个连接'打开连接执行查询语句= (0) &$(),

14、 , _'返回记录集对象= " 查询到 " & & " 条记录 "= " 查询错误 : " &在函数中使用了 函数，这个函数用来连接数据库，代码如下：() _'返回一个数据库连接 III!在录入有关信息时，需要回车来进入下一个文本框，这样对软件使用者非常方便。在所 有的功能模块都需要这个函数，所以将它放在公用模块中，代码如下：( )'判断是否为回车键= 13'转换成键""用来保存当前按键，函数用来指定的按键。一旦按下回车键，将返回键，下一个控件自 动获得输入焦

15、点。添加全局变量，用来记录各个功能模块的读写状态，代码如下：'记载舱位等级功能模块的读写状态'记载客机信息模块的读写状态'记载航线信息模块的读写状态'记载客户类型模块的读写状态'记载客户信息模块的读写状态'记载订票信息模块的读写状态 这些全局变量用来记录是添加状态还是修改状态，赋值 1 为添加，赋值 2 为修改。 由于航空公司管理信息管理系统启动后， 需要对用户进行判断。 如果登录者是授权用户， 将进入系统，否则将停止程序的执行。这个判断需要在系统运行的最初进行，因此将代码放 在公用模块中。5 系统用户管理模块的创建用户管理模块主要实现：用户登录

16、。添加用户。修改用户密码。6 舱位信息管理模块的创建舱位信息管理模块主要实现如下功能：添加舱位信息。修改舱位信息。删除舱位信息。6.1 显示舱位信息窗体的创建选择“航线信息管理 |舱位信息”菜单，将出现如图 9-12 所示的窗体。图9-12舱位等级信息窗体这个窗体用来显示舱位等级信息，并且可以对各条记录进行操作。在载入窗体时，程序 将自动载入所有记录，代码如下：()_ II * II0窗体的方法后面加上 0或者1,可以得到不同的窗体显示方式。参数为0时，显示的窗体为无模式形式，窗体切换时不需要进行其他操作；参数为1时，显示的窗体为有模式形式，窗体切换时必须进行相关操作。载入窗体时将自动显示各条

17、记录，代码如下：()函数用来显示表头，代码如下:()i=12(0, 1)="等级编号”(0, 2)="机舱等级"(0, 3)="是否有礼品"(0, 4)="是否有报纸"(0, 5) = " 是否有饮料 "(0, 6) = " 是否有午餐 "(0, 7) = " 是否提供电影 "(0, 8) = " 是否可以改签 "(0, 9) = " 是否可以退票 "(0, 10) = " 是否可以打折 "(0, 11)

18、= "备注信息 " '固定表头= 1 '设置各列的对齐方式i = 0 11(i) = 0i'表头项居中= 0= 0= 1= - 1= 4 '设置单元大小 (0) = 1000 (1) = 1000(2) = 2000(3) = 1000(4) = 1000(5) = 1000(6) = 1000(7) = 1000(8) = 1000(9) = 1000(10) = 1000(11) = 1000= 1函数把各条记录加到表格中，并显示出来，代码如下： ()获得数据集= (, )= 1 判断是否为空移动到下一行= + 1循环i = 1判断是否为

19、空(i - 1)根据数据类型显示(i - 1)( - 1, i) = (i - 1) & "", "")( - 1, i) = (i - 1) & ""I移动到下一条记录关闭数据集对象在窗体显示时，可以控制窗体中各个控件按照要求的位置显示。可以在窗体的事件中加 入代码，代码如下：()判断当前窗体所处的状态，当前窗体不处于最小化状态并且主窗体不处于最小化状态时进行后面的操 作<> <>'边界处理图9-13添加舱位等级信息窗体'控制控件的位置=(-)/ 2控制表格控件的位置=+ +

20、/ 2=-200=+ 100=-1500控制按钮位置2 =+ 502 =/ 2 - 30006.2添加舱位信息窗体的创建9-13所示的窗体。在舱位信息显示窗体中单击“添加”按钮，将出现如图载入窗体时，首先根据标志变量判断状态，然后决定是添加还是修改，代码如下:()i判断是否为添加& " 添加i = 0 7 1(i) " 否" 1(i) " 是" 1(i) = 0I 载入当前选择记录内容= 2= (, )判断记录是否为空= 0 1() = ()(2) = (10)i = 0 71(i) " 否"1(i) "

21、是" 1(i) = 0i(0) = & " 修改"输入内容完毕，单击“保存”按钮，将首先判断输入内容是否满足要求，然后添加到数 据库中。代码如下：()判断输入内容是否为空= 0 1() & " ") = ""= " 机舱等级编号 "= " 机舱等级名称 "= & " 不能为空！+ , " 警告 "()判断输入内容是否为数字(0)= " 机舱等级编号 " = & " 请输入数字！+ , "

22、; 警告 "(0)'添加判断是否有相同的记录= 1= " *'" & (0) & "'"= (, ), " 警告 "+ , "警告 ""已经存在此编号的记录！ ", +(0)'判断是否有相同内容的记录= " *<>'" & (0) & "' '" & (1) & "'"= (, )"已经存在相同

23、机舱等级的记录！ ", (1)'先删除已有记录= " '" & (0) & "'"= (, )'再加入新记录= (, )= 0 1() = ()= 0 7( + 2) = (1()(10) = (2)更新数据集内容关闭数据集内容= 1+ , " 添加记录"添加记录成功！= 0 1() =III!= 0 31() = 0(2) =_ II *I!_ II *I!9-136.3 修改舱位等级信息 在舱位等级信息列表中选择需要修改的记录，然后单击“修改”按钮，将出现如图 所示的窗体。

24、选择记录的内容将显示在窗体中，可以进行修改，最后保存修改后的记录。代 码如下：()判断列表中是否有记录> 1改变状态变量= 2记录选择记录位置> 01 = " *='" & (, 1) & "'"1 1"警告", + , "请首先选择需要修改的记录！6.4 删除舱位等级信息 在舱位等级信息列表中选择需要删除的记录，然后单击 “删除” 按钮， 将删除当前记录，代码如下：()判断信息列表中内容是否为空> 1 提示信息("真的要删除机舱等级为 " & (

25、, 2) & " 的记录吗？ ", + , "警告") = 记录选择记录位置删除重复记录= "='" & (, 1) & "'"= (, )卸载窗体重新载入记录并显示7客机信息管理模块的创建客机信息管理模块主要实现如下功能:添加客机信息。修改客机信息。删除客机信息。查询客机信息。7.1显示客机信息窗体的创建选择“航线信息管理|客机信息”菜单，将出现如图9-14所示的窗体。所有客机信息都将显示出来。窗体的事件调用、函数，将所有记录显示出来。图9-14显示客机信息列表窗体7.2添

26、加客机信息窗体的创建单击客机信息列表中的“添加”按钮，将出现如图9-15所示的窗体。图9-15添加客机信息列表输入内容完毕，单击“保存”按钮，将首先判断输入内容是否满足要求，然后将记录添 加到数据库中，代码如下：()判断输入内容是否为空=0 6()& "")=""0123456="客机编号”="客机型号"="购买时间"="服役时间”="经济舱座位数量"="公务舱座位数量"="头等舱座位数量"=& "不能为空!+

27、，”警告"()判断输入内容为数字= 4 6()= " 座位数量 "J& " 请输入数字！+ , " 警告 "()判断输入内容是否为日期= 2 3 ()() = (), "")"时间应输入日期() ！", + , "警告" ()'添加判断是否有相同的记录= 1= " *'" & (0) & "'"= (, )"已经存在此编号的记录！ ", + , "警告 &qu

28、ot;(0)'先删除已有记录= " '" & (0) & "'"= (, )'再加入新记录_ II *I!= (, )() = ()更新数据集关闭数据集对象= 1"添加记录成功！", + , " 添加记录= 0 7() = ""_ II *I!= 2_ II *I!9-15 所示7.3 修改客机信息 在客机信息列表中选择记录，然后单击“修改”按钮。当前记录将显示在如图 的窗体中，可以进行修改。代码如下：()判断列表内容是否为空> 1 = 2 记载选择记

29、录的位置> 01 = " *='" & (, 1) & "'"1 1"警告", + , "请首先选择需要修改的记录！7.4删除客机信息在客机信息列表中选择记录，然后单击“删除”按钮，当前记录将被删除。代码如下:()'判断列表内容是否为空> 1("真的要删除客机编号为” & (, 1) & ”的型号为” & (, 2) & ”的客机记录吗？",+，”警告")'记载选择记录的位置=" ='&

30、quot;& (, 1) &=(,)'重新载入所有记录，并显示岀来_ II * II7.5查询客机信息在客机信息列表中单击“查询”按钮，将出现如图9-16所示的窗体。图9-16查询客机信息的窗体载入窗体时，将自动加入所有客机编号和客机型号的信息，代码如下:()清楚各个列表框中的内容i = 0 11(i)i 选择数据库中所有客机编号的内容 I!I!= (, )判断数据库是否为空1(0) (0)"请先进行客机信息设置！ ", + , "警告"选择所有数据库中有关飞机型号的内容 I!I!= (, ) 判断数据集对象是否为空1(1) (0

31、)"请先进行客机信息设置！ ", + , "警告"关闭数据集对象9-14设置完查询内容和方式后， 单击按钮将进行查询。 所有满足条件的记录将显示在如图 所示的窗体中，代码如下：()判断是否按照客机编号查询= " = '" & (1(0) & " ") & "'"判断是否按照客机型号查询(1) =( & " ") = ""= " ='" & (1(1) & "

32、; ") & "'"= & "='" & (1(1) & " ") & "'"判断查询内容是否为空() = """请设置查询条件！ ", + , "警告 "显示所有满足查询条件的内容= " * " &8 航线信息管理模块的创建航线信息管理模块主要实现如下功能： 添加航线信息。修改航线信息。删除航线信息。查询航线信息。8.1 显示航线信息窗体的创建 选择“航

33、线信息管理 |航线信息”菜单，将出现如图9-17 所示的窗体。所有航线信息都将显示出来。窗体的事件调用、函数，将所有记录显示出来。-|g|x|41戋址右史卅左恤钱信层列表厚抽|响 |昭 J畳由图9-17显示客机信息窗体8.2添加航线信息窗体的创建息。选择“航线信息管理航线信息”菜单，将出现如图9-18所示的窗体，用来添加航线信图9-18添加航线窗体输入完航线信息后，单击“保存”按钮：程序首先检查输入内容是否符合要求，然后检 查是否有重复记录，最后添加到数据库中。8.3修改航线信息在航线信息列表中选择记录，然后单击“修改”按钮。当前记录将显示在如图9-18所示的窗体中，可以进行修改。代码如下：(

34、)判断列表内容是否为空> 1= 2记载选择记录的位置> 01 = " *='" & (, 1) & "'"1 1"警告", + , "请首先选择需要修改的记录！8.4 删除航线信息 在航线信息列表中选择记录，然后单击“删除”按钮，当前记录将被删除。代码如下：()判断列表内容是否为空> 1("真的要删除 " & (, 4) & " 从" & (, 2) & " 出发到 " & (

35、, 3) & " 的航线记录吗？ ", + , "警告")记载选择记录位置= "='" & (, 1) & "'"= (, )重新载入记录并显示_ II *I!9-19 所示的窗体。8.5 查询航线信息 在航线信息列表中单击“查询”按钮，将出现如图图9-19航线信息查询窗体载入窗体时自动加入出发城市和到达城市的内容，代码如下:()i'清除列表框中的内容i = 011(i)i'选择数据库中与岀发城市有关的内容 IIII=(,)'判断数据集是否为空1(0)

36、 (0)"请先进行航线信息设置！", +，"警告"=(,)1(1) (0)设置查询内容后，单击"确定”按钮，所有满足查询条件的内容显示在航线信息列表中。9客户类型信息管理模块的创建客户类型信息管理模块主要实现如下功能:添加客户类型信息。修改客户类型信息。删除客户类型信息。9.1显示客户类型信息窗体的创建选择“客户信息管理|客户类型”菜单，将出现如图9-20所示的窗体。所有客户类型信息都将显示出来。窗体的事件调用、函数，将所有记录显示出来。图9-20显示客户类型信息窗体9.2添加客户类型信息窗体的创建在客户类型信息列表中单击“添加”按钮，将出现如

37、图9-21所示的窗体，用来添加客户类型信息。图9-21添加客户类型信息窗体输入内容完毕，单击“保存”按钮，程序将首先检查内容是否符合要求，然后检查是否 有重复记录，最后添加到数据库中。9.3修改客户类型信息在客户类型信息列表中选择需要修改的记录，然后单击“修改”按钮，当前记录将出现 在如图9-14所示的窗体中。修改完毕，单击“保存”按钮，修改后的记录保存到数据库中。 代码如下：()'判断列表内容是否为空> 1=2'记载选择记录的位置'判断是否选择记录> 0'显示需要修改的记录1 = " * ='" & (, 1)

38、&1 1"警告",+ ,"请首先选择需要修改的记录！"9.4删除客户类型信息选择客户类型信息列表中需要删除的记录，然后单击“删除”按钮，可以删除所选记录。代码如下：()判断列表内容是否为空> 1 提示信息("真的要删除客户种类为 " & (, 2) & " 的记录吗？ ", + , "警告") = 记载选择记录的位置删除记录= " ='" & (, 1) & "'"= (, )卸载窗体选择所有记

39、录_ II *I!显示窗体10 客户信息管理模块的创建客户信息管理模块主要实现如下功能：添加客户信息。修改客户信息。删除客户信息。查询客户信息。10.1 显示客户信息窗体的创建 选择“客户信息管理 |客户信息”菜单，将首先出现如图9-22 所示的窗体。所有客户类型信息都将显示出来。窗体的事件调用、函数，将所有记录显示出来。JnJ.x客户信息列表i羽搽住卿 I 僚改图9-22显示客户信息窗体10.2添加客户信息窗体的创建在客户信息列表中单击“添加”按钮，将出现如图9-23所示的窗体，用来添加客户信息。图9-23添加客户信息窗体输入内容完毕，单击“保存”按钮，程序将首先检查内容是否符合要求，然后检

40、查是否 有重复记录，最后添加到数据库中。10.3修改客户信息在客户信息列表中选择需要修改的记录，然后单击“修改”按钮，当前记录将出现在如 图9-23所示的窗体中。修改完毕，单击“保存”按钮，修改后的记录保存到数据库中。代码如下：()判断列表内容是否为空> 1= 2 记载选择记录的位置判断是否选择记录> 0选择点击记录1 = " *='" & (, 1) & "'"显示1 1提示信息"警告", + , "请首先选择需要修改的记录！10.4 删除客户信息 选择客户信息列表中需要删除的记

41、录，然后单击“删除”按钮，可以删除所选记录。代 码如下：()判断列表内容是否为空> 1("真的要删除客户姓名为 " & (, 2) & " 的客户记录吗？ ", + , "警告") = 记载选择记录的位置删除当前记录= "='" & (, 1) & "'"执行查询语句= (, )卸载客户信息列表'选择所有记录显示10.5查询客户信息在如图9-22所示的客户信息列表中，单击“查询”按钮，出现如图9-24所示的对话框。图9-24客户信息查

42、询窗体客户信息查询窗体在载入时所有客户信息自动加入到查询内容中。选择合适的查询方 式，满足查询条件的记录显示在如图9-22所示的客户信息列表中。11订票信息管理模块的创建订票信息管理模块主要实现如下功能：添加订票信息。修改订票信息。删除订票信息。查询剩余机票信息。11.1显示订票信息窗体的创建选择“票务信息管理|订票信息”菜单，将首先出现如图9-25所示的窗体。所有订票类型信息都将显示出来。窗体的事件调用、函数，将所有记录显示出来。图9-25显示机票信息的窗体11.2添加订票信息窗体的创建在机票信息列表中单击“添加”按钮，将出现如图9-26所示的窗体，用来添加订票信息。图9-26添加订票信息的

43、窗体机票信息包括两部分：航线信息和客户信息。选择出发城市和到达城市，将得到相应的 航线信息；选择客户姓名得到相应的客户信息。窗体载入时要求在列表框中加入所有有关航 线和客户的信息，代码如下：()判断所处状态，添加或者修改= 1= & " 添加"产生随机的订票编号= ()= 2= (, )判断数据集对象是否为空= (0)(0) = (7)(1) = (12)= & " 修改"清楚列表框中内容i = 0 61(i)i选择数据库中所有与出发城市有关的信息 I!I!= (, )判断数据集对象是否为空1(0) (0)关闭数据集对象选择数据库中所有与

44、到达城市有关的信息= (, )判断数据集对象是否为空1(1) (0)关闭数据集对象选择数据库中所有与舱位等级有关的信息 I!I!= (, ) 判断数据集对象是否为空1(2) (0)关闭数据集对象选择数据库中所有与客户姓名有关的信息 I!I!= (, )判断数据集对象是否为空1(4) (0)关闭数据集对象并用不可见文本框 (、选择出发城市和到达城市， 然后选择舱位类型， 将自动显示票价，等)记载航线编号、客户编号等信息。实现代码加在列表框的事件中，如下：判断列表框编号= 2 判断出发城市和到达城市是否选择= '" & (1(1) & "'&qu

45、ot;(1(0) = "" (1(1) = "") = " * = '" & (1(0) & = (, ) 判断数据集对象是否为空= (0)(1(2) = "经济舱 " 1(3) 1(3) (7) 1(3) = 0(1(2) = "公务舱 " 1(3) 1(3) (8) 1(3) = 01(3)1(3) (9)1(3) = 0关闭数据集对象选择制定客机编号的有关信息= " *= '" & () & "'&quo

46、t;= (, ) 判断数据集对象是否为空= (4)= (5)= (6)关闭数据集对象= 4 选择相应客户姓名的记录= "= '" & (1(4) & "'"= (, ) 判断数据集对象是否为空= (0)1(5)1(5) (1)1(5) = 0 选择客户对应的客户类型= "= '" & (1(5) & "'"= (, ) 判断数据集对象是否为空1(6)1(6) (0)1(6) = 0关闭数据集对象关闭数据集对象选择航线信息和客户信息后，输入机票日期，单击

47、“保存”按钮，订票信息保存到数据库中。除了对数据格式的检查，还要检查相应航班是否满员。代码如下：()判断列表框中内容是否为空= 0 6(1() & " ") = ""= " 出发城市 " = " 到达城市 "2= " 舱位类型 "3 III!4= " 顾客姓名 "5 III!6J& " 不能为空！ + , " 警告 "1()判断机票日期是否输入(0) = ""= " 出发日期不能为空！+ , &quo

48、t; 警告 "(0)判断输入机票日期是否为日期型数据(0)(0) = (0), "")"时间应输入日期() ！", + , "警告"(0)'判断是否有相同内容的记录= " *<>'" & () & "'='" & () & "' = '" & (0) & "'"= (, )'先删除已有记录= "'"

49、; & () & "'"= (, )'判断航班是否满员= " *= '" & () & " '= '" & (0) & "'= '" & (1(2) & "'"= (, )判断数据集对象是否为空1(2) = "经济舱 "> ( - 1) "对不起，该航班经济舱已经满员 ", + , "警告"1(2) =

50、"公务舱 "> ( - 1)"对不起，该航班公务舱已经满员 ", + , "警告 "> ( - 1)"对不起，该航班头等舱已经满员 ", + , "警告"关闭数据集对象'再加入新记录 _ II *I!= (, )(0) =(1) = 2 4() = (1( + 2)= 6 7 () = (1( - 6)(8) = (0)= 9 10 () = (1( - 7)(11) = (1(3) * 1(6) / 100)(12) = (1) 更新数据集关闭数据集对象= 1票价为 &qu

51、ot;"订票成功！ 航班为 " & (0) & " 从" & (1(0) & " 到" & (1(1) & " 的" & (1(2) & " 机票， & (1(3) * 1(6) / 100) & " 元！ ", + , " 订票记录 "= 0 1重新显示机票信息_ II *I!= 2& (1(2)"修改订票信息成功！ 修改后的航班为 " & (0)

52、& " 从" & (1(0) & "到" & (1(1) & " 的& " 机票，票价为 " & (1(3) * 1(6) / 100) & " 元！ ", + , " 订票记录 "重新显示机票信息_ II *I!11.3 修改订票信息 在机票信息列表中选择需要修改的记录，然后单击“修改”按钮，当前记录将出现在如 图 9-19 所示的窗体中。修改完毕，单击“保存”按钮，修改后的记录保存到数据库中。11.4删除订票信息选择机

53、票信息列表中需要删除的记录，然后单击“删除”按钮，可以删除所选记录。11.5查询订票信息在如图9-25所示的机票信息列表中，单击“查询”按钮，出现如图9-27所示的对话框。图9-27机票信息查询窗体窗体载入时自动在列表框中添加出发城市、到达城市和舱位类型的信息，代码如下:()i'清除列表框中内容i = 021(i)i'选择所有与出发城市有关的信息 IIII=(,)'判断数据集对象是否为空1(0) (0)'关闭数据集对象'选择所有与到达城市有关的信息=(,)判断数据集对象是否为空1(1) (0)选择所有与舱位类型有关的信息 I!I!= (, ) 判断数据集对象是否为空1(2) (0)输入查询内容完毕，单击“确定”按钮将自