数据库课程设计 洗车房管理系统.docx
- 文档编号:29521620
- 上传时间:2023-07-24
- 格式:DOCX
- 页数:23
- 大小:782.19KB
数据库课程设计 洗车房管理系统.docx
《数据库课程设计 洗车房管理系统.docx》由会员分享,可在线阅读,更多相关《数据库课程设计 洗车房管理系统.docx(23页珍藏版)》请在冰豆网上搜索。
数据库课程设计洗车房管理系统
摘要
本系统的主要功能是洗车房信息的管理及对各种信息的查询,增加,修改,更新。
本系统的数据库是用SQLserver2008软件进行创建与设计,分别包括车辆信息,车位信息,工资信息和密码表四个表。
通过系统ODBC数据源管理工具把已创建的数据源与系统数据库相连。
利用VB软件对系统的窗口进行设计,包括欢迎界面、登陆界面、主菜单界面、浏览窗体和查询窗体等,可以通过这些窗体进行登陆操作,对输入的用户信息进行验证,以及最重要的操作是对数据库中信息进行浏览与查询。
并可以对数据进行添加与删除,做到及时更新。
关键词:
洗车房信息管理SQLserver20008VB6.0
第1章系统功能概述
1.1系统功能
(1).洗车记录的管理与查询
(2).车位信息的管理与查询
(3).工资信息的管理与查询
(4).工作信息修改
1.2系统结构总图
洗车房管理系统通过运用VB软件建立,窗口化设计,对洗车房各项工作的查询,管理,更新。
记录日常工作信息,合理分配工资,及时查询工作记录等,结构如图1.1
洗车记录
洗车记录查询
车位表信息
车型信息查询
工资信息
工作信息修改
图1.1 洗车房管理系统的总体结构
第2章数据库设计
2.1需求分析
洗车房的业务很简单。
来了一辆车,记录其车型、车牌号、洗车时间、价格,在那个车位洗车。
每个车位包含若干洗车员,一辆车由多个洗车员同时清洗。
洗车数量、车型与洗车员的工资挂钩,所以必须准确计算每个洗车员洗车的次数和车型。
必须提供复杂的查询功能,
2.2E-R模型
车牌号
车型
车位
车辆信息
价格
洗车时间
图2.1车辆信息实体属性
洗车员2
洗车员3
洗车员1
车位信息
车位
车位信息实体属性图2.2
工资
总数量
洗车员号码
工资信息
中车数量
小车数量
大车数量
图2.3工资信息实体属性
密码表
账号
密码
系统信息实体属性图2.4
2.3关系模型
一个实体型转换为一个关系模式。
实体的属性就是关系的属性,实体的码就是关系的码。
根据E-R图向关系模型转换的原则,把E-R图转换为关系模型。
关系的码用下横线标出。
(1)车辆信息(车牌号、车型信息、洗车时间、洗车价格、车位)
(2)车位信息(车位、洗车员1、洗车员2、洗车员3)
(3)工资信息(洗车员号码,工资,总车辆数,大车数量,中车数量,小车数量)
(4)密码表(账号、密码)
2.4表结构设计
本系统需在SQLServer中建立四个表,分别为车辆信息,车位信息,工资信息和密码表。
(1)洗车记录表的建立与基本数据:
“洗车记录表”如图2.5,SQL语句如下:
createtable洗车记录
(车牌号char(10)PRIMARYKEY,
车型char(10)notnull,
洗车时间char(10)notnull,
价格char(10)notnull,
车位smallintnotnull,);
图2.5洗车记录表
(2)车位信息表的建立与基本数据:
“车位信息表”如图2.6,SQL语句如下:
createtable车位信息
(车位smallintprimarykey,
洗车员1char(10),
洗车员2char(10),
洗车员3char(10),
);
图2.6车位信息表
(3)工资信息表的建立与基本数据:
“工资信息表”如2.7,SQL语句如下:
createtable工资信息
(洗车员char(10)primarykey,
工资char(10),
数量char(10),
大char(10),
中char(10),
小char(10),
);
图2.7工资信息表
(4)系统信息表的建立与基本数据:
“密码表”如图2.8,SQL语句如下:
Createtable密码表
(账号varchar(10),
密码varchar(10));
图2.8密码表
第3章系统各功能模块的详细设计
3.1各窗体的设计
本洗车房管理系统共包括11个窗体,分别为欢迎界面,登录,注册新用户,车型信息查询,车位信息查询,工资信息查询,车型信息修改,查询车牌号,MDI窗体。
其中主窗体为MDI窗体。
下面介绍各个窗体的设计语句及实现功能。
3.2封面
封面,如图3.1,标题为“洗车房管理系统”,为此标题添加一个Timer,编辑代码使其可以定时变色。
点击“点击进入系统”就可以关闭本窗体并打开登录窗体。
封面代码如下:
PrivateSubPicture1_Click()
Form2.Show
UnloadMe
EndSub
图3.1欢迎界面
3.3登录窗体
单击封面,进入登录窗口,如图3.2,若正确则打开下面的主窗体,如图3.3。
登录代码如下:
DimmiCountAsInteger
PrivateSubCmdCancel_Click()
UnloadMe
EndSub
PrivateSubCmdLand_Click()
StaticmiCountAsInteger
DimsqlstrAsString
sqlstr="Select*from密码表Where账号='"&Text1&"'"
Adodc1.RecordSource=sqlstr
Adodc1.Refresh
IfAdodc1.Recordset.BOFThen
MsgBox"账号错误,请重新输入",vbExclamation,"警告"
Text1.Text="":
Text1.SetFocus
Else
IfAdodc1.Recordset.Fields("密码")=Text2.TextThen
MDIForm1.Show
UnloadMe
Else
MsgBox"密码错误,请重新输入",vbExclamation,"警告"
Text2.Text="":
Text2.SetFocus
EndIf
EndIf
miCount=miCount+1
IfmiCount=3ThenUnloadMe
EndSub
图3.2登录图
3.4主菜单
设计为MDI窗体如图3.3,含有主菜单:
[菜单](包括洗车记录)、[文件](包括洗车员工作记录)。
[代码如下:
PrivateSubxichejilu_Click()
Form4.Show
EndSub
PrivateSubshouru_Click()
Form6.Show
EndSub
PrivateSubxicheyuan_Click()
Form7.Show
EndSub
PrivateSubzuijia_Click()
Form9.Show
EndSub
图3.3主菜单图
3.5洗车记录窗体
洗车记录窗体用于查询洗车记录及其基本信息。
单击“录入”按钮,允许添加新的记录,,当单击确定时,同时添加新记录,单击“删除”按钮,删除已经添加的信息。
同时包含工资信息,修改工作信息,车位表,查询车型信息。
登记代码如下:
PrivateSubCmdAdd_Click()
Adodc1.Recordset.AddNew
CmdAdd.Enabled=False
CmdDel.Enabled=False
CMDOK.Enabled=True
CMDESC.Enabled=True
Text1.Locked=False
Text2.Locked=False
Text3.Locked=False
Text4.Locked=False
Text5.Locked=False
EndSub
PrivateSubCmdDel_Click()
x=MsgBox("确实要删除当前记录吗?
",vbYesNo+vbQuestion,"确认")
Ifx=vbYesThen
Adodc1.Recordset.Delete
Adodc1.Recordset.MoveNext
IfAdodc1.Recordset.EOFThen
Adodc1.Recordset.MoveLast
EndIf
Else
Adodc1.Refresh
EndIf
EndSub
PrivateSubCmdFirst_Click()
Adodc1.Recordset.MoveFirst'记录指针移到首记录(显示首记录)
CmdFirst.Enabled=False'让[首记录]按钮无效
CmdPre.Enabled=False'让[前移]按钮无效
CmdNext.Enabled=True'让[后移]按钮有效
CmdLast.Enabled=True'让[末记录]按钮有效
EndSub
PrivateSubCmdLast_Click()
Adodc1.Recordset.MoveLast'移到末记录
CmdFirst.Enabled=True
CmdPre.Enabled=True
CmdNext.Enabled=False
CmdLast.Enabled=False
EndSub
PrivateSubCmdNext_Click()
Adodc1.Recordset.MoveNext'记录指针移到下一条记录
CmdFirst.Enabled=True
CmdPre.Enabled=True
IfAdodc1.Recordset.EOFThen'如果记录指针移到了末记录之后
Adodc1.Recordset.MoveLast'则记录指针移到末记录上
CmdNext.Enabled=False
CmdLast.Enabled=False
EndIf
EndSub
PrivateSubCmdPre_Click()
Adodc1.Recordset.MovePrevious'记录指针移到前一条记录
CmdNext.Enabled=True
CmdLast.Enabled=True
IfAdodc1.Recordset.BOFThen'如果记录指针移到首记录之前,
Adodc1.Recordset.MoveFirst'则记录指针移到首记录上
CmdFirst.Enabled=False
CmdPre.Enabled=False
EndIf
EndSub
PrivateSubCommand2_Click()
Adodc1.Refresh
CmdAdd.Enabled=True
CmdDel.Enabled=True
CMDOK.Enabled=False
CMDESC.Enabled=False
EndSub
PrivateSubCommand5_Click()
Adodc1.Recordset.Update
CmdAdd.Enabled=True
CmdDel.Enabled=True
CMDOK.Enabled=False
CMDESC.Enabled=False
EndSub
PrivateSubCommand7_Click()
Form14.Show
EndSub
PrivateSubCommand6_Click()
Form10.Show
EndSub
PrivateSubCommand8_Click()
Form12.Show
EndSub
PrivateSubCommand9_Click()
Form13.Show
EndSub
“洗车记录”界面用于进行对“洗车记录”浏览,添加,以及对其他信息的查询修改,如图3.4
图3.4洗车记录浏览图
“修改工作信息”界面用于修改“工作信息”表内容,以便对洗车员工作记录进行及时更新,如图3.5
图3.5修改工作信息
“工资信息”界面用于显示工资信息表的内容,以便查询洗车员工资信息,如图3.6
图3.6工资信息图
“车位表”界面用于显示车位信息,如图3.7
图3.7车位表图
点击“查询车型信息”进入“车型查询界面”通过输入车牌号并点击“查询”查询车型信息,如图3.8,代码如下:
DimstrAsString
str="Select*From洗车记录"
str=str&"WHEREVnumberLike'"&Text1&"%'"
Adodc1.RecordSource=str
Adodc1.Refresh
EndSub
图3.8车牌号查询界面
“洗车员工作记录”用于查询每位洗车员工作记录,如图3.9:
图3.9洗车员工作记录查询表
总结
通过这次数据库课程设计,我学会了如何利用MicrosoftSQLServer2008软件建立相关信息的数据库,并通过MicrosoftVisualBasic6.0实现对相关信息的查询,将所学知识都运用到实践中去,增加了我对数据库的兴趣,让我能更清楚地了解到数据库在现实生活中为我们带来的极大便利,方便我们将所需要的信息进行规划和管理,将信息集中管理也为我们查询我们所需要的信息带来了简易的途经。
最后,感谢数据库课程设计老师对我们耐心的教导和帮助,为我们解决了许多在课堂上没弄懂的问题,让我们对数据库有了更进一步的认识和了解。
今后我会更加努力学习数据库的相关知识,相信能为我以后带来很大的帮助。
参考文献
[1]王珊.数据库系统简明教程.北京:
高等教育出版社,2004.9
[2]赛奎春.VisualBasic信息系统开发实例精选.北京:
高等教育出版社,2004.9
[3]刘韬、何旭洪主编.VisualBASIC数据库系统开发实例导航.人民邮电出版社
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- 数据库课程设计 洗车房管理系统 数据库 课程设计 洗车 房管 系统
![提示](https://static.bdocx.com/images/bang_tan.gif)