《个人模块功能简介》由会员分享，可在线阅读，更多相关《个人模块功能简介（9页珍藏版）》请在金锄头文库上搜索。
1、 中北 酒 店网 上菜 单说明书 中北酒店网上菜单系统1功能简介本系统主要用于一些大、中型酒店用于在客房点餐游览以及游客在网上通过本菜单可以了解本酒店的饮食特色，以方便游客对本酒店有一些了解，以至于游客对本酒店的选择性比较高。通过 VB 程序可以实现各种菜的视图、价格以及属于那种特色的菜，方便顾客选择适合自己口味的菜，游客通过此系统对本酒店的特色菜以及饮食种类有更深入的了解。本系统有 4 个界面，第一个是登陆和注册界面，第二个界面是注册账户和密码的界面，中有通过此界面注册才可以通过第一个界面登陆，第三个界面是进入酒店菜单的入口，第四个界面是菜单的种类以及各种菜的视图及价格，而且在本酒店可以通过
2、次界面随时点餐，方便现代人的简洁、方便模式。2流程图登录及注册登陆鲁菜 东北菜 酒水川菜注册湘菜进入菜单的入口点菜提交菜单退出三、目录1登陆及注册2注册3菜单入口4菜单1）川菜2）鲁菜3）东北菜4）湘菜5）酒水6）结账及退出四、个人模块功能简介该模块为顾客点菜模块，能显示菜品种的种类以及价格供顾客选择，顾客只要点击对应的菜名即选中，方便明了。本模块运用了 5 个label 来实现各菜及酒水式样的链接功能，用一个 list1 控件来实现菜单价格的显示。1、list1 控件菜单Private Sub Label7_Click()If List1.ListIndex = 0 Thenn = InSt
3、r(List1.Text, ) 选中的菜或酒水的价格l = Len(List1.Text)n = n + 1Label5.Caption = Val(Label5.Caption) - Val(Mid(List1.Text, n, l - n)List1.RemoveItem List1.ListIndexEnd Ifa = Val(Label5.Caption) 各菜及酒水价格总和2、川菜 label 及对应代码说明Private Sub 川菜_Click()Label1.Caption = 冒血旺 35 元Image1.Picture = LoadPicture(App.Path & be
4、ijing川菜 冒血旺.jpg)Label17.Caption = 35Label2.Caption = 夫妻肺片 30 元Image2.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
5、(App.Path & beijing川菜 珍珠丸子.jpg)Label20.Caption = 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 =
6、LoadPicture(App.Path & beijing川菜 酸辣豆花.jpg)Label23.Caption = 20 川菜的菜名、价格及对应的图片3、鲁菜 abel 及对应代码说明Private Sub 鲁菜_Click()Label1.Caption = 糖醋鱼条 35 元Image1.Picture = LoadPicture(App.Path & beijing鲁菜 糖醋鱼条.jpg)Label17.Caption = 35Label2.Caption = 双冬辣鸡球 30 元Image2.Picture = LoadPicture(App.Path & beijing鲁菜 双冬
7、辣鸡球.jpg)Label18.Caption = 30Label3.Caption = 四喜丸子 30 元Image3.Picture = LoadPicture(App.Path & beijing鲁菜 四喜丸子.jpg)Label19.Caption = 30Label4.Caption = 糖醋黄河鲤鱼 30 元Image4.Picture = LoadPicture(App.Path & beijing鲁菜 糖醋黄河鲤鱼.jpg)Label20.Caption = 30Label9.Caption = 牡丹蝎托 30 元Image5.Picture = LoadPicture(App
8、.Path & beijing鲁菜 牡丹蝎托.jpg)Label21.Caption = 30Label10.Caption = 虾脑烧鱼肚 25 元Image6.Picture = LoadPicture(App.Path & beijing鲁菜 虾脑烧鱼肚.jpg)Label22.Caption = 25Label11.Caption = 糖醋鱼条 25 元Image7.Picture = LoadPicture(App.Path & beijing鲁菜 糖醋鱼条.jpg)Label23.Caption = 25Label12.Caption = 玛瑙银杏 20 元Image8.Pictu
9、re = LoadPicture(App.Path & beijing鲁菜 玛瑙银杏.jpg)Label24.Caption = 20鲁菜的菜名、价格及对应的图片4、东北菜 abel 及对应代码说明Private Sub 东北菜_Click()Label1.Caption = 小鸡炖蘑菇 45 元Image1.Picture = LoadPicture(App.Path & beijing东北菜 小鸡炖蘑菇.jpg)Label17.Caption = 45Label2.Caption = 酱大棒骨 40 元Image2.Picture = LoadPicture(App.Path & beij
10、ing东北菜 酱大棒骨.jpg)Label18.Caption = 40Label3.Caption = 家传砂锅鸡 38 元Image3.Picture = LoadPicture(App.Path & beijing东北菜 家传砂锅鸡.jpg)Label19.Caption = 38Label4.Caption = 齐齐哈尔碳式烧烤 35 元Image4.Picture = LoadPicture(App.Path & beijing东北菜 齐齐哈尔碳式烧烤.jpg)Label20.Caption = 35Label9.Caption = 手抓羊排 35 元Image5.Picture =
11、 LoadPicture(App.Path & beijing东北菜 手抓羊排.jpg)Label21.Caption = 35Label10.Caption = 松仁烧鹿筋 33 元Image6.Picture = LoadPicture(App.Path & beijing东北菜 松仁烧鹿筋.jpg)Label22.Caption = 33Label11.Caption = 猪肉炖粉条 30 元Image7.Picture = LoadPicture(App.Path & beijing东北菜 猪肉炖粉条.jpg)Label23.Caption = 30Label12.Caption =
12、锅包肉 28 元Image8.Picture = LoadPicture(App.Path & beijing东北菜 锅包肉.jpg)Label24.Caption = 28东北菜的菜名、价格及对应的图片5、湘菜 abel 及对应代码说明Private Sub 湘菜_Click()Label1.Caption = 水芹菜水煮鳝鱼 55 元Image1.Picture = LoadPicture(App.Path & beijing湘菜 水芹菜水煮鳝鱼.jpg)Label17.Caption = 55Label2.Caption = 腊肉蒸黄鳝 50 元Image2.Picture = Load
13、Picture(App.Path & beijing湘菜 腊肉蒸黄鳝.jpg)Label18.Caption = 50Label3.Caption = 砂锅牛蹄 48 元Image3.Picture = LoadPicture(App.Path & beijing湘菜 砂锅牛蹄.jpg)Label19.Caption = 48Label4.Caption = 辣八豆鱼头 40 元Image4.Picture = LoadPicture(App.Path & beijing湘菜 辣八豆鱼头.jpg)Label20.Caption = 40Label9.Caption = 湘西土匪鸭 38 元Im
14、age5.Picture = LoadPicture(App.Path & beijing湘菜 湘西土匪鸭.jpg)Label21.Caption = 38Label10.Caption = 韭菜炒小河虾 20 元Image6.Picture = LoadPicture(App.Path & beijing湘菜 韭菜炒小河虾.jpg)Label22.Caption = 20Label11.Caption = 爆炒腰花 20 元Image7.Picture = LoadPicture(App.Path & beijing湘菜 爆炒腰花.jpg)Label23.Caption = 20湘菜的菜名、价格及对应的图片6、酒水 abel 及对应代码说明Label1.Caption = 百事可乐 5 元Image1.Picture = LoadPicture(App.Path & beijing酒水 百事可乐.jpg)Label17.Caption = 5Label2.Caption = 可口可乐 5 元Image2.Picture = LoadPicture(App.Path & beijing酒水 可口可乐.jpg)La
