【正文】 Then //圖像存在的話，添加圖像Dim imgstreem As New FileStream(FileUrl, , ) Dim imgbyte() As Byte (imgbyte, 0, ) () Dim sqlcmd As New Dim sqlconn As New ()CmdStr = update customer set photo=image where id=39。 (image, ) (image).Value = imgbyte = sqlconn = CmdStr Try () () () Catch ex As Exception (ex) End Try End If如果用戶提交了客戶的相片，相片將會(huì)被轉(zhuǎn)化為二進(jìn)制數(shù)據(jù)提交到數(shù)據(jù)庫(kù)中，這樣就可以方便用戶日后對(duì)客戶資料進(jìn)行維護(hù)，也有助于服務(wù)人員記住客戶，當(dāng)客戶再次光臨時(shí)，一口報(bào)出客戶的名字將會(huì)使客戶對(duì)餐廳的好感大增。使用密碼可以防止客戶的資料被惡意修改。以下是修改按鈕的代碼。 + + 39。 + + 39。 + + 39。 + + 39。 + + 39。 + + 39。 + + 39。使用update語(yǔ)句將空格中的數(shù)據(jù)更新到服務(wù)器。 菜單信息修改模塊與本模塊的原理類似，以下不再闡述?？蛻糍Y料來之不易，建議不要輕易刪除客戶資料。 + + 39。 + + 39。 + + 39。因添加客戶數(shù)據(jù)時(shí)要求身份證號(hào)是唯一的，所以不用擔(dān)心誤刪的問題。 客戶信息的查詢 客戶信息的查詢客戶查詢模塊載入Private Sub kehuchaxun_Load(ByVal sender As , ByVal e As ) Handles sqlobject = New SQL_Conn CmdStr = SELECT name as 39。,id as 39。,address as 39。,tel as 39。,mobilephone as 39。 ,money as 39。 ,usedmoney as 39。FROM customer Try = (CmdStr) Catch ex As Exception (ex) End Try = End Sub使用SQL_Ada方法，查詢customer表中的個(gè)別數(shù)據(jù)，將數(shù)據(jù)庫(kù)中的數(shù)據(jù)提取出來保存在內(nèi)存中的datatable表中，客戶信息查詢中的DataGridView組件將內(nèi)存中的datatable數(shù)據(jù)表里的數(shù)據(jù)提取出來顯示給用戶查看。Private Sub DataGridView1_CellClick(ByVal sender As Object, ByVal e As ) Handles If row And = 0 Then row = = (0, row).() If ThenCmdStr = select photo from customer where name=39。 DisplayImg(CmdStr) Else : = Nothing End If End If End Sub其中If row And = 0 ，第一行為0。If Then是指如果label1不為空， CmdStr = select photo from customer where name=39。是SQL語(yǔ)句查詢圖片數(shù)據(jù)。Else : = Nothing指不滿足條件時(shí)，清空?qǐng)D像。菜單信息查詢模塊與本模塊的原理類似，以下不在闡述。本節(jié)介紹其他功能的實(shí)現(xiàn)。 + + 39。 + + 39。 + + 39。 打折信息處理當(dāng)用戶向系統(tǒng)添加預(yù)定的菜品時(shí)，系統(tǒng)會(huì)執(zhí)行以下代碼： If = Then //選擇客戶 MsgBox(請(qǐng)選擇客戶) ElseIf = Then //選擇菜單 MsgBox(請(qǐng)選擇菜單) Else = + + //所點(diǎn)菜單 price = totle += price //總消費(fèi)金額 = totle = totle CmdStr = select usedmoney from discount //查詢?cè)O(shè)定的消費(fèi)金額 Cmd = select discount from discount //查詢?cè)O(shè)定的打折程度Cm = SELECT usedmoney FROM [customer] where id=39。 //客戶已消費(fèi)金額 f = ((Cm).Rows(0).Item(0)) //f為客戶已消費(fèi)金額 Try For i = 0 To (CmdStr). – 1 //打折表行數(shù) j = ((CmdStr).Rows(i).Item(0)) //打折表行消費(fèi)金額 d = ((Cmd).Rows(i).Item(0)) //打折表行折扣率 If (f = j) Then = totle * d / 10 End If Next i Catch ex As Exception (ex) End Try End If End Sub首先選擇客戶和預(yù)定的餐點(diǎn)，客戶信息用于判斷打折程度，餐點(diǎn)用于結(jié)算消費(fèi)金額。具體方法是系統(tǒng)先查看折扣數(shù)據(jù)表中共有的數(shù)據(jù)行數(shù)，然后從第0行開始依次向下掃描，由于添加打折信息時(shí)是按照消費(fèi)額度遞增方式添加的，所以系統(tǒng)查到的數(shù)據(jù)會(huì)越來越大，越來越接近客戶已消費(fèi)金額，當(dāng)已消費(fèi)金額剛好超過設(shè)定的金額時(shí)系統(tǒng)停止繼續(xù)向下查找新的設(shè)定金額，同時(shí)查找設(shè)定金額對(duì)應(yīng)的打折程度，再用此打折程度計(jì)算打折后的實(shí)付金額。 + + 39。 + + 39。 + + 39。 + + 39?？蛻粜彰?9。身份證39。預(yù)定日期39。預(yù)定時(shí)間39。餐桌號(hào)39。結(jié)算價(jià)格39。預(yù)定菜單39。服務(wù)員編號(hào)39。當(dāng)用戶知道想要查找的預(yù)定信息中的某些確切內(nèi)容時(shí)，可以將知道的內(nèi)容輸入空格中，系統(tǒng)將會(huì)自動(dòng)在數(shù)據(jù)庫(kù)中查找這些內(nèi)容?？蛻粜彰?9。身份證39。預(yù)定日期39。預(yù)定時(shí)間39。餐桌號(hào)39。結(jié)算價(jià)格39。預(yù)定菜單39。服務(wù)員編號(hào)39。 + + 39。并將新的信息顯示在DataGridView組件中。 然后再刷新DataGridView組件中的數(shù)據(jù)信息。 + + 39。 + + 39。 + userid + 39。 + + 39。 + userid + 39?？蛻粜彰?9。身份證39。余額39。再用同樣的方法對(duì)用戶收款金額進(jìn)行更新。 客戶結(jié)算 客戶買單買單分為現(xiàn)金支付和余額支付現(xiàn)金支付：客戶使用現(xiàn)金支付的話會(huì)增加用戶的收款金額，方法和上面的用戶充值類似余額支付：用戶若選擇余額支付的話需要使用客戶密碼驗(yàn)證客戶身份，然后系統(tǒng)會(huì)從數(shù)據(jù)庫(kù)中調(diào)出客戶余額情況，若客戶余額不足，系統(tǒng)會(huì)給出提示。余額支付和現(xiàn)金支付的最大區(qū)別就是余額支付扣客戶賬戶金額，現(xiàn)金支付增加用戶實(shí)收金額 折扣設(shè)定折扣設(shè)定其實(shí)就是往數(shù)據(jù)庫(kù)discount表中添加以消費(fèi)金額與其對(duì)應(yīng)的折扣程度，在操作中要切記折扣金額從小到大依次添加因?yàn)橄到y(tǒng)在為客戶打折時(shí)是從折扣表的第0行開始向后依次類推為客戶查詢對(duì)應(yīng)的折扣程度，所以若表中數(shù)據(jù)順序打亂的話，系統(tǒng)得到的折扣程度會(huì)變高。 用戶的刪除用戶刪除模塊的設(shè)計(jì)要考慮幾個(gè)問題：刪除的是管理員（店長(zhǎng)）還是普通職員。如果刪除的賬號(hào)就是管理員現(xiàn)在所使用的賬號(hào)怎么辦。 + j + 39。 + + 39。 + + 39。如果刪除的是店主賬戶，那么系統(tǒng)先判斷店主賬戶有幾個(gè)，如果只有一個(gè)，系統(tǒng)會(huì)拒絕刪除請(qǐng)求，以防止下次沒有店主賬戶的情況導(dǎo)致無法進(jìn)入用戶管理?？? 結(jié)當(dāng)初之所以選擇餐飲信息管理系統(tǒng)，不僅僅是因?yàn)槠渚哂刑魬?zhàn)性，更是因?yàn)樗臃现袊?guó)廣大的中小餐飲企業(yè)的發(fā)展需要，大家都知道，中國(guó)的餐飲服務(wù)行業(yè)最多的是個(gè)體經(jīng)營(yíng)模式，他們根本不會(huì)花費(fèi)過多的費(fèi)用架設(shè)網(wǎng)絡(luò)服務(wù)器，大多數(shù)店主都希望有一款產(chǎn)品可以滿足餐飲管理的需要而且花費(fèi)的價(jià)格也相對(duì)低廉，甚至一次投資終身受益。餐飲信息管理系統(tǒng)的誕生可以為他們提供便捷的管理服務(wù)。它不僅可以為餐廳降低人力資源的付出，節(jié)省了成本，而且也可以提升自身的形象，使餐廳迎來更多的食客。世界上沒有任何一樣?xùn)|西是十全十美的，在完成了餐飲信息管理系統(tǒng)后，我發(fā)現(xiàn)，原本看上去應(yīng)該比較完善的系統(tǒng)又有了新的可以改進(jìn)的地方，如預(yù)定的餐點(diǎn)要取消其中的一份該如何實(shí)現(xiàn)。此次論文的完成既為大學(xué)三年劃上了一個(gè)完美的句號(hào)，也為將來的計(jì)算機(jī)事業(yè)奠定了良好的基礎(chǔ)。而且我相信付出總有回報(bào)，三年的大學(xué)學(xué)習(xí)生活成就了我扎實(shí)的專業(yè)知識(shí)，務(wù)實(shí)的工作作風(fēng)，良好的組織能力和團(tuán)隊(duì)協(xié)作精神，相信這些會(huì)在我未來的生活和工作中給我?guī)砭薮蟮膸椭?。從論文的選題、資料的收集、程序的設(shè)計(jì)到論文的撰寫、編排整個(gè)過程中，我付出了很多的努力，但功夫不負(fù)有心人，那份鍥而不舍的精神使我終于成功了！畢業(yè)論文是對(duì)學(xué)生大學(xué)階段學(xué)習(xí)知識(shí)的總結(jié)，也是對(duì)學(xué)生分析問題、解決問題能力的綜合考察。在大學(xué)這近三年的時(shí)間里，你們對(duì)我悉心的指導(dǎo)和教育。同時(shí)，我從指導(dǎo)老師翁老師身上學(xué)到了很多東西。翁老師認(rèn)真負(fù)責(zé)的工作態(tài)度，嚴(yán)謹(jǐn)?shù)闹螌W(xué)精神和深厚的理論水平都使我受益匪淺。此外，我還要感謝在實(shí)習(xí)期間一起學(xué)習(xí)工作生活的同事們，從你們身上，我學(xué)到了很多學(xué)校里不曾接觸的東西。參考文獻(xiàn)［1］林卓然 . VB語(yǔ)言程序設(shè)計(jì) . 電子工業(yè)出版社 . 200911［2］李英杰 . 2005 程序設(shè)計(jì)實(shí)例教程 . 天津大學(xué)出版社 . 2008111［3］楊晶 . . 科學(xué)出版社 . 20060901［4］劉志嫵 . 基于VB和SQL的數(shù)據(jù)庫(kù)編程技術(shù) . 清華大學(xué)出版社 . 200841［5］劉玉山 . VB數(shù)據(jù)庫(kù)項(xiàng)目設(shè)計(jì)模塊化教程 . 機(jī)械工業(yè)出版社 . 200981［6］孟德欣 . VB程序設(shè)計(jì) . 清華大學(xué)出版社 . 200971［7］（美）依夫杰 . VB2005