肯德基外卖系统设计.docx

1、肯德基外卖系统设计沈阳航空航天大学北方科技学院课程设计说明书课程名称： VB课程设计 学 生 姓 名 赵 震 专 业 通 信 工 程 班 级 B841211班 学 号 B* 指 导 教 师 王 晓 斌 成 绩 沈阳航空航天大学北方科技学院课 程 设 计 任 务 书通信工程 专业 B84121135班 学生_赵震_一、课程设计题目：肯德基外卖系统设计二、课程设计工作自2011年7 月4日至2011年7 月15日止三、课程设计的内容及要求1强化面向对象程序设计和数据库应用的基础知识，比较熟练应用软件开发工具设计管理信息系统，掌握应用系统的分析、设计、编码和调试的基本方法和过程。2掌握数据库技术和应

2、用。3具体内容（1）创建数据库和表（2）系统主要功能 结合题目和实际需求，完成相应数据信息的编辑（添加、修改、删除）、浏览、查询、统计、打印预览和系统维护（密码设置）等功能。 （3）窗口设计系统封面设计、系统登录表单设计、数据编辑表单设计、数据浏览表单设计、数据查询表单设计、报表打印预览设计和密码设置。（4）系统主菜单设计（结合系统功能）。系统界面友好、设计合理、操作简单。4要求：课设结束后，上交软件系统和课程设计说明书。 课程设计说明书的主要内容：需求分析、总体设计、详细设计；参考书、课设总结。指导教师：*负责教师：学生签名：赵震第1章 系统分析需求分析外卖管理系统是为了提高工作效率，改进服

3、务质量，尽最大可能地满足客户需求，减少不必要的人力，物力，财力的浪费和流失，从而提高餐饮在未来的发展道路之上立于不败之地。第2章 总体设计2.1 系统主要功能肯德基外卖订餐系统是一款出色的软件，系统由登陆，订餐，送餐地址等模块组成，规划系统功能模块如下：登陆模块登录模块包括管理员登陆。订餐模块订餐模块主要包括选择食品，计算账单。送餐地址模块该模块主要用于填写订单送餐地址。2.2 系统功能结构图图1 肯德基外卖系统功能结构图第3章 系统设计3.1 设计目标本系统是根据网上订餐系统的实际需要出发的，系统通过对顾客的点餐需求可以实现以下功能。系统运行稳定，安全可靠。界面设计美观，人机交互界面友好。菜

4、单查看灵活便捷，下单轻松。操作员可以随时修改自己的口令。对用户输入的数据，系统进行严格的数据检验，尽可能排除人为的错误。3.2 开发及运行环境系统开发平台：Visual Basic 6.0运行平台：Windows xp/Windows 2000/Windows 983.3 数据库设计本系统采用Visual FoxPro 6.0设计数据库，本系统中包括如下数据表。下面分别给出数据表的结构。数据表结构（1）password(密码表)密码表主要用于在管理员的登录同时登陆后还可以对原有面貌进行修改，如表B.1所示。表B.1 密码表字段名数据类型长度描述用户名varchar20用户名密码varchar

5、c20密码第4章 主要功能模块设计4.1 主窗体设计主窗体是显示系统主要操作功能的面板，在系统主窗体的状态栏中，可以登录信息，菜单信息，送货地址信息，也可以实现同样的功能。系统主窗体的运行结果如图3所示。图2 系统主窗体的运行结果4.2顾客订餐信息顾客订餐信息是外卖系统重要的组成部分，是对订餐管理的主要系统，在系统里可以显示菜品名称，图片，已点餐单，结账明细等信息，确保实时有效的对所有顾客需求进行管理。在餐单浏览界面中，均为鼠标操作，方便快捷。另外还有结账计算，删除菜单选项，来方便其他操作。 图3 菜单信息浏览界面代码设计在窗体加载时，各个食品都对应的显示出来，代码如下：Private Sub

6、 Form_Load()Label17.Visible = FalseLabel18.Visible = FalseLabel19.Visible = FalseLabel20.Visible = FalseLabel21.Visible = FalseLabel22.Visible = FalseLabel23.Visible = FalseLabel24.Visible = FalseLabel25.Visible = FalseLabel26.Visible = FalseLabel27.Visible = FalseLabel28.Visible = FalseLabel8.Visib

7、le = FalseEnd SubPrivate Sub Label31_Click()a = Val(Label5.Caption)If a = 200 ThenLabel8.Visible = True Label8.Caption = 请留下送餐地址！ 点击返回主页面 ElseLabel8.Visible = True Label8.Caption = 请留下送餐地址！ 点击返回主页面End IfEnd SubPrivate Sub Image1_Click()List1.AddItem Label1.CaptionLabel5.Caption = Val(Label5.Caption)

8、 + Val(Label17.Caption)a = Val(Label5.Caption)End SubPrivate Sub Image10_Click()List1.AddItem Label14.CaptionLabel5.Caption = Val(Label5.Caption) + Val(Label26.Caption)a = Val(Label5.Caption)End SubPrivate Sub Image11_Click()List1.AddItem Label15.CaptionLabel5.Caption = Val(Label5.Caption) + Val(Lab

9、el27.Caption)a = Val(Label5.Caption)End SubPrivate Sub Image12_Click()List1.AddItem Label16.CaptionLabel5.Caption = Val(Label5.Caption) + Val(Label28.Caption)a = Val(Label5.Caption)End SubPrivate Sub Image2_Click()List1.AddItem Label2.CaptionLabel5.Caption = Val(Label5.Caption) + Val(Label18.Caption

10、)a = Val(Label5.Caption)End SubPrivate Sub Image3_Click()List1.AddItem Label3.CaptionLabel5.Caption = Val(Label5.Caption) + Val(Label19.Caption)a = Val(Label5.Caption)End SubPrivate Sub Image4_Click()List1.AddItem Label4.CaptionLabel5.Caption = Val(Label5.Caption) + Val(Label20.Caption)a = Val(Label

11、5.Caption)End SubPrivate Sub Image5_Click()List1.AddItem Label9.CaptionLabel5.Caption = Val(Label5.Caption) + Val(Label21.Caption)a = Val(Label5.Caption)End SubPrivate Sub Image6_Click()List1.AddItem Label10.CaptionLabel5.Caption = Val(Label5.Caption) + Val(Label22.Caption)a = Val(Label5.Caption)End

12、 SubPrivate Sub Image7_Click()List1.AddItem Label11.CaptionLabel5.Caption = Val(Label5.Caption) + Val(Label23.Caption)a = Val(Label5.Caption)End SubPrivate Sub Image8_Click()List1.AddItem Label12.CaptionLabel5.Caption = Val(Label5.Caption) + Val(Label24.Caption)a = Val(Label5.Caption)End SubPrivate

13、Sub Image9_Click()List1.AddItem Label13.CaptionLabel5.Caption = Val(Label5.Caption) + Val(Label25.Caption)a = Val(Label5.Caption)End Sub Private Sub Label7_Click()If List1.ListIndex = 0 Thenn = InStr(List1.Text, )l = Len(List1.Text)n = n + 1Label5.Caption = Val(Label5.Caption) - Val(Mid(List1.Text,

14、n, l - n)List1.RemoveItem List1.ListIndexEnd Ifa = Val(Label5.Caption)End SubPrivate Sub Label8_Click()Form1.ShowForm2.HideEnd SubPrivate Sub 早餐_Click()Label1.Caption = 牛肉蛋花粥油条餐 35元Image1.Picture = LoadPicture(App.Path & beijing早餐牛肉蛋花粥油条餐.jpg)Label17.Caption = 35Label2.Caption = 培根芝士蛋堡红茶餐 30元Image2.

15、Picture = LoadPicture(App.Path & beijing早餐培根芝士蛋堡红茶餐.jpg)Label18.Caption = 30Label3.Caption = 培根芝士蛋堡咖啡餐 30元Image3.Picture = LoadPicture(App.Path & beijing早餐培根芝士蛋堡咖啡餐.jpg)Label19.Caption = 30Label4.Caption = 培根芝士蛋堡热豆浆餐 25元Image4.Picture = LoadPicture(App.Path & beijing早餐培根芝士蛋堡热豆浆餐.jpg)Label20.Caption

16、= 25Label9.Caption = 皮蛋瘦肉粥油条餐 25元Image5.Picture = LoadPicture(App.Path & beijing早餐皮蛋瘦肉粥油条餐.jpg)Label21.Caption = 25Label10.Caption = 田园脆鸡堡红茶餐 20元Image6.Picture = LoadPicture(App.Path & beijing早餐田园脆鸡堡红茶餐.jpg)Label22.Caption = 20Label11.Caption = 田园脆鸡堡咖啡餐 20元Image7.Picture = LoadPicture(App.Path & bei

17、jing早餐田园脆鸡堡咖啡餐.jpg)Label23.Caption = 20Label12.Caption = 田园脆鸡堡热豆浆餐 20元Image8.Picture = LoadPicture(App.Path & beijing早餐田园脆鸡堡热豆浆餐.jpg)Label24.Caption = 20Label13.Caption = 田园脆鸡蛋堡咖啡餐 15元Image9.Picture = LoadPicture(App.Path & beijing早餐田园脆鸡蛋堡咖啡餐.jpg)Label25.Caption = 15Label14.Caption = 田园脆鸡蛋堡热浆餐 15元Im

18、age10.Picture = LoadPicture(App.Path & beijing早餐田园脆鸡蛋堡热浆餐.jpg)Label26.Caption = 15Label15.Caption = 香菇鸡肉粥油条餐 15元Image11.Picture = LoadPicture(App.Path & beijing早餐香菇鸡肉粥油条餐.jpg)Label27.Caption = 15Label16.Caption = 香糯薏米粥油条餐 15元Image12.Picture = LoadPicture(App.Path & beijing早餐香糯薏米粥油条餐.jpg)Label28.Capt

19、ion = 15Image12.Visible = TrueImage11.Visible = TrueImage10.Visible = TrueImage9.Visible = TrueImage8.Visible = TrueEnd Sub Private Sub 午餐_Click()Label1.Caption = 川辣嫩牛五方餐 45元Image1.Picture = LoadPicture(App.Path & beijing午餐川辣嫩牛五方餐.jpg)Label17.Caption = 45Label2.Caption = 劲脆鸡腿堡餐 40元Image2.Picture = L

20、oadPicture(App.Path & beijing午餐劲脆鸡腿堡餐.jpg)Label18.Caption = 40Label3.Caption = 快乐儿童餐A 38元Image3.Picture = LoadPicture(App.Path & beijing午餐快乐儿童餐A.jpg)Label19.Caption = 38Label4.Caption = 快乐儿童餐B 35元Image4.Picture = LoadPicture(App.Path & beijing午餐快乐儿童餐B.jpg)Label20.Caption = 35Label9.Caption = 快乐儿童餐C

21、35元Image5.Picture = LoadPicture(App.Path & beijing午餐快乐儿童餐C.jpg)Label21.Caption = 35Label10.Caption = 快乐儿童餐D 33元Image6.Picture = LoadPicture(App.Path & beijing午餐快乐儿童餐D.jpg)Label22.Caption = 33Label11.Caption = 墨西哥鸡肉卷餐 30元Image7.Picture = LoadPicture(App.Path & beijing午餐墨西哥鸡肉卷餐.jpg)Label23.Caption = 3

22、0Label12.Caption = 老北京鸡肉卷餐 28元Image8.Picture = LoadPicture(App.Path & beijing午餐老北京鸡肉卷餐.jpg)Label24.Caption = 28Label13.Caption = 培根蘑菇鸡肉饭特价 25元Image9.Picture = LoadPicture(App.Path & beijing午餐培根蘑菇鸡肉饭特价.jpg)Label25.Caption = 25Label14.Caption = 吮指原味鸡二块餐 20元Image10.Picture = LoadPicture(App.Path & beij

23、ing午餐吮指原味鸡二块餐.jpg)Label26.Caption = 20Label15.Caption = 香辣鸡翅餐 15元Image11.Picture = LoadPicture(App.Path & beijing午餐香辣鸡翅餐.jpg)Label27.Caption = 15Label16.Caption = 新奥尔良烤翅餐 8元Image12.Picture = LoadPicture(App.Path & beijing午餐新奥尔良烤翅餐.jpg)Label28.Caption = 8Image12.Visible = TrueImage11.Visible = TrueIm

24、age10.Visible = TrueImage9.Visible = TrueImage8.Visible = TrueEnd SubPrivate Sub 饮品_Click()Label1.Caption = 1.25升装百事可乐 5元Image1.Picture = LoadPicture(App.Path & beijing饮品1.25升装百事可乐.jpg)Label17.Caption = 5Label2.Caption = 冰天玛瑙石榴汁 5元Image2.Picture = LoadPicture(App.Path & beijing饮品冰天玛瑙石榴汁.jpg)Label18.

25、Caption = 5Label3.Caption = 醇豆浆甜(冰) 5元Image3.Picture = LoadPicture(App.Path & beijing饮品醇豆浆甜(冰).jpg)Label19.Caption = 5Label4.Caption = 九珍 8元Image4.Picture = LoadPicture(App.Path & beijing饮品九珍.jpg)Label20.Caption = 8Label9.Caption = 柠乐 8元Image5.Picture = LoadPicture(App.Path & beijing饮品柠乐.jpg)Label21

26、.Caption = 8Label10.Caption = 雀巢冰爽茶 8元Image6.Picture = LoadPicture(App.Path & beijing饮品雀巢冰爽茶.jpg)Label22.Caption = 8Label11.Caption = 炭烤珍珠奶茶(冰) 12元Image7.Picture = LoadPicture(App.Path & beijing饮品炭烤珍珠奶茶(冰).jpg)Label23.Caption = 12Label12.Caption = 香柚蜂蜜茶 15元Image8.Picture = LoadPicture(App.Path & bei

27、jing饮品香柚蜂蜜茶.jpg)Label24.Caption = 15Label13.Caption = Image9.Picture = LoadPicture(App.Path & beijing饮品透明.jpg)Label25.Caption = Label14.Caption = Image10.Picture = LoadPicture(App.Path & beijing饮品透明.jpg)Label26.Caption = Label15.Caption = Image11.Picture = LoadPicture(App.Path & beijing饮品透明.jpg)Labe

28、l27.Caption = Label16.Caption = Image12.Picture = LoadPicture(App.Path & beijing饮品透明.jpg)Label28.Caption = Image12.Visible = FalseImage11.Visible = FalseImage10.Visible = FalseImage9.Visible = FalseImage8.Visible = TrueEnd SubPrivate Sub 夜宵_Click()Label1.Caption = 安心油条 188元Image1.Picture = LoadPictu

29、re(App.Path & beijing夜宵安心油条.jpg)Label17.Caption = 188Label2.Caption = 芙蓉鲜蔬汤 158元Image2.Picture = LoadPicture(App.Path & beijing夜宵芙蓉鲜蔬汤.jpg)Label18.Caption = 158Label3.Caption = 劲脆鸡腿堡 120元Image3.Picture = LoadPicture(App.Path & beijing夜宵劲脆鸡腿堡.jpg)Label19.Caption = 120Label4.Caption = 牛肉粥田园堡烤翅餐 88元Image4.Picture = LoadPicture(App.Path & beijing夜宵牛肉粥田园堡烤翅餐.jpg)Label20.Caption = 88Label9.Caption = 培根芝堡辣翅热浆餐 88元Image5.Picture = LoadPicture(App.Path & beijing夜宵培根芝堡辣翅热浆餐.jpg)Label21.Captio