【文章內(nèi)容簡(jiǎn)介】 失 敗 圖 31 點(diǎn)菜系統(tǒng)功能圖 主要模塊的流程圖 菜品類別設(shè)置 新 類 別類 別 名 稱 是 否為 空 、 重 復(fù)新 的 類 別 信 息添 加 完 成取 消否是刪 除修 改類 別 名 稱 是 否為 空 、 重 復(fù)此 類 別 是 否 有商 品 信 息菜 品 類別 設(shè) 置是 是類 別 信 息 刪 除完 成類 別 信 息 修 改完 成否否 圖 32 菜品類別設(shè)置流程圖 點(diǎn)菜管理系統(tǒng)的開發(fā)與實(shí)現(xiàn) 10 菜品信息設(shè)置 菜 品 信息 設(shè) 置新 菜 品菜 品 信 息 添加 完 成菜 品 名 稱 或 新類 別 是 否 為 空刪 除修 改菜 品 名 稱 或 新類 別 是 否 為 空菜 品 信 息 添加 完 成菜 品 信 息 添加 完 成結(jié) 束否是 是否 圖 33 菜品信息維護(hù)流程圖 客人點(diǎn)餐 客 人 消費(fèi) 管 理新 單取 消結(jié) 束查 看雙 擊 某 一 記 錄可 以 結(jié) 賬新 的 客 人 登記客 人 點(diǎn) 完 菜將 信 息 保 存查 看 客 人 已經(jīng) 結(jié) 賬 單 據(jù)信 息查 看 客 人 正在 消 費(fèi) 的 賬單 信 息查 看 廚 房 的做 菜 信 息 圖 33 客人點(diǎn)餐流程圖 點(diǎn)菜管理系統(tǒng)的開發(fā)與實(shí)現(xiàn) 11 消費(fèi)總結(jié) 消 費(fèi) 總結(jié)查 詢?nèi)?消輸 入 查 詢 條 件顯 示 查 詢 結(jié) 果結(jié) 束是否詳 細(xì) 信 息選 擇 某 一 記 錄顯 示 該 記 錄 詳細(xì) 信 息 圖 34 消費(fèi)總結(jié)流程圖 E－ R 圖 人 員部 門菜品信息菜 品 類 別點(diǎn) 菜菜 單處 理調(diào)用1NNN1擁 有擁 有1N1N1 圖 35 ER圖 點(diǎn)菜管理系統(tǒng)的開發(fā)與實(shí)現(xiàn) 12 數(shù)據(jù)字典 （ 1）數(shù)據(jù)庫(kù)名稱為 （ 2）數(shù)據(jù)庫(kù)中的表格設(shè)置 表 31 部門設(shè)置 部門設(shè)置（ bm） 序號(hào) 字段名稱 類型 長(zhǎng)度 索引 說(shuō)明 1 部門代碼 (bmid) String 6 無(wú)重復(fù) B001 2 部門名稱 (bmmc) String 20 表 32 人員管理 人員信息（ ry） 序號(hào) 字段名稱 類型 長(zhǎng)度 索引 說(shuō)明 1 人員代碼 (ryid) String 6 無(wú)重復(fù) R001 2 人員名稱 (rymc) String 20 3 性別 (xb) String 2 4 年齡 (nl) Integer 5 聯(lián)系方式 (lxfs) String 20 6 家庭住址 (jtzz) String 50 7 部門代碼 (bmid) String 6 關(guān)聯(lián)部門設(shè)置表 表 33 菜系類別 菜系類別（ splb） 序號(hào) 字段名稱 類型 長(zhǎng)度 索引 說(shuō)明 1 類別代碼 (lbid) String 6 無(wú)重復(fù) L001 2 類別名稱 (lbmc) String 20 表 34 菜系信 息 菜系信息（ spxx） 序號(hào) 字段名稱 類型 長(zhǎng)度 索引 說(shuō)明 1 商品代碼 (spid) String 6 無(wú)重復(fù) S001 2 商品名稱 (spmc) String 20 3 類別代碼 (lbid) String 6 關(guān)聯(lián)商品類別 4 商品規(guī)格 (spgg) String 10 包 ,箱等 5 計(jì)量單位 (jldw) String 10 千克、個(gè)等 6 單價(jià) (dj) Single(float) 7 備注 (bz) Sting 255 存當(dāng)前商品的一些連帶信息 表 35 點(diǎn)餐 點(diǎn)餐（ dc） 序號(hào) 字段名稱 類型 長(zhǎng)度 索引 說(shuō)明 1 業(yè)務(wù)代碼 (ywid) String 20 無(wú)重復(fù) Y+Date+Time(hh)+001 2 客戶名稱 (khmc) String 50 存儲(chǔ)消費(fèi)者或桌位 3 消費(fèi)日期 (xfrq) Date 存儲(chǔ)消費(fèi)日期 (Date+time(hh)) 4 總消費(fèi)額 (zxfe) Single 5 操作員代碼 (ryid) String 6 關(guān)聯(lián)人員信息 6 交費(fèi)金額 (jfje) Single 存儲(chǔ)交費(fèi)金額 (作為是否交費(fèi) 點(diǎn)菜管理系統(tǒng)的開發(fā)與實(shí)現(xiàn) 13 的標(biāo)志 ) 表 36 點(diǎn)餐明細(xì) 點(diǎn)餐明細(xì)（ dcmx） 序號(hào) 字段名稱 類型 長(zhǎng)度 索引 說(shuō)明 1 業(yè)務(wù)代碼 (ywid) String 6 無(wú)重復(fù) 關(guān)聯(lián)點(diǎn)餐，存儲(chǔ)格式相同 2 商品代碼 (spid) String 6 關(guān)聯(lián)商品信息 3 數(shù)量 (sl) Single(float) 4 金額 (je) Single(float) 表 37 權(quán)限 權(quán)限（ qx） 序號(hào) 字段名稱 類型 長(zhǎng)度 索引 說(shuō)明 1 人員代碼 (ryid) String 6 無(wú)重復(fù) 關(guān)聯(lián)人員信息 2 基礎(chǔ)數(shù)據(jù)設(shè)置 (jcsjsz) Int 1 可用 。0 不可用 3 點(diǎn)餐管理 (dcgl) Int 4 廚房管理 (cfgl) Int 5 查詢統(tǒng)計(jì) (cxtj) Int 6 權(quán)限管理 (qxgl) Int 表 38 菜單 菜單（ cd） 序號(hào) 字段名稱 類型 長(zhǎng)度 索引 說(shuō)明 1 流水號(hào) (ID) 自動(dòng)編號(hào) 客戶 (kh) String 50 2 商品代碼 (spid) String 6 關(guān)聯(lián)商品表 3 標(biāo)志 (bz) String 已做完 未做完 4 數(shù)量 (sl) Int 5 預(yù) 定時(shí)間 (ydsj) 6 完成時(shí)間 (wcsj) Datetime 點(diǎn)菜管理系統(tǒng)的開發(fā)與實(shí)現(xiàn) 14 4 系統(tǒng)程序?qū)崿F(xiàn) 系統(tǒng)登陸界面 進(jìn)入本系統(tǒng)后會(huì)彈出一個(gè)登錄窗口， 選擇人員名稱，輸入 密碼，驗(yàn)證用戶信息，根據(jù)用戶信息權(quán)限，點(diǎn)擊【確定】按鈕，進(jìn)入相應(yīng)的主界面，具體的登錄界面如圖41 所示。 圖 41 系統(tǒng)登陸界面 系統(tǒng)主界面 系統(tǒng)主界面顯示系統(tǒng)的各個(gè)子模塊，方面用戶進(jìn)行各項(xiàng)功能操作。如圖 42 所示。 圖 42 系統(tǒng)主界面 主要功能模塊 基礎(chǔ)數(shù)據(jù)管理 由于部門人員和菜品 信息維護(hù)類似，下面以菜品信息維護(hù)程序?qū)崿F(xiàn)為例進(jìn)行說(shuō)明。 （ 1）菜品類別維護(hù) 點(diǎn)菜管理系統(tǒng)的開發(fā)與實(shí)現(xiàn) 15 此模塊可以對(duì)商品類別進(jìn)行維護(hù)，添加、修改和刪除操作。添加、修改時(shí)判斷類別名稱是否為空、重復(fù)；刪除時(shí)判斷商品類別下是否有商品信息。如圖 43 所示。 圖 43 商品類別維護(hù) 其代碼實(shí)現(xiàn)如下： Private Sub btn 添加 _Click() 39。判斷信息的正確性 39。更新商品類別表中的信息記錄 39。1 If Trim() = Then MsgBox 類別名稱不能為空 ! Exit Sub End If If ExecSql(select * from splb where lbid 39。 amp。 Trim() amp。 39。 and lbmc=39。 amp。 Trim() amp。 39。).RecordCount 0 Then MsgBox 類別名稱不能重復(fù) ! Exit Sub End If 39。2 Dim strResult As String strResult = Exec_SqL(update splb set lbmc= 39。 amp。 Trim() amp。 39。 where lbid=39。 amp。 amp。 39。) If strResult OK Then MsgBox strResult End If Unload Me End Sub 點(diǎn)菜管理系統(tǒng)的開發(fā)與實(shí)現(xiàn) 16 Private Sub Form_Activate() 39。得到商品類表表中最大的類別編號(hào) If = Then = Format(GetMaxNum(select max(lbid) from splb), 000000) End If End Sub Private Sub Form_Resize() 39。動(dòng)態(tài)改變窗體的樣式和標(biāo)題 Call FormFace(Me, TopPicture, KKShape) Call TopCaption(, ) End Sub Private Sub TopPicture_MouseDown(Button As Integer, Shift As Integer, x As Single, y As Single) 39。準(zhǔn)備窗體移動(dòng)標(biāo)志 intOldX = x intOldy = y boolMouseFlag = True End Sub Private Sub TopPicture_MouseMove(Button As Integer, Shift As Integer, x As Single, y As Single) 39。存儲(chǔ)窗提議動(dòng)前的 left,top Dim intLeft, intTop As Integer intLeft = intTop = If = 2 Then Exit Sub If boolMouseFlag = True Then = intLeft + (x intOldX) = intTop + (y intOldy) End If End Sub 點(diǎn)菜管理系統(tǒng)的開發(fā)與實(shí)現(xiàn) 17 Private Sub TopPicture_MouseUp(Button As Integer, Shift As Integer, x As Single, y As Single) 39。還原當(dāng)前的窗體移動(dòng)標(biāo)志 boolMouseFlag = False End Sub Private Sub UserControl11_Click() 39。關(guān)閉窗體 Unload Me End Sub Private Sub UserControl12_Click() 39。刪除商品類別 (如果商品類別下有商品信息，則不允許刪除 ) Dim strResult As String If ExecSql(select * from spxx where lbid=39。 amp。 amp。 39。).RecordCount 0 Then MsgBox 此 類別 下有商品信息 ,不能刪除 ! Exit Sub End If strResult = Exec_SqL(delete from splb where lbid=39。 amp。 amp。 39。) If strResult OK Then MsgBox strResult End If Unload Me End Sub Private Sub UserControl13_Click() 39。判斷信息的正確性 39。添加一條商品類別紀(jì)錄 39。1 If Trim() = Then 點(diǎn)菜管理系統(tǒng)的開發(fā)與實(shí)現(xiàn) 18 MsgBox 類別名稱不能為空 ! Exit Sub End If If ExecSql(select * from splb where lbid=39。 amp。 Trim() amp。 39。).RecordCount 0 Then MsgBox 類別代碼不能重復(fù) ! Exit Sub End If If ExecSql(select * from splb where lbmc=39。 amp。 Trim() amp。 39。).RecordCount 0 Then MsgBox 類別名稱不能重復(fù) ! Exit Sub End If 39。2 Dim strResult As String strResult = Exec_SqL(insert into splb (lbid,lbmc) values (39。 amp。 Trim() amp。 39。,39。 amp。 Trim() amp。 39。)) If strResult OK Then MsgBox strResult End If Unload Me End Sub （ 2）商品信息維護(hù) 此模塊可以對(duì)商品信息進(jìn)行維護(hù)，添加、修改和刪除操作。添加、修改時(shí)，輸入商品代碼 ,商品名稱 ,計(jì)量單位 ,單價(jià)，商品規(guī)格，備注，選擇類