vb課程設計--酒店點菜系統(tǒng)-在線瀏覽
2025-03-05 03:36本頁面
【正文】 hr(13), Chr(13), Chr(13), Chr(13) For j = 1 To i Print s(j).cm, s(j).cx, s(j).jg, s(j).yl, s(j).zk Next j End Sub Private Sub Command1_Click() Unload Form4 VB 語言課程設計 12 End Sub Private Sub cx_Click() For j = 1 To i 1 For k = i To j + 1 Step 1 If s(k).cx s(k 1).cx Then m = s(k).cm: s(k).cm = s(k 1).cm: s(k 1).cm = m m = s(k).cx: s(k).cx = s(k 1).cx: s(k 1).cx = m m = s(k).jg: s(k).jg = s(k 1).jg: s(k 1).jg = m m = s(k).yl: s(k).yl = s(k 1).yl: s(k 1).yl = m m = s(k).zk: s(k).zk = s(k 1).zk: s(k 1).zk = m End If Next k Next j Cls Print Chr(13), Chr(13), Chr(13), Chr(13), Chr(13) For j = 1 To i Print s(j).cm, s(j).cx, s(j).jg, s(j).yl, s(j).zk Next j End Sub Private Sub Form_Load() Show Print Print Chr(13), Chr(13), Chr(13), Chr(13), Chr(13) For j = 1 To i Print s(j).cm, s(j).cx, s(j).jg, s(j).yl, s(j).zk Next j End Sub VB 語言課程設計 13 Private Sub jg_Click() For j = 1 To i 1 For k = i To j + 1 Step 1 If s(k).jg s(k 1).jg Then m = s(k).cm: s(k).cm = s(k 1).cm: s(k 1).cm = m m = s(k).cx: s(k).cx = s(k 1).cx: s(k 1).cx = m m = s(k).jg: s(k).jg = s(k 1).jg: s(k 1).jg = m m = s(k).yl: s(k).yl = s(k 1).yl: s(k 1).yl = m m = s(k).zk: s(k).zk = s(k 1).zk: s(k 1).zk = m End If Next k Next j Cls Print Chr(13), Chr(13), Chr(13), Chr(13), Chr(13) For j = 1 To i Print s(j).cm, s(j).cx, s(j).jg, s(j).yl, s(j).zk Next j End Sub VB 語言課程設計 14 四 效果及存在問題： ： 程序開始運行，進入酒店菜單管理系統(tǒng)登錄主界面 ,輸入用戶名和密碼： 點擊“登錄”按鈕進入菜式管理系統(tǒng)： VB 語言課程設計 15 點擊“菜式管理” 菜單里的“新增”，根據(jù)提示進行菜式信息輸入： VB 語言課程設計 16 根據(jù)提示依次輸入新增的菜 .... 菜式輸入完后，點擊“菜式瀏覽”按鈕，進入“菜式瀏覽界面”瀏覽菜的所有信息： 點擊“按菜名瀏覽”菜單，所有菜的信息就按菜名重新排列： VB 語言課程設計 17 點擊“按菜價瀏覽”菜單，所有菜的信息就按菜價從低到高重新排列： VB 語言課程設計 18 點擊“按菜系瀏覽”菜單，所有菜的信息就按菜系重新排列： 點擊“返回點菜界面”按鈕，進入點菜系統(tǒng)： VB 語言課程設計 19 選中“菜單”列表框了的某個菜，再點擊“點菜 =”按鈕，所選中的菜就 到了“已點”列表框里了，并且對當前已點菜的價格進行計算： 若不想要“已點”列表框里的某個菜，選中這個菜，再點擊“ =退菜”按鈕，這個菜就從“已點”列表框里刪除掉了，同時這個菜的價錢也減去了： VB 語言課程設計 20 點擊“落單”按鈕，生成賬單： 點擊“返回管理界面”按鈕， 返回管理系統(tǒng)，若想刪除某個菜式， 點擊“菜式管理”里的“刪除”按 鈕，根據(jù)提示進行刪除： VB 語言課程設計 21 查看菜單里面“雞蛋鴨卷”這個菜的所有信息是否刪除： VB 語言課程設計 22 瀏覽菜單里和點菜系統(tǒng)里菜單里 ,“雞蛋鴨卷”的信息都以刪除。通過點擊按菜名、價格和菜系瀏覽菜單，對菜式分別進行瀏覽。點菜完成后進行落單，點擊返回管理界面按鈕返回管理系統(tǒng)界面。此界面有兩個列表框，分別放飯店里所有菜式以及已點的菜，再通過點菜按鈕將飯店菜式列表框里的菜點到已點列表框里，通過退菜按鈕對已點列表框里的菜進行刪除。三個按鈕可以分別進入到點菜系統(tǒng)、菜式瀏覽系統(tǒng)以及返回主界面。通過輸入用戶名和密碼登錄到菜品式管理界面 兩個按鈕可以分別進入菜式管理系統(tǒng)和退出系統(tǒng)。 本程序是酒店點菜系 統(tǒng)程序，可以更方便酒店管理行業(yè)。VB 語言課程設計 0 吉林工程技術師范學院 VB課程設計 設計題目： 酒店點菜系統(tǒng) 專業(yè)： 計算機 班級： C1152 學生姓名： 曹 睿 學號： 33 指導教師： 高汝儀 、 高嵐 2022 年 6 月 信息工程學院 VB 語言課程設計 1 目錄 目錄 ..................................................................... 1 摘要 .........................................................
環(huán)評公示相關推薦
鄂ICP備17016276號-1