vb课程设计报告 饭店点菜系统.docx
- 文档编号:11517147
- 上传时间:2023-03-02
- 格式:DOCX
- 页数:12
- 大小:711.02KB
vb课程设计报告 饭店点菜系统.docx
《vb课程设计报告 饭店点菜系统.docx》由会员分享,可在线阅读,更多相关《vb课程设计报告 饭店点菜系统.docx(12页珍藏版)》请在冰豆网上搜索。
vb课程设计报告饭店点菜系统
《VisualBasic程序设计》
课程设计报告
课程设计题目:
饭店点菜系统
姓名:
专业:
班级:
学号:
指导老师:
2010年6月18日
摘要
饭店点菜系统是用VB编写的一款软件,顾客可以分类浏览饭店的所有菜式、采样及价格并进行点菜,操作后能预览点菜结果,并可对其进一步修改;留言板能够记录顾客的意见和建议,并具有浏览功能;当顾客的消费达到指定金额时,可分档抽取小奖品。
饭店管理者可以通过登录系统进入到对菜品管理的界面,在此可以对菜品进行添加,删除,修改以及对历史消费记录金额的查看。
此软件主要用于饭店管理系统,有利于提高饭店工作效率。
封面…………………………………………………………1
内容摘要……………………………………………………2
目录…………………………………………………………2
-、题目要求、目的及分工………………………………3
二、功能描述………………………………………………4
三、概要设计………………………………………………5
四、详细设计………………………………………6--11
五、存在的问题及不足……………………………………12
六、心得体会……………………………………13
七、附录……………………………………
-、题目要求、目的及分工
1、本次课程设计任务的主要内容和要求(包括原始数据、技术参数、设计要求等)
(1)主要功能有:
菜式浏览功能:
能分类浏览饭店的所有菜式、采样及价格;
点菜功能:
进行点菜操作后能预览点菜结果,并可对其进一步修改;
留言板功能:
记录顾客的意见和建议,并具有浏览功能;
抽奖功能:
当顾客的消费达到指定金额时,可分档抽取小奖品。
(2)要求:
①2~3人完成
②用数据库或文件保存相关信息
2、本次课程设计应达到的目的
通过该题目的设计,使学生掌握软件开发过程的问题分析、系统设计、程序编码、测试等基本方法和技能;掌握利用VB开发数据库系统的方法
3、分工
点菜界面:
留言板:
抽奖系统:
菜品管理:
二、功能描述
1.运行
打开饭店点菜系统,进入主界面。
两个按钮可以分别进入点菜系统和菜品管理系统。
2.点菜系统
此页面分为三个板块:
点菜;顾客留言;参加抽奖。
在点菜板块中中进行菜式浏览并进行点菜,删菜及落单。
在顾客留言中可以添加对饭店的建议及浏览历史留言。
当消费达到一定金额时可以在抽奖板块中进行抽奖。
3.登录
通过输入用户名和密码进入到菜品管理界面
4.菜品管理
饭店管理者可以在此对菜品进行添加,删除,修改及对顾客历史消费的查看
三.概要设计(模块流程图)
四、详细设计
1、首页界面
(1)界面
(2)使用介绍
单击开始点菜按钮进入点菜界面,单击菜品管理进入菜品管理登录界面
(3)用到的控件及其属性设置
控件名称
属性
属性值
Label1
Caption
订餐电话:
8793555
Command1
Caption
开始点菜
Command2
Caption
菜品管理
(4)代码
PrivateSubCommand1_Click()
UnloadForm2'单击command1进入点菜系统界面,卸载首页
Form1.Show
EndSub
PrivateSubCommand2_Click()
UnloadForm1'单击command2进入菜品管理登录系统,卸载首页
Form4.Show
EndSub
2、点菜系统
(1)界面
(2)使用介绍
单击相应的菜品分类按钮,表框里出现所选菜类的所有菜品,在表中单击相应菜品,表的下方出现相应菜品的信息,包括菜名,单价,图片,并可以在数量栏中输入所需数量,单击点菜,所选菜品就点菜成功,在当前点菜的列表中出现所点菜品,总金额相应累加,删菜时,单击当前点菜中的某一菜品,按下退菜按钮即可删菜,落单即可提交信息,此时仍可以加菜,但不能退菜。
返回首页按钮用于返回主页面。
(3)用到的控件介绍及其属性设置
命令按钮9个;label标签6个;picture框两个;一个用于显示背景,另一用于显示菜品图片,其路径由数据库调出;text框4个;list列表一个;SSTab1
Data控件:
Data控件用来来执行大部分数据访问操作,与Data控件相连结的数据觉察控件自动显示来自当前记录的一个或多个字段的数据,或者,在某些情况下,显示来自当前记录旁边的一个记录集合中的一个或者多个字段中的数据。
Data控件在当前记录上执行所有操作。
在点菜系统中主要用到了其DatabaseName,Recordsource属性
DatabaseName用来设置data被访问的数据库的路径和文件名;
Recordsource用来设置data的数据来源,即设置data控件所要打开的数据库表
MSFlexGrid控件:
MSFlexGrid控件用于显示和操作表格数据。
其对包含字符串和图片的表格提供了灵活的排序、插入数据和格式编排功能。
当与Data控件绑定时,MSFlexGrid控件只显示只读数据。
此系统中主要使用此控件进行菜品的查看和选择,用到了TextMatrix属性提取表格中的信息。
(4)代码
PrivateSubCommand1_Click()
Data1.DatabaseName="d:
\菜品\素菜.mdb"'设置data1的DatabaseName属性为d:
\菜品\素菜.mdb,即设置被访问的数据库的路径和文件名是"d:
\菜品\素菜.mdb"
Data1.RecordSource="select*from素菜"'设置data1的数据来源(RecordSource),即设置data1控件所要打开的数据库表是素菜表
Data1.Refresh'刷新数据库
EndSub
PrivateSubCommand2_Click()
Data1.DatabaseName="d:
\菜品\荤菜.mdb"'设置data1的DatabaseName属性为d:
\菜品\荤菜.mdb,即设置被访问的数据库的路径和文件名是"d:
\菜品\荤菜.mdb"
Data1.RecordSource="select*from荤菜"'设置data1的数据来源(RecordSource),即设置data1控件所要打开的数据库表是荤菜表
Data1.Refresh'刷新data1
EndSub
PrivateSubCommand3_Click()
Data1.DatabaseName="d:
\菜品\酒类.mdb"'设置data1的DatabaseName属性为d:
\菜品\酒类.mdb,即设置被访问的数据库的路径和文件名是"d:
\菜品\酒类.mdb"
Data1.RecordSource="select*from酒类" '设置data1的数据来源(RecordSource),即设置data1控件所要打开的数据库表是酒类表
Data1.Refresh'刷新data1
EndSub
PrivateSubCommand4_Click()
Data1.DatabaseName="d:
\菜品\汤类.mdb"'设置data1的DatabaseName属性为d:
\菜品\汤类.mdb,即设置被访问的数据库的路径和文件名是"d:
\菜品\汤类.mdb"
Data1.RecordSource="select*from汤类"'设置data1的数据来源(RecordSource),即设置data1控件所要打开的数据库表是汤类表
Data1.Refresh'刷新data1
EndSub
PrivateSubCommand5_Click()
Data1.DatabaseName="d:
\菜品\主食.mdb"'设置data1的DatabaseName属性为d:
\菜品\主食.mdb,即设置被访问的数据库的路径和文件名是"d:
\菜品\主食菜.mdb"
Data1.RecordSource="select*from主食"'设置data1的数据来源(RecordSource),即设置data1控件所要打开的数据库表是主食表
Data1.Refresh'刷新data1
EndSub
PrivateSubMSFlexGrid1_MouseDown(ButtonAsInteger,ShiftAsInteger,xAsSingle,yAsSingle)'鼠标按下事件,显示相应菜品信息
Text1.Text=MSFlexGrid1.TextMatrix(MSFlexGrid1.Row,2)'鼠标点击某一行时,利用TextMatrix属性把此行第二列的数据(菜名)提取出来并显示在text1中
Text2.Text=MSFlexGrid1.TextMatrix(MSFlexGrid1.Row,4)'鼠标点击某一行时,利用TextMatrix属性把此行第四列的数据(单价)提取出来并显示在text2中
Picture4.Picture=LoadPicture(MSFlexGrid1.TextMatrix(MSFlexGrid1.Row,6))'利用TextMatrix把数据库中的顾客点击的菜品的相应图片路径提取出来并作为picture4的图片路径,以此为基础进行菜品图片浏览
EndSub
PrivateSubCommand7_Click()'单击事件时,把所选菜品添加到当前点菜的list表中
Dima,bAsInteger
a=Len(Text1.Text)
b=Len(Text2.Text)+Len(Text3.Text)+1
List1.AddItemText1.Text&Space(18-a*2)&Text2.Text&"*"&Text3.Text&Space(18-b)&Val(Text2)*Val(Text3)'按照一定位置在list表中显示所点菜品的名字,单价,数量及总价。
DimcAsSingle
c=Val(Text2.Text)*Val(Text3.Text)'当前所选菜的总价
Text5.Text=c+Val(Text5.Text)'每点一道菜,总金额进行累加
EndSub
PrivateSubList1_Click()'单击列表框里的某一行时,显示相应信息
IfList1.ListIndex<>-1Then
x=List1.ListIndex
EndIf
Dime,fAsString
e=List1.List(x)'单击时选中一道菜
Text1.Text=Left(e,8)'利用left函数提取所选中菜的菜名
f=Right(e,5)'利用right函数提取所选中菜品的总价
g=Val(f)
EndSub
(说明:
在通用声明中定义了g为单精度型)
PrivateSubCommand8_Click()'选中list表中已点菜品进行删菜操作
IfList1.ListIndex<>-1Then
x=List1.ListIndex
List1.RemoveItemx
EndIf
Text5=Val(Text5)-g'相应总金额减少
EndSub
3、菜品管理登录界面
(1)界面
(2)使用介绍
在用户名和密码框里输入相应用户名和密码,点击登录按钮,信息正确则进入菜品管理界面,返回按钮用于返回主页面。
(3)用到的控件介绍
两个label,两个text框,两个命令按钮。
(4)代码
PrivateSubCommand1_Click()
DimmsgAsInteger
IfText1.Text="李经理"AndText2.Text="cpgl2010"Then'正确的用户名和密码
UnloadForm4
Form3.Show
Else
msg=MsgBox("用户名或密码错误,请重新输入",vbOKOnly+vbExclamation)'msgbox用于提示用户名或密码错误信息
Text1.Text=""
Text2.Text=""
EndIf
EndSub
4、主要技术介绍
点菜系统时以数据库为基础所设计的程序,在VB中使用外接access数据库程序,数据库是按照数据结构来组织、存储和管理数据的仓库,MicrosoftOfficeAccess是由微软发布的关联式数据库管理系统。
VB中使用data控件与数据库相连并通过其绑定控件与属性设置使数据库中数据可视化,并可以进行对数据库的数据进行修改,是点菜系统的关键技术。
五、存在的问题及不足
MSFlexGrid1中显示的信息字符串过长时有些部分看不到,不能把每位顾客的消费信息传给饭店管理者。
使用了多个数据库,信息分散,应该使用一个数据库,添加字段类别,调用时按类别调出不同菜品。
六.心得体会
经过四周的VB课程设计,我解决实际问题的能力提高了并学会了自主学习,自我提高和自我完善,用已学过VB知识及的自学数据库技术编写程序,。
程序设计期间,遇到问题自己思考并积极去解决,也向同学,老师和网络寻求帮助,在编程过程中,我们就遇到了连接数据库,提取数据等问题。
经过集思广益后,我们的收获很大,不仅解决了问题,还明白了互助的团队精神。
课程设计让我们学习与实践相结合,加深了了我们对书本知识的理解能力,学以致用。
锻炼了我的自主学习能力及创新能力。
在今后的学习中,还要继续加强自主学习与实践的锻炼。
最后,向帮助我的老师和同学表示衷心的感谢。
七、附录
参考文献:
1.《VisualBasic6.0编程案例精解》,张路平,电子工业出版社
2.《VisualBasic程序设计》王学军,中国铁道出版社
3.MSDN
4.《VisualBasic+Access数据库项目开发实践》,周国民,中国铁道出版社
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- vb课程设计报告 饭店点菜系统 vb 课程设计 报告 饭店 点菜 系统