飯店餐飲管理系統(tǒng)2-免費(fèi)閱讀
【正文】 Year(datFind))If Not IsNull((0)) Then S = (0)End IfMsgBox Year(datFind) amp。 代表 amp。 Month(datFind) amp。 Year(datFind) amp。 amp。 vbCrLf amp。 txtName amp。, vbInformation, 輸入、編輯菜單原始資料 = False Exit SubEnd IfDim L As LongL = FileLen(AppDir amp。 txtCustomerID amp。 39。 strHotelName amp。另外，Access 允許創(chuàng)建自定義報(bào)表用于打印或輸出數(shù)據(jù)庫中的信息。例如，當(dāng)班收銀員下班時(shí)直接統(tǒng)計(jì)當(dāng)班期間的輸單、收銀情況。另外，Access 允許創(chuàng)建自定義報(bào)表用于打印或輸出數(shù)據(jù)庫中的信息。更好的完善企業(yè)的經(jīng)營管理，提高企業(yè)自身的競(jìng)爭(zhēng)實(shí)力。 首先，人才的專業(yè)化程度不夠?qū)е聝?nèi)供不足：因餐飲業(yè)門坎較低，中國的大多數(shù)餐飲企業(yè)的老板是從小店發(fā)展起來的，家族式管理的居多，還沒有發(fā)展到聘請(qǐng)職業(yè)經(jīng)理人，許多還是人治，并沒有一套現(xiàn)代企業(yè)制度和監(jiān)督管理體制，所以從觀念意識(shí)、經(jīng)營思想和管理水平還有待專業(yè)化。民以食為天，隨著人民生活水平和生活方式的轉(zhuǎn)變，漸漸的人們發(fā)現(xiàn)餐飲業(yè)具有巨大的投資市場(chǎng)。X x 學(xué) 院面向?qū)ο蟪绦蛟O(shè)計(jì)課程設(shè)計(jì)說明書題目： 飯店餐飲管理系統(tǒng) 系(部)： 電子與通信工程系 專業(yè)(班級(jí))： 07級(jí)電子信息工程專業(yè)1班 姓名： 萬xx 學(xué)號(hào)： 2007xxxxxx 指導(dǎo)教師： 馬xx、謝xx 起止日期： ～ 16 / 17 課程任務(wù)書課題名稱飯店餐飲管理系統(tǒng)設(shè)計(jì)內(nèi)容及要求設(shè)計(jì)一個(gè)《飯店餐飲管理系統(tǒng)》，要求界面美觀，具有操作菜單及工具欄；系統(tǒng)應(yīng)包括下列功能模塊：用戶管理模塊：用戶登錄、用戶的添加、刪除、密碼修改功能。隨著餐飲業(yè)投資者的不斷涌入，許多新一代的快餐店，披薩店，餐館在國內(nèi)開始風(fēng)靡，隨處可見。其次，應(yīng)變能力差，缺乏先進(jìn)的信息工具：現(xiàn)在的餐飲市場(chǎng)火爆，許多以前做電子、房地產(chǎn)等其他行業(yè)的老板都憑借雄厚的資金實(shí)力擠進(jìn)餐飲市場(chǎng)，爭(zhēng)先恐后的上規(guī)模、上檔次、比菜品、比服務(wù)、拼價(jià)格，使餐飲市場(chǎng)競(jìng)爭(zhēng)激烈，但是許多餐飲企業(yè)缺乏對(duì)市場(chǎng)的應(yīng)變能力和靈敏的信息工具，在現(xiàn)今網(wǎng)絡(luò)經(jīng)濟(jì)的時(shí)代，許多餐飲企業(yè)還處在手工及半手工狀態(tài)，即使有計(jì)算機(jī)也只當(dāng)個(gè)點(diǎn)菜器和計(jì)算器用，并沒有真正通過計(jì)算機(jī)系統(tǒng)來實(shí)現(xiàn)改造流程、強(qiáng)化管理、降低成本、堵漏節(jié)流等作用?！∫?、設(shè)計(jì)思路、 Access數(shù)據(jù)庫 Access2003 就是關(guān)系數(shù)據(jù)庫開發(fā)工具，數(shù)據(jù)庫能匯集各種信息以供查詢、存儲(chǔ)和檢索。Access也提供了數(shù)據(jù)存儲(chǔ)庫，可以使用桌面數(shù)據(jù)庫文件把數(shù)據(jù)庫文件置于網(wǎng)絡(luò)文件服務(wù)器，與其他網(wǎng)絡(luò)用戶共享數(shù)據(jù)庫。為餐飲企業(yè)管理人員提供及時(shí)準(zhǔn)確的經(jīng)營狀況和帳務(wù)信貸情況。Access也提供了數(shù)據(jù)存儲(chǔ)庫，可以使用桌面數(shù)據(jù)庫文件把數(shù)據(jù)庫文件置于網(wǎng)絡(luò)文件服務(wù)器，與其他網(wǎng)絡(luò)用戶共享數(shù)據(jù)庫。Private Sub lblDir_Click(Index As Integer)lblDir(Index).MousePointer = 11Select Case Index Case 0 If MsgBox(您是“ amp。 Trim(txtCustomerID) amp。 已有一位標(biāo)識(shí)為“ amp。, vbInformation, 請(qǐng)餐提示 Exit Sub End If Next I AddToCustomerMenufrmguest 窗體frminput 可添加、修改、刪除菜單，可按菜色、烹飪方法、原料顯示，可修改訂餐電話等Private Sub File1_Click()If Len() 20 Then MsgBox 這個(gè)文件的名字太長，請(qǐng)把它的名字改為20個(gè)字以內(nèi)。 If = False Then MsgBox “ amp。, vbInformation + vbOKCancel, 打印菜單) = vbOK Then .EndDocElse .KillDocEnd IfEnd With = TrueExit SubEh: MsgBox 打印時(shí)發(fā)生錯(cuò)誤： amp。 txtPrice1 amp。 ”不是一個(gè)有效的年月！, vbInformation, 月銷售額查詢 Exit SubEnd IfdatFind = Format(strFind, YYYYMM)If MsgBox(您要查詢的年月是 amp。 年 amp。 Format(Date, YY) amp。 年嗎？, vbQuestion + vbYesNo, 年銷售額查詢) = vbNo Then Exit SubEnd IfDim Rec As RecordsetDim S As CurrencySet Rec = (Select Sum(Pay) From Sale Where Year(Date) = amp。VB在原來BASIC語言
公司管理相關(guān)推薦
鄂ICP備17016276號(hào)-1