- 1、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。。
- 2、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 3、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
- 4、该文档为VIP文档,如果想要下载,成为VIP会员后,下载免费。
- 5、成为VIP后,下载本文档将扣除1次下载权益。下载后,不支持退款、换文档。如有疑问请联系我们。
- 6、成为VIP后,您将拥有八大权益,权益包括:VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
- 7、VIP文档为合作方或网友上传,每下载1次, 网站将根据用户上传文档的质量评分、类型等,对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
查看更多
Vb课程设计--公交管理系统
目录
1 系统分析 - 1 -
1.1需求分析 - 1 -
2 总体设计 - 1 -
2.1 系统主要功能 - 1-
2.2 系统功能结构图 - 2 -
3 系统设计 - 2 -
3.1 设计目标 - 2 -
3.2 开发及运行环境 - 2-
3.3 数据库设计 - 3 -
4 主要功能模块设计 - 4 -
4.1 登录模块界面设计 - 4 -
4.2 主窗体设计 - 6 -
4.3 用户管理界面设计 - 6 -
4.4 添加信息窗体设计 - 8 -
4.5 修改删除信息窗体设计 - 9 -
4.6 浏览信息窗体设计 - 11 -
4.7 查询窗体设计 - 12 -
4.8 统计窗体设计 - 13 -
附录A 参考文献 - 15 -
总结 - 16 -
1 系统分析
1.1需求分析
根据公交公司对公交车的管理需求,要求系统具有以下功能:
由于该系统的使用对象较多,要求有严密的权限管理。
具有数据备份及数据恢复的功能,确保系统的安全性。
方便的全方位的数据查询。
强大的报表打印功能。
在相应的权限下,可以删除、添加或修改数据。
2 总体设计
2.1 系统主要功能
公交线路管理系统是一个非常有特点的管理软件,系统由系统维护,编辑信息,浏览,查询,统计,打印预览等几个功能模块组成,规划系统功能模块如下:
系统维护模块
系统维护模块主要包括密码修改
编辑信息模块
由添加,删除修改2个部分。
浏览模块
能够浏览相应的公交车信息
信息查询模块
能够按线路和按车牌号查询公交信息
统计模块
打印预览模块
2.2 系统功能结构图
图2-2-1 系统功能结构图
3 系统设计
3.1 设计目标
本系统是根据公交公司的实际需求而开发的,完全能够实现公司对公交车的自动化管理,通过本系统可以达到以下目标:
系统运行稳定,安全可靠。
界面设计美观,人机交互界面友好。
信息查询灵活、方便、快捷、准确,数据存储安全可靠。
满足键盘和鼠标的双重操作,完全支持回车键。
采用多种方式查询数据。
操作员可以随时修改自己的口令。
对用户输入的数据,系统进行严格的数据检验,尽可能排除人为的错误。
数据保密性强,为每个用户设置相应的权限级别。
3.2 开发及运行环境
系统开发平台:Visual basic 6.0
运行平台:Windows xp/Windows 2000/windows 98
3.3 数据库设计
本系统采用Visual basic 6.0设计数据库,本系统中包括如下数据表。下面分别给出数据表的结构。
用户密码表:储存用户的密码,使用户能够安全登录。
表 3-3-1 密码表
用户名 密码 刘正福 123 林雨 123
公交线路表:储存汽车信息,方便查询.
表 3-3-2 公交线路表
线路编号 司机姓名 车牌号码 0002 甲 辽A111111 0003 小明 辽A010101
公交线路表:储存公交线路信息,方便浏览。
表3-3-3 公交线路表
线路编号 司机姓名 车牌号码 线路始终 0002 甲 辽A111111 乙——丙 0003 小明 辽A010101 沈阳——抚顺
4 主要功能模块设计
4.1 登录模块界面设计
登陆界面是管理信息系统必不可少的,登陆界面主要作用就是使用户能够安全的进入系统。系统的登陆界面由图4-1所示。
图4-1登录模块界面设计运行结果
设计代码如下
Private Sub Command1_Click()(点击确定运行)
Dim MPassword As String
Adodc1.RecordSource = select * from 密码表 where 用户名 = Text1.Text
Adodc1.Refresh
If Adodc1.Recordset.RecordCount 0 Then
MPassword = Adodc1.Recordset.Fields(密码)
If Text2.Text = MPassword Then
Name1 = Text1.Text
Form3.Show
Unload Me
Else
MsgBox 密码输入错误, , 提示
Text2.Text =
Text2.SetFocus
End If
Else
MsgBox 不存在用户, , 提示
Text1.Text =
Text2.Text =
您可能关注的文档
最近下载
- 神经外科常用药物.ppt VIP
- 最新美的集团人才培养与人才梯队建设方案.docx VIP
- AVEVA Marine 船舶生产设计培训中文材料 (套料).pdf VIP
- 汇川(INOVANCE)ME320L变频器说明书.pdf
- 迈向净零碳排之路—2030光储能源转型白皮书-InfoLink.pdf VIP
- 【区级联考】北京市西城区2018-2019学年七年级上学期期末考试数学试题【含答案】.docx VIP
- 护理给药制度ppt.pptx
- 在线网课学习课堂《人机工程学(西南交通大学)》单元测试考核答案.docx VIP
- 2023年10月自考04183概率论与数理统计(经管)试题及答案含评分标准.docx VIP
- 公考行测送分口诀包.pdf VIP
原创力文档


文档评论(0)