- 1、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。。
- 2、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 3、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
- 4、该文档为VIP文档,如果想要下载,成为VIP会员后,下载免费。
- 5、成为VIP后,下载本文档将扣除1次下载权益。下载后,不支持退款、换文档。如有疑问请联系我们。
- 6、成为VIP后,您将拥有八大权益,权益包括:VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
- 7、VIP文档为合作方或网友上传,每下载1次, 网站将根据用户上传文档的质量评分、类型等,对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
查看更多
青岛理工大学
汽车和交通学院
课程设计任务书
课程名称 交通工程上机实习
试验序号 02
课题名称 公交企业调度软件
专业班级 级交通工程2班
组 员 王瑶 24038
组 员 于亚男 24039
组 员 张春利 24040
指导老师 阎岩 潘福全 魏金丽 陈秀峰
日期 7月15日
汽车和交通学院 交通工程教研室
一、实习性质:上机实习是交通工程专业教学计划关键组成部分,是落实理论联络实际,培养高素质人才关键实践步骤.
二、实习时间:7月4日—7月15日
三、实习目标:
= 1 \* GB2 ⑴经过实践锻炼,培养学生理论联络实际,实事求是良好作风;
= 2 \* GB2 ⑵经过实习达成巩固所学计算机软件(VB等),硬件知识,交通工程专业知识
= 3 \* GB2 ⑶提升综合应用能力,并为毕业设计等做一定程度准备.
四、实习要求:
(1)学生必需服从指导老师安排。
(2)严格遵守各项规章制度和实习纪律。
(3)勤于思索,有目标地提升自己分析问题,处理问题能力。
(4)必需提前准备好上机试验初稿,无初稿不能上机。
(5)实习期间必需严格实施请假制度,标准上不准事假,如有特殊情况应取得学校指导老师同意,病假应有医院证实。实习期间不得旷课,迟到或早退。
四.试验设备仪器:计算机,打印机.
五.试验原理:经过VB和数据库编程,实现交通工程项目管理,交通调度软件,交通仿真相关功效.
六.软件模块功效介绍:
步骤图:
公交企业调度系统
公交企业调度系统
人事管理系统管理车辆调度
人事管理
系统管理
车辆调度
请假信息数据表界面职员工资数据表界面职员信息数据表界面车场信息列表车辆调度派班信息驾驶员信息列表车辆信息列表密码用户登录
请假信息数据表界面
职员工资数据表界面
职员信息数据表界面
车场信息列表
车辆调度派班信息
驾驶员信息列表
车辆信息列表
密码
用户登录
模块
模块
软件界面:
1、登陆界面
2、目录界面
3、车辆调度界面
4、人事管理界面
5、车辆信息列表界面
6、驾驶员信息列表界面
7、车辆调度派车信息界面
8、车场信息列表界面
9、职员信息数据表界面
10、职员工资数据表界面
11、请假信息数据表界面
八.心得体会:在这次VB程序设计实习中,我逐步了解了程序在VB 6.0中调试并运行方法,我知道了程序中合适定义全局变量,方便各模块间数据传输,也能够在代码通用段或标准模块中定义部分通用变量,以扩大这些变量起作用范围。也学会了让交通调度和VB语言相结合,实现我们想完成调度任务.对我们专业知识,得到了更深刻认识,和初步应用.
九.程序代码:
1、登陆代码:
Private Sub Command1_Click()
Dim p As Integer
If Text1.Text = abc And Text2.Text = 123456 Then
MsgBox 欢迎登陆
Form2.Show
Form1.Hide
Else
p = MsgBox(密码错误!, 5 + 48, 输入密码)
If p = 4 Then
Text1.SetFocus
Else
MsgBox 密码错误,不重试了!
End
End If
End If
End Sub
Private Sub Command2_Click()
Form1.Hide
End Sub
Private Sub Form_Load()
Text2.PasswordChar = *
Text2.Text =
End Sub
Private Sub Image1_Click()
End Sub
2、目录代码:
Private Sub Command1_Click()
Form3.Show
Form2.Hide
End Sub
Private Sub Command2_Click()
Form4.Show
Form2.Hide
End Sub
Private Sub Command3_Click()
Form1.Show
Form2.Hide
End Sub
Private Sub Image1_Click()
End Sub
3、车辆调度目录代码:
Private Sub Command1_Click()
frm2.Show
Form3.Hide
End Sub
Private Sub Command2_Click()
frm3.Show
Form3.Hide
End Sub
Private Sub Command3_Click()
frm4.Show
Form3.Hide
End Sub
Private S
文档评论(0)