简单的汽车站售票系统
车票管理系统实习报告
一、实习背景随着社会经济的快速发展，人们的出行需求日益增加，车票管理系统作为现代化交通工具的重要组成部分，其重要性不言而喻。
为了提高车票管理效率，减少人工操作带来的不便，我国各大交通部门纷纷研发和实施车票管理系统。
本人在实习期间，有幸参与了某汽车站车票管理系统的设计与开发，以下为实习报告。
二、实习目的1. 熟悉车票管理系统的基本概念、设计原则和开发流程。
2. 掌握C语言编程技术，提高编程能力。
3. 了解数据库技术，提高数据库应用能力。
4. 培养团队协作和沟通能力。
三、实习内容1. 系统需求分析在实习初期，我首先对车票管理系统进行了需求分析。
通过对汽车站售票业务的了解，我发现车票管理系统应具备以下功能：（1）车次信息管理：录入、修改、删除车次信息，包括车次号、发车时间、起点站、终点站、行车时间、额定载客量等。
（2）票务信息管理：录入、修改、删除票务信息，包括车票号、票价、座位号、乘客姓名、联系方式等。
（3）售票查询：根据车次、时间、站点等信息查询车票信息。
（4）售票操作：进行售票、退票、改签等操作。
（5）统计报表：生成售票统计报表，包括车次售票情况、票价统计、售票员业绩等。
2. 系统设计在需求分析的基础上，我进行了系统设计。
系统采用模块化设计，主要包括以下模块：（1）数据模块：负责数据的存储、检索和更新。
（2）功能模块：实现售票、查询、统计等功能。
（3）界面模块：提供用户界面，方便用户进行操作。
3. 系统实现在系统实现阶段，我主要使用C语言进行编程，并结合数据库技术实现系统功能。
具体如下：（1）数据模块：采用关系型数据库MySQL存储数据，设计数据库表结构，实现数据的增删改查。
（2）功能模块：编写售票、查询、统计等功能模块的代码，实现系统功能。
（3）界面模块：使用C语言中的图形界面库，如GTK+等，设计用户界面。
4. 系统测试与优化在系统开发完成后，我对系统进行了测试和优化。
主要测试内容包括：（1）功能测试：验证系统功能是否满足需求。
(汽车行业)汽车客运站售票系统开发
6.4.6维护功能37
第7章系统测试与运行评价39
7.1系统测试概述39
7.2系统测试方法39
7.3系统测试40
7.3.1性能测试40
7.3.2功能测试40
7.4系统测试结果41
7.5系统的运行管理41
7.6系统的评价42
7.6.1经济评价42
7.6.2性能评价42
7.6.3管理水平评价43
现有车票管理系统的售票方式通常只能使用临时售票，旅客只能到车站去查询、订票、改签、退订，甚至只能购买当天的车票。这不能满足旅客方便快捷的进行购票，降低了服务质量。旅客已经不能满足现有售票系统的单一售票方式，都迫切希望车站能够实施网上订票系统与现有订票系统相结合，来解决现在所面临的购票困难的现象。同时车站的管理人员往往希望能够快速直观的了解到车站的情况，如：客流量、售票收入统计等。然而，现有售票系统往往由于设计的不足，不能很好对出售车票的数据进行统计与分析。每当要了解车站的售票情况，都要从系统中导出大量报表进行统计分析，才能了解到车站当前的运营状况，这明显增加了车站工作人员的工作量。通过建设新的网上售票系统，既方便了旅客进行购票，又方便了车站快速获取相关统计数据来更好的对车站的车次、线路进行规划。
2）用户参与系统设计与分析；
在项目实施中，采用面向对象法进行系统的实现。
第3章
总体规划作为结构化生命周期法中的第一个阶段，其结果直接影响到决定了后续工作的成败。为了在全局范围上把握整个系统的开发工作，本章节将进行系统的调查、可行性分析等方面的工作。
3.1
首先，与车站的管理人员进行面对面交流，充分的了解用户的需求并对系统的基本结构和业务流程进行了详细的规划。在这个过程中，初步计划实现的功能有订票模块，查询模块，改签模块，退订模块，统计模块，用户管理模块，系统维护模块。具体如下：
长途汽车网上订票系统
浠水县汽总运输公司关于长途汽车网上售票管理系统设计论文2013年 5 月 8 日目录绪论 (1)课题背景 (1)编写目的和意义 (2)第一章可行性研究分析 (3)1.1 经济可行性 (3)1.2 技术可行性 (3)1.3运行可行性 (3)1.4 操作可行性 (4)第二章软件需求分析 (5)2.1 引言 (5)2.2.1基本功能需求 (5)2.2.2用户界面需求 (5)2.2.3开发环境介绍 (5)2.2.4系统需求分析 (6)2.3 数据描述 (7)2.3.1 数据流图 (7)2.3.2数据字典 (13)2.3.3 数据采集 (14)2.4 系统模型 (14)2.4.1汽车票订票系统体系结构图 (14)2.4.2 状态转移图 (15)2.4.3 性能需求 (16)2.5 运行需求 (16)2.5.1 用户界面 (16)2.5.2 故障处理 (16)2.6 其他 (16)第三章项目开发计划 (18)3.1项目概诉 (18)3.2实施计划 (18)第四章系统总体设计 (20)4.1 系统设计图 (20)4.2系统功能模块设计 (22)4.2.1 功能模块 (22)4.2.2 系统模块设计 (22)第五章详细设计 (24)5.1系统登录模块设计 (24)第六章数据库分析与设计 (34)6.1 实体及其属性 (34)6.2 E-R图分析 (34)6.3 数据库表设计 (35)6.4 表间关系 (40)第七章系统实现与测试 (41)7.1系统的测试 (41)7.2.1 测试内容 (41)第八章项目开发总结 (49)8.1对项目开发过程的评价 (49)8.2对项目开发的总结 (49)绪论课题背景在客运公司工作7年之余，对客运管理的难度深有感触。
特别是在春运期间购票难依旧是长途汽车订票的一大难题。
长途汽车和火车的订票管理虽然有差异，但大体上是相同的。
长途汽车在售票的过程中需要对旅客的起始地、目的地、车次、订票和退票进行管理。
车站半自动化售票机(BOM机)嵌入RD4100,助力春运票务运作更高效
厦门远景达
车站半自动化售票机(BOM机）嵌入RD4100，助力春运票务运作更高效
近年来，地铁站、汽车站、火车站等交通车站先后引进了自助设备。
比如自助售票机、自助取票机等自助设备。
乘客们可以在自助机上自主购票、取票，但是不能进行补票、充值、退票、车票挂失等等的操作。
如果想要办理这些业务，就必须去人工窗口。
而传统的人工窗口主要业务操作系统繁琐，办理一个业务常常需要等很久的时间。
特别是现在春运时期，乘客数量暴增，传统的人工操作已经满足不了业务办理的需求了。
为了，很多城市的地铁、车站相继引入半自动化售票机简称BOM机。
BOM机主要是在车站中由工作人员进行操作，为乘客提供售票和补票的设备。
除了此外，BOM机还能办理替换、车票挂失、车票分析、车票处理、车票查询、收益管理、设备操作等等，功能齐全。
但是随着移动支付的发展，在支付方式上90%以上都会采用微信支付或者支付宝等在线扫描支付的方式。
所以为了提供更加多元化的支付方式，在BOM机上内嵌一个二维码支付扫描模块成为一个迫切的需求。
作为条码扫描模块的供应商，厦门远景达根据BOM机的操作需求，推荐RD4100二维码扫描模块。
RD4100小巧方便，容易内嵌在自助设备里面；接口众多，能够接受二次开发与改造；具有检票功能；还能应用于商超支付扫码；除此之外，RD4100还具有闪电开票的功能，扫一扫，就能快速开具发票，以后开票再也不要担心排长队了。
厦门远景达在无人商超、高速扫码支付、公交扫码支付、地铁闸机扫码支付、智能门禁、智能停车场等等都已有成熟的应用方案。
如果您有需要，欢迎您致电与我们联系。
汽车客运站售票系统开发
汽车客运站售票系统开发简介本文档介绍了一个汽车客运站售票系统的开发过程。
该系统旨在为客运站提供一个方便快捷的售票渠道，提升客运站的运营效率和服务质量。
功能需求该售票系统具有以下基本功能：1.用户注册与登录：用户可以通过注册账号并登录系统，方便进行后续的购票和查询操作。
2.线路管理：管理员可以添加、编辑和删除车辆的运行线路信息，包括起始站点、终点站点、途径站点和票价等。
3.车次管理：管理员可以添加、编辑和删除车次信息，包括车次号、发车时间、座位数等。
4.车票购买：用户可以浏览并选择自己想要购买的车次和座位，然后进行支付。
5.车票查询：用户可以根据日期、起始站点和终点站点，查询符合条件的车次信息。
6.退票：用户可以申请退票并退还部分票款。
技术架构本系统采用前后端分离的开发模式，前端使用Vue.js框架进行开发，后端使用Node.js和Express框架进行开发。
前端使用HTML、CSS和JavaScript语言编写，结合Vue.js框架实现页面的构建和交互。
后端使用Node.js作为运行环境，借助Express框架搭建Web服务器，并与数据库进行交互。
数据库采用MySQL，用于存储用户注册信息、车次信息和购票记录等数据。
数据库设计本系统涉及的数据库表包括：•用户表（user）：存储用户的注册信息，包括用户名、密码等。
•线路表（route）：存储车辆的运行线路信息，包括起始站点、终点站点、途径站点和票价等。
•车次表（schedule）：存储车次信息，包括车次号、发车时间、座位数等。
•订单表（order）：存储用户的购票记录，包括用户ID、车次ID、座位号、订单状态等。
接口设计本系统定义了以下接口：1.注册接口（POST /api/user/register）：用户注册接口，接受用户名和密码作为输入，返回注册成功的消息或注册失败的错误信息。
2.登录接口（POST /api/user/login）：用户登录接口，接受用户名和密码作为输入，返回登录成功的消息或登录失败的错误信息。
汽车客运站售票员售票操作规范
汽车客运站售票员售票操作规范汽车客运站售票员售票操作规范汽车客运站售票员售票服务规范1.售票前准备工作（1）正确放置告知牌；（2）零钱摆放有序；（3）启动计算机售票系统，输入本人工作代码，核对票号；（4）熟练地将客票装入打印机；（5）检查售票显示和柜台对讲系统是否工作正常；（6）检查桌面摆放是否整齐。
2.售票时操作规范（1）移开告知牌，放置隐蔽处。
（2）售票时，当收到旅客票款后，应放在桌面上，完成本次售票，旅客离开窗口后，将票款放进抽屉。
（3）客票打印清晰，有差错时或客票撕断应重打，并及时销号。
（4）抽屉内现金摆放有序。
3.售票时语言规范（1）讲普通话，语速适中，口齿清晰，语调亲切。
正确合理使用“十字”文明用语。
（2）旅客来到售票窗口前，应面对旅客微笑,首问：“您好！请问到哪里？”旅客说明购票需求后，售票员应简单扼要地重复其乘车日期、时间，到达站和购票张数。
（3）旅客确认后，应告之旅客购票总金额。
（4）收取旅客票款时，应唱收进金额，并唱找零。
（此时，计算机正在打印客票，售票员唱找零的同时，可把找零递给旅客）如果旅客所给票款正好时，应说一声“票款正好”。
（5）从打印机上撕下客票，眼看客票交待：“您购买的是*月*日*点*分，**站（到达站地名）、*张”。
在将客票递给旅客的同时，提醒旅客到几号门检票乘车,再说一声“再见”。
（6）售儿童票时，需问：“请问孩子（小孩）多高？”。
旅客回答其身高超过儿童票身高规定的，需及时告知旅客：“对不起，您的孩子（小孩）身高已超过购买儿童票规定，需购买全票。
”身高未超过儿童票身高规定的，需及时提醒旅客：“您的孩子（小孩）身高，按规定可以免票乘车，您还需购买儿童票吗？”旅客需要时。
可回答：“好的”，旅客不需要购买，可回答：“谢谢”。
身高满足购买儿童票规定的，需及时告知旅客：“可以购买半票。
”（7）售优待票时，需请旅客出示《残疾军人证》或《伤残人民警察证》。
可简要地说：“请出示您的有关证件”。
3D客运站场虚拟实训系统
3D客运站场虚拟实训系统
3D客运站场虚拟实训系统采用业界流行的3D游戏操作界面，融知识性与趣味性为一体，让学生在类似游戏的轻松操作中迅速理解并掌握现实汽车客运站务的管理流程、运作模式和工作内容。
3D客运站场虚拟实训系统模拟了现实中汽车客运站场的真实运作环境，包括售票窗口、服务台、候车大厅、检票口、调度室、发车卡位、停车位、行包货运受理处、包行货物打包、行包货物装车等众多场景，其核心是让学生通过模拟现实汽车站务管理的过程，达到迅速上岗的目的。
各个子系统的实训流程是在总结了众多汽车客运站场的业务模式基础上设计的，同时配套设计详细的实训指导书，确保学生深入理解汽车站务工作的操作细节与业务流程。
C语言课程设计汽车售票系统
C语言课程设计汽车售票系统一、教学目标本课程的教学目标是使学生掌握C语言的基本语法和编程技巧，能够运用C语言设计并实现一个简单的汽车售票系统。
具体目标如下：1.理解C语言的基本数据类型和运算符。
2.掌握C语言的控制结构，如条件语句和循环语句。
3.熟悉C语言的函数定义和调用。
4.理解C语言的指针和数组。
5.能够使用C语言编写简单的程序。
6.能够运用C语言实现数据的输入和输出。
7.能够运用C语言进行基本的逻辑判断和循环控制。
8.能够设计并实现简单的函数。
情感态度价值观目标：1.培养学生对计算机编程的兴趣和热情。
2.培养学生解决问题的能力和团队合作精神。
二、教学内容本课程的教学内容主要包括C语言的基本语法和编程技巧，以及如何设计一个简单的汽车售票系统。
具体内容如下：1.C语言的基本数据类型和运算符。
2.C语言的控制结构，如条件语句和循环语句。
3.C语言的函数定义和调用。
4.C语言的指针和数组。
5.C语言的输入输出操作。
6.C语言的逻辑判断和循环控制。
7.C语言的函数设计。
8.汽车售票系统的设计和实现。
三、教学方法本课程的教学方法主要包括讲授法、案例分析法和实验法。
通过多种教学方法的综合运用，激发学生的学习兴趣和主动性。
1.讲授法：通过讲解C语言的基本语法和编程技巧，使学生掌握相关知识。
2.案例分析法：通过分析具体的编程案例，使学生理解并掌握C语言的应用。
3.实验法：通过编写和运行C语言程序，使学生动手实践，巩固所学知识。
四、教学资源本课程的教学资源主要包括教材、参考书、多媒体资料和实验设备。
1.教材：选用权威、实用的C语言教材，如《C程序设计语言》。
2.参考书：提供相关的C语言编程参考书籍，如《C语言编程思想》。
3.多媒体资料：制作精美的教学PPT，提供相关的教学视频和案例分析。
4.实验设备：提供计算机实验室，让学生能够进行实际编程和实验。
五、教学评估本课程的评估方式包括平时表现、作业和考试三个部分，以全面客观地评估学生的学习成果。
- 1、下载文档前请自行甄别文档内容的完整性，平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益，请联系客服反馈,我们会尽快为您处理(人工客服工作时间：9:00-18:30)。
沈阳航空航天大学课程设计任务书学院：航宇专业：飞行器制造班级：94030101学号：2009040301004题目：简单的汽车站售票系统一、课程设计时间2011年3月7日~11日（第1周），共计1周。
二、课程设计内容假设每天“沈阳→植物园”有4个班次的汽车，具体的数据如下：班次发车时间载客量已售票数106:40500209:30400313:00400416:00400数据保存在文本文件或Access数据库中，请你为售票员开发一个程序，实现每天的“沈阳→植物园”的售票、退票等业务。
要求：售票时按旅客要求选择班次，如果某个班次已过了发车时间，则该班次今天不再售票，如果某个班次的票已售完，则也不能再售票。
用户界面中的菜单至少应包括“售票”、“退票”、“显示当前售票情况”、“退出”4项三、课程设计要求程序质量：✧贯彻事件驱动的程序设计思想。
✧用户界面友好，功能明确操作方便；可以加以其它功能或修饰。
✧代码应适当缩进，并给出必要的注释，以增强程序的可读性。
课程设计说明书：✧课设结束后，上交课程设计说明书和源程序。
课程设计说明书的内容参见提供的模板。
四、指导教师和学生签字指导教师：________学生签名：________五、成绩六、教师评语目录一、需求分析 (4)二、设计分析 (5)三、关键技术 (6)四、总结 (11)五、完整的源程序 (12)六、参考文献 (16)一、需求分析简单的汽车售票系统，主要指“售票”和“退票”这两种业务。
由于每班车都有规定的发车时间及最大载客量，所以系统必须能够判断是否已过发车时间，累计每个班次的售票量。
应旅客要求实现“售票”和“退票”业务，并显示当前每班车次的售票情况。
要求：（1）在文本文件中创建myfile.txt文件并保存数据，以“已售票数”、“已退票数”和“实售票数”3方面信息。
此文本应包括以下内容的数据：班次、发车时间、载客量、已售票数、已退票数、实售票数。
（2）能够在售票时按旅客要求选择班次。
（3）能够判断是否已过发车时间，实现相应售退票业务。
（4）能够判断每个班次的票是否售完，实现相应售退票业务。
（5）能够保存售退票数，显示当前各个班次的售退票情况。
二、设计分析（1）基本原理：建立程序设计与文本文件的联系，用Write#语句把数据写入文件，并通过使用Input#语句，从文件中按原来的数据类型读出数据并分别赋予指定变量。
（2）总体设计：Input#语句读取并赋值文本文件中的数据Write#语句输入图1总体设计（3）详细设计：开始判断是否过发车时间选择可选班次保存显示当前情况实现售退票业务保存当前的数据显示当前的售退票情况图2详细设计（4）文本设计：文本设计是总体设计阶段的一个环节。
本程序的文本文件包括6个内容，即班次、发车时间、载客量、已售票数、已退票数、实售票数。
1)汽车各班次具体情况（myfile.txt）汽车各班次具体情况（myfile.txt）用于记录“班次、发车时间、载客量、已售票数、已退票数、实售票数”这些信息，其结构如文本1所示。
文本1汽车各班次具体情况班次发车时间载客量已售票数已退票数实售票数16:4050c1b1a129:3040c2b2a2313:0040c3b3a3416:0040c4b4a4三、关键技术（1）建立文本文件并输入已知数据的代码如下。
Private Sub bc_Click()Open"myfile.txt"For Output As#1Write#1,"当前售票情况："Write#1,"班次发车时间载客量已售票数已退票数实际售票"Write#1,"106：4050"&Space(5)&c1&Space(12)&b1&Space(8) &a1Write#1,"209：3040"&Space(5)&c2&Space(12)&b2&Space(8) &a2Write#1,"313：0040"&Space(5)&c3&Space(12)&b3&Space(8) &a3Write#1,"416：0040"&Space(5)&c4&Space(12)&b4&Space(8) &a4Close#1End Sub图3窗体-售退票系统判断是否已过发车时间（2）判断是否已过发车时间。
程序段如下：Private Sub Form_Load()Form1.AutoRedraw=TruePrint TimeIf Time>=#6:40:00AM#ThenOption1.Enabled=FalseEnd IfIf Time>=#9:30:00AM#ThenOption2.Enabled=FalseEnd IfIf Time>=#1:00:00PM#ThenOption3.Enabled=FalseEnd IfIf Time>=#4:00:00PM#ThenOption4.Enabled=FalseEnd IfEnd Sub（3）按旅客选择实现相应班次的售票业务。
程序段如下：Private Sub sell_Click()Text1.Text=a1Text2.Text=a2Text3.Text=a3Text4.Text=a4If Option1Thena1=a1+1c1=a1+b1If a1>50Thena1=50c1=a1+b1End IfElseIf Option2Thena2=a2+1c2=a2+b2If a2>40Thena2=40c2=a2+b2End IfElseIf Option3Thena3=a3+1c3=a3+b3If a3>40Thena3=40c3=a3+b3End IfElseIf Option4Thena4=a4+1c4=a4+b4If a4>40Thena4=40c4=a4+b4End IfEnd IfText1.Text=a1Text2.Text=a2Text3.Text=a3Text4.Text=a4End Sub（4）按旅客选择实现相应班次的退票业务。
程序段如下：Private Sub refund_Click()Text1.Text=a1Text2.Text=a2Text3.Text=a3Text4.Text=a4If Option1Thena1=a1-1b1=c1-a1If a1<=0Thena1=0b1=c1End IfElseIf Option2Thena2=a2-1b2=c2-a2If a2<=0Thena2=0b2=c2End IfElseIf Option3Thena3=a3-1b3=c3-a3If a3<=0Thena3=0b3=c3End IfElseIf Option4Thena4=a4-1b4=c4-a4If a4<=0Thena4=0b4=c4End IfEnd IfText1.Text=a1Text2.Text=a2Text3.Text=a3Text4.Text=a4End Sub图4-窗体售退票系统（5）保存售退票数，并显示当先的售票情况。
程序段如下：Private Sub Form_Load()Dim abc As StringText1.Text=""Open"myfile.txt"For Input As#1'打开文件myfile.txt用于读出数据，文件号为1Do While Not EOF(1)'判断文件是否结束Line Input#1,cba'读一行数据送入变量abcText1.Text=Text1.Text+cba+vbCrLf'将读出的数据添加到文本框末尾LoopClose#1'关闭文件End Sub图5窗体-显示当前的售退票情况四、总结本次课设，我的题目是“简单的汽车售票系统”，课设让我进一步了解了VB与文本文件之间的联系，学会了如何用Write#语句把数据写入文件，并通过使用Input#语句，从文件中按原来的数据类型读出数据并分别赋予指定变量。
在这次为期一周的课设过程中，我遇到了很多难题，认识到了自己在对VB的掌握程度上还有很多不足之处。
例如：如何判断是否已经达到最大售票量，如何建立VB与已保存在文本文件中的数据的联系，并在此基础上添加变量显示当前的售票情况。
通过对老师的请教，跟同学的探讨以及查看参考相关资料，我最终解决了程序设计中的困难，实现了题目中的各个要求。
通过课设中对VB的进一步了解和学习，我认识到了VB在当今的现实生活中有着广泛的应用，VB对于解决实际问题有着重要意义。
学好VB基础，并能熟练掌握知识点解决实际问题是当代大学生的重要任务。
五、完整的源程序Option ExplicitDim a1%,a2%,a3%,a4%,b1%,b2%,b3%,b4%,c1%,c2%,c3%,c4%Private Sub bc_Click()Open"myfile.txt"For Output As#1Write#1,"当前售票情况："Write#1,"班次发车时间载客量已售票数已退票数实际售票"Write#1,"106：4050"&Space(5)&c1&Space(12)&b1&Space(8)& a1Write#1,"209：3040"&Space(5)&c2&Space(12)&b2&Space(8)& a2Write#1,"313：0040"&Space(5)&c3&Space(12)&b3&Space(8)& a3Write#1,"416：0040"&Space(5)&c4&Space(12)&b4&Space(8)& a4Close#1End SubPrivate Sub exit_Click()EndEnd SubPrivate Sub Form_Load() Form1.AutoRedraw=True Print TimeIf Time>=#6:40:00AM#ThenOption1.Enabled=False End IfIf Time>=#9:30:00AM#ThenOption2.Enabled=FalseEnd IfIf Time>=#1:00:00PM#ThenOption3.Enabled=FalseEnd IfIf Time>=#4:00:00PM#ThenOption4.Enabled=FalseEnd IfEnd SubPrivate Sub refund_Click() Text1.Text=a1Text2.Text=a2Text3.Text=a3Text4.Text=a4If Option1Thena1=a1-1b1=c1-a1If a1<=0Thena1=0b1=c1End IfElseIf Option2Thena2=a2-1b2=c2-a2If a2<=0Thena2=0b2=c2End IfElseIf Option3Thena3=a3-1b3=c3-a3If a3<=0Thena3=0b3=c3End IfElseIf Option4Thena4=a4-1b4=c4-a4If a4<=0Thena4=0b4=c4End IfEnd IfText1.Text=a1 Text2.Text=a2 Text3.Text=a3 Text4.Text=a4End SubPrivate Sub sell_Click() Text1.Text=a1 Text2.Text=a2 Text3.Text=a3 Text4.Text=a4If Option1Thena1=a1+1c1=a1+b1If a1>50Thena1=50c1=a1+b1End IfElseIf Option2Thena2=a2+1c2=a2+b2If a2>40Thena2=40c2=a2+b2End IfElseIf Option3Thena3=a3+1c3=a3+b3If a3>40Thena3=40c3=a3+b3End IfElseIf Option4Thena4=a4+1c4=a4+b4If a4>40Thena4=40c4=a4+b4End IfEnd IfText1.Text=a1Text2.Text=a2Text3.Text=a3Text4.Text=a4End SubPrivate Sub show_Click()Form2.showEnd SubPrivate Sub Command1_Click()Form2.HideEnd SubPrivate Sub Form_Load()Dim abc As StringText1.Text=""Open"myfile.txt"For Input As#1'打开文件myfile.txt用于读出数据，文件号为1Do While Not EOF(1)'判断文件是否结束Line Input#1,cba'读一行数据送入变量abcText1.Text=Text1.Text+cba+vbCrLf'将读出的数据添加到文本框末尾LoopClose#1'关闭文件End Sub六、参考文献[1]求是科技著《visual basic6.0信息管理系统开发实例导航》人民邮电出版社2005年4月[2]韩亚萍等《visual basic6.0基础培训百例》机械工业出版社2006年7月[3]郑海春谢维成主编《visual basic6.0编程及实例分析教程》清华大学出版社2007年4月。