- 1、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。。
- 2、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 3、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
- 4、该文档为VIP文档,如果想要下载,成为VIP会员后,下载免费。
- 5、成为VIP后,下载本文档将扣除1次下载权益。下载后,不支持退款、换文档。如有疑问请联系我们。
- 6、成为VIP后,您将拥有八大权益,权益包括:VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
- 7、VIP文档为合作方或网友上传,每下载1次, 网站将根据用户上传文档的质量评分、类型等,对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
查看更多
学号 0908210108
《高级语言程序设计》
课程设计报告
题目: 公交线路调配管理系统的设计与实现 专业: 计算机科学与技术 班级: 09(2)班 姓名: 方刚 指导教师: 代美丽 成绩:
计算机与信息工程系
2013年6月19日目录
1.设计内容及要求 2
1.1内容 2
1.2要求 2
2.概要设计 2
2.1需求概述 2
2.2功能模块 2
2.3软件结构 3
2.4总体和模块外部功能设计 3
2.5接口设计 3
2.5.1外部接口 3
2.5.2内部接口 3
2.6数据库设计 3
3.设计过程或程序代码. 5
3.1登录 5
3.2主窗体 6
3.2.1查看出车 7
3.2.2增加车辆 7
3.2.3故障信息 9
3.2.4定期保养 11
3.2.5模拟回执(输入信息) 11
3.2.6退出 11
4.设计结果与分析. 12
4.1登录 12
4.2模拟回执(输入信息) 12
4.3查看出车 12
4.4增加车辆 13
4.5故障信息 14
4.6定期保养 15
5.参考文献. 16
公交线路调配管理设计内容
总体和模块外部功能设计
一般功能:
增加数据信息
删除数据信息
修改数据信息
查询数据信息
特殊功能:
权限设置(在此不要求实现)
接口设计
外部接口
界面为Windows应用程序界面,通过ADO.NET访问数据库;
与其他软硬件设备的接口函数未写。
内部接口
暂无。
数据库设计
使用ACCESS数据库。
车辆:
字段名 数据类型 说明 车牌号 文本 保养日期 日期/时间 下一次做保养的日期 车型 文本 载客 数字 发动机 文本 发动机类型 车重 数字 人员职位 功率 数字 制造厂 文本
驾驶员:
字段名 数据类型 说明 工号 文本 司机的工号 姓名 文本 性别 文本 车牌号 文本 联系电话 文本 司机的联系电话 驾驶中 是/否 是否在驾驶
管理层:
字段名 数据类型 说明 工号 文本 管理人员工号 姓名 文本 性别 文本 部门 文本 所属部门 联系电话 文本 登录密码 文本 级别 文本 管理级别 维修:
字段名 数据类型 说明 车牌号 文本 维修日期 日期/时间 维修部位 文本 汽车维修的部位 地点 文本 维修地点 维修费 数字 维修的花费
线路:
字段名 数据类型 说明 线路编号 文本 例如:121,3。 起始站 文本 终点站 文本 途经站 文本
车队:
字段名 数据类型 说明 车牌号 文本 线路编号 文本
设计过程或程序代码
登录
Public Class 登录
Private Sub OK_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles OK.Click
Dim myconn As New OleDb.OleDbConnection(Provider=Microsoft.ACE.OLEDB.12.0;Data Source=|DataDirectory|\bus.accdb;)
Dim mystr As String = SELECT * FROM 管理层 WHERE 工号= + UsernameTextBox.Text + AND 登录密码= + PasswordTextBox.Text +
Dim myadapter As New OleDb.OleDbDataAdapter(mystr, myconn)
Dim mydataset As New DataSet
myadapter.Fill(mydataset, table)
If (Trim(UsernameTextBox.Text) And Trim(PasswordTextBox.Text) ) Then
If (mydataset.Tables(table).Rows.Count = 1) Then
Me.Hide()
Form1.Show()
Else
MsgBox(没有此用户或密码错误,请重输!)
UsernameTextBox.Focus()
End If
Else
MsgBox(请输入用户名和密码!)
Usernam
您可能关注的文档
最近下载
- 第10讲-地球科学概论_生物圈.pptx VIP
- 土方开挖施工方案(筏板、独立基础、条形基础、桩间土).pdf VIP
- 地球科学概论 第10讲 _生物圈——[武汉大学 地球科学概论].pdf VIP
- 通用汽车ECU密码一致性规范CYS9100 - The Per-ECU Password Utility.pdf VIP
- 2024秋《战场侦察监视技术与装备》答案.docx VIP
- 某公司年度经济活动分析报告.ppt VIP
- 明清时期举人名录.pdf VIP
- 苏教版小学科学五年级下册教学设计教案.pdf VIP
- 人教版七年级上册英语第一次月考试题(含答案).docx VIP
- 梅赛德斯-奔驰-R级-产品使用说明书-R350 4MATIC-251165-Rclass.pdf VIP
文档评论(0)