VB課程設(shè)計(jì)報(bào)告書(飯店點(diǎn)菜系統(tǒng)).doc

單單 位位 機(jī)械工程機(jī)械工程 學(xué)院學(xué)院 專專 業(yè)業(yè) 機(jī)械設(shè)計(jì)制造及其自動(dòng)化機(jī)械設(shè)計(jì)制造及其自動(dòng)化 學(xué)學(xué) 號號 學(xué)生姓名學(xué)生姓名 指導(dǎo)教師指導(dǎo)教師 完成日期完成日期 20112011 年年 0909 月月 0101 日日 Visual Basic 課程設(shè)計(jì) 飯店點(diǎn)菜系統(tǒng) 摘 要 點(diǎn)菜系統(tǒng)是一種全新的 集無線 網(wǎng)絡(luò) 嵌入式 人工智能等技術(shù)于一體 的無線手持終端 適用于餐飲 酒店 咖啡廳等場所的餐臺(tái)管理 點(diǎn)菜錄單 結(jié)算 信息反饋與傳遞 結(jié)合傳統(tǒng)的點(diǎn)菜管理系統(tǒng) 為餐飲 酒店 咖啡廳等 行業(yè)的經(jīng)營管理提供了一整套高效 穩(wěn)定可靠 先進(jìn)的解決方案 改變了餐飲 等行業(yè)的手工經(jīng)營方式 提高了服務(wù)效率和顧客滿意程度 提升了店面形象 最終提升了企業(yè)競爭力與經(jīng)營效益 本設(shè)計(jì)報(bào)告針對飯店餐飲管理的特點(diǎn) 進(jìn) 行針對性 合理性 可操作性等方面的研究與設(shè)計(jì) 可以實(shí)現(xiàn)登錄主頁 瀏覽 菜單 點(diǎn)菜退菜 留言 抽獎(jiǎng)等功能 具有操作簡單 人性化 可信度高的特 點(diǎn) 是一款不可多得的飯店點(diǎn)菜系統(tǒng) 關(guān)鍵詞 飯店點(diǎn)菜系統(tǒng) 瀏覽 點(diǎn)菜 留言板 抽獎(jiǎng) 目錄 1 1 選題的意義選題的意義 4 2 2 系統(tǒng)功能需求分析 系統(tǒng)功能需求分析 5 2 1 系統(tǒng)概述 5 2 2 系統(tǒng)的構(gòu)成 5 2 3 各模塊的功能 5 2 4 系統(tǒng)的運(yùn)行環(huán)境 6 3 3 系統(tǒng)設(shè)計(jì) 系統(tǒng)設(shè)計(jì) 7 3 1 總體結(jié)構(gòu)設(shè)計(jì) 7 3 2 數(shù)據(jù)庫設(shè)計(jì) 7 4 4 系統(tǒng)實(shí)現(xiàn) 系統(tǒng)實(shí)現(xiàn) 9 登陸模塊的設(shè)計(jì)與實(shí)現(xiàn) 9 5 5 總結(jié) 總結(jié) 17 5 1 總結(jié) 17 5 2 存在的主要問題 17 參考文獻(xiàn)參考文獻(xiàn) 18 第 1 章 選題的意義 課程設(shè)計(jì)是教學(xué)中的重要組成部分 是培養(yǎng)學(xué)生綜合運(yùn)用所學(xué)的基礎(chǔ)理論 基本知識和基本技能 分析解決實(shí)際問題能力的一個(gè)至關(guān)重要的環(huán)節(jié) 與其它 教學(xué)環(huán)節(jié)彼此配合 相輔相成 在某種程度上是其他各個(gè)教學(xué)的的繼續(xù) 深化 和檢驗(yàn) 它的實(shí)踐性和綜合性是其它環(huán)節(jié)所不能代替的 本課程設(shè)計(jì)是學(xué)生學(xué) 完相關(guān)課程后所必需的綜合訓(xùn)練 在不同程度上提高各種能力 如調(diào)查研究 查閱文獻(xiàn)和收集資料的能力 理論分析 計(jì)劃 設(shè)計(jì)和繪圖的能力 上機(jī)調(diào)試 組織工作的能力 技術(shù)總結(jié) 撰寫流程 操作方法的能力等 通過該題目的設(shè)計(jì) 可以使我掌握軟件開發(fā)過程中的問題分析 系統(tǒng)設(shè)計(jì) 程序編碼 測試等基本方法和技能 掌握利用 VB 開發(fā)數(shù)據(jù)庫系統(tǒng)的方法 第 2 章 系統(tǒng)功能需求分析 2 1系統(tǒng)概述 本系統(tǒng)能分類瀏覽飯店的所有菜式及價(jià)格 進(jìn)行點(diǎn)菜操作后能預(yù)覽點(diǎn)菜結(jié) 果 并可對其進(jìn)一步修改 記錄顧客的意見和建議 并具有瀏覽功能 當(dāng)顧客 的消費(fèi)達(dá)到指定金額時(shí) 可以分檔抽取小獎(jiǎng)品 本系統(tǒng)界面簡潔 管理流暢 易操作 人性化設(shè)計(jì) 效率高 能為顧客提 供很大的方便 在未來的餐飲市場上必將擁有廣闊的前景 2 2系統(tǒng)概述 本系統(tǒng)主要包括登錄界面 主菜單界面 點(diǎn)菜界面 留言板界面 抽獎(jiǎng)界 面五個(gè)部分 2 3各模塊的功能 一 登陸界面 包括歡迎語 飯店名稱 飯店外貌 進(jìn)入按鈕等內(nèi)容 可 以使顧客對該飯店有一個(gè)整體直觀的了解 點(diǎn)擊進(jìn)入按鈕 即可進(jìn)入主菜單界 面 二 主菜單界面 主菜單界面涵蓋了本飯店所有服務(wù)項(xiàng)目 點(diǎn)擊相應(yīng)按鈕 即可進(jìn)入相應(yīng)服 務(wù)界面 三 點(diǎn)菜界面 點(diǎn)菜界面列舉了本飯店幾乎所有的知名菜樣 各菜系分類清晰 品樣繁多 價(jià)格直觀合理 消費(fèi)金額結(jié)算明細(xì) 顧客可以依據(jù)個(gè)人的口味及理財(cái)觀念選擇 滿意的菜式 點(diǎn)擊相應(yīng)按鈕即可進(jìn)行點(diǎn)菜 如果不滿意也可以進(jìn)行退菜 點(diǎn)菜 完畢后可以查看當(dāng)前消費(fèi) 如想退出該界面進(jìn)入上一級 請點(diǎn)擊返回按鈕 四 留言板界面 本飯店特設(shè)留言板這一模塊 可以將顧客的意見及時(shí)反饋 以便及時(shí)做出 調(diào)整 以符合更多數(shù)人的口味 盡最大可能讓顧客滿意 五 抽獎(jiǎng)界面 顧客在點(diǎn)菜界面點(diǎn)菜完畢后 可以查看當(dāng)前消費(fèi)是否達(dá)到抽獎(jiǎng)標(biāo)準(zhǔn) 如果 符合即可點(diǎn)擊抽獎(jiǎng)按鈕進(jìn)入本屆面進(jìn)行抽獎(jiǎng) 本抽獎(jiǎng)系統(tǒng)絕對公平可信 請顧 客放心 2 4系統(tǒng)的運(yùn)行環(huán)境 操作系統(tǒng) Windows XP 7 2000 等微軟旗下操作系統(tǒng) 運(yùn)行系統(tǒng) visual basic 6 0 其他環(huán)境如硬盤 內(nèi)存 顯卡 處理器等不作高要求 第 3 章 系統(tǒng)設(shè)計(jì) 3 1總體結(jié)構(gòu)設(shè)計(jì) 登錄界面 主菜單界面 登錄界面 留言板界面 抽獎(jiǎng)界面 3 2數(shù)據(jù)庫設(shè)計(jì) 單擊 VB 開發(fā)環(huán)境中的 外接程序 菜單 選擇 可視化管理器 啟動(dòng) VisData 進(jìn)而建立數(shù)據(jù)庫 數(shù)據(jù)庫名稱為 菜單數(shù)據(jù)庫 其下分為酒水 湯類 主食 葷菜 素菜五個(gè)大類 每個(gè)大類下分為 菜 名稱 價(jià)格兩個(gè)字段 名 稱下包含多種菜式 價(jià)格下顯示相對應(yīng)的菜的價(jià)錢 利用數(shù)據(jù)庫可以實(shí)現(xiàn)對菜 式及相對應(yīng)價(jià)格的添加 查詢 瀏覽等功能 數(shù)據(jù)庫建立完成后 利用 Data 控 件實(shí)現(xiàn)對數(shù)據(jù)庫的訪問 利用窗體上相應(yīng)標(biāo)簽后的文本框?qū)崿F(xiàn)對名稱 價(jià)格的 鏈接 即可實(shí)現(xiàn)窗體與數(shù)據(jù)庫的聯(lián)系 第 4 章 系統(tǒng)實(shí)現(xiàn) 4 1登錄界面及其代碼 Private Sub Command1 Click 登錄 Hide 酒店主頁 Show End Sub Private Sub Command2 Click End End Sub 4 2酒店主頁界面及其代碼 Private Sub Command1 Click 酒店主頁 Hide 點(diǎn)菜 Show End Sub Private Sub Command2 Click 酒店主頁 Hide 留言板 Show End Sub Private Sub Command3 Click 酒店主頁 Hide 登錄 Show End Sub 4 3點(diǎn)菜界面及其代碼 Private Sub Command1 Click Data1 RecordSource select from 酒水 Data1 Refresh Image1 Picture LoadPicture App Path Text5 Text End Sub Private Sub Command10 Click 點(diǎn)菜 Hide 留言板 Show End Sub Private Sub Command11 Click If Val Text4 Text 300 Then Command9 Enabled True End If End Sub Private Sub Command12 Click Data1 Recordset MovePrevious If Data1 Recordset BOF Then Data1 Recordset MoveFirst End If Image1 Picture LoadPicture App Path Text5 Text End Sub Private Sub Command13 Click Data1 Recordset MoveNext If Data1 Recordset EOF Then Data1 Recordset MoveLast End If Image1 Picture LoadPicture App Path Text5 Text End Sub Private Sub Command2 Click Data1 RecordSource select from 湯類 Data1 Refresh Image1 Picture LoadPicture App Path Text5 Text End Sub Private Sub Command3 Click Data1 RecordSource select from 主食 Data1 Refresh Image1 Picture LoadPicture App Path Text5 Text End Sub Private Sub Command4 Click Data1 RecordSource select from 葷菜 Data1 Refresh Image1 Picture LoadPicture App Path Text5 Text End Sub Private Sub Command5 Click Data1 RecordSource select from 素菜 Data1 Refresh Image1 Picture LoadPicture App Path Text5 Text End Sub Private Sub Command6 Click Dim a As Long List1 AddItem Text1 Text Text2 Text X Text3 Text Val Text2 Text Val Text3 Text a Val Text2 Text Val Text3 Text Text4 Text a Val Text4 Text End Sub Private Sub Command7 Click If List1 ListIndex 1 Then x List1 ListIndex List1 RemoveItem x End If Text4 Text Val Text4 Text e End Sub Private Sub Command8 Click 點(diǎn)菜 Hide 酒店主頁 Show End Sub Private Sub Command9 Click 抽獎(jiǎng) Show 點(diǎn)菜 Hide End Sub Private Sub Form Load Command9 Enabled False Text1 Text Text2 Text Text3 Text List1 Text End Sub Private Sub List1 Click If List1 ListIndex 1 Then x List1 ListIndex End If Dim c d As String e As Single c List1 List x Text1 Text Left c 8 d Right c 5 e Val d End Sub 4 4留言板界面及其代碼 Private Sub Command1 Click Dim a As String a Text2 Text Text1 Text Now List1 AddItem a End Sub Private Sub Command2 Click List1 Clear End Sub Private Sub Command3 Click Text1 Text Text2 Text End Sub Private Sub Command4 Click 點(diǎn)菜 Show 留言板 Hide End Sub 4 5抽獎(jiǎng)界面及其代碼 Dim a As Integer b As Integer c As Integer d As Integer Private Sub Command1 Click Timer1 Enabled True Command1 Enabled False End Sub Private Sub Command2 Click Command2 Enabled False Timer1 Enabled False If a b And b c And c d Then Label9 Caption 恭喜您獲得一等獎(jiǎng) ElseIf a b And b c And c d Or a c And c d And a b Or b c And c d And a b Then Label9 Caption 恭喜您獲得二等獎(jiǎng) ElseIf a b And b c And b d Or a c And a b And a d Or a d And a b And a c Or b c And b a And b d Or b d And b a And b c Or c d And c a And c b Then Label9 Caption 恭喜您獲得三等獎(jiǎng) Else Label9 Caption 恭喜您獲得四等獎(jiǎng) End If End Sub Private Sub Command3 Click 抽獎(jiǎng) Hide 點(diǎn)菜 Show End Sub Private Sub Form Load Timer1 Enabled False Timer1 Interval 100 End Sub Private Sub Timer1 Timer Label1 Caption Round Rnd 9 Label2 Caption Round Rnd 9 Label3 Caption Round Rnd 9 Label4 Caption Round Rnd 9 a Label1 Caption b Label2 Caption c Label3 Caption d Label4 Caption End Sub 第 5 章 總結(jié) 5 1總結(jié) 實(shí)踐是檢驗(yàn)真理的唯一標(biāo)準(zhǔn) 經(jīng)過此次短暫而充實(shí)的 vb 課程設(shè)計(jì)實(shí)習(xí) 體驗(yàn) 我切身感受到了理論與實(shí)踐之間的差距 深刻體會(huì)到了親手實(shí)踐的重要 性 以往都只是坐在課堂里聽老師講一些教材既有的知識 所學(xué)到的東西也僅 僅只停留在理