管科mis課程設(shè)計(jì)--餐飲管理信息系統(tǒng)(編輯修改稿)
2025-02-09 16:28 本頁(yè)面
【文章內(nèi)容簡(jiǎn)介】 輸入/輸出設(shè)計(jì)輸出項(xiàng)目發(fā)貨單、到貨通知單、采購(gòu)合同、商品信息：商品編號(hào)、商品名稱(chēng)、商品單價(jià)、購(gòu)買(mǎi)數(shù)量、購(gòu)買(mǎi)日期、總計(jì)。 13 輸出要求主要輸入數(shù)據(jù)類(lèi)型、來(lái)源、所用設(shè)備、介質(zhì)、格式、數(shù)值范圍、精度等如表 26 所示。表 26 輸出數(shù)據(jù)描述字段名 類(lèi)型 數(shù)值范圍 所用設(shè)備 來(lái)源 是否為空 說(shuō)明商品編號(hào) 字符型 10 電腦，鍵盤(pán)，鼠標(biāo)廠商 否商品名稱(chēng) 字符型 電腦，鍵盤(pán)，鼠標(biāo)廠商 否商品單價(jià) 字符型 電腦，鍵盤(pán)，鼠標(biāo)廠商 否購(gòu)買(mǎi)數(shù)量 字符型 電腦，鍵盤(pán)，鼠標(biāo)超市 否購(gòu)買(mǎi)日期 字符型 電腦，鍵盤(pán)，鼠標(biāo)超市 否總計(jì) 字符型 電腦，鍵盤(pán)，鼠標(biāo)否輸出界面：該界面簡(jiǎn)單，大方，可以為使用者提供及時(shí)、準(zhǔn)確和全面的信息服務(wù)。標(biāo)注清晰，很容易使用，新增加的商品代碼，及規(guī)格爭(zhēng)得了使用人員的同意，其它方面沒(méi)有大的改動(dòng)，上手快，方便操作。驗(yàn)收較為滿意。輸入項(xiàng)目訂貨單、發(fā)貨單、過(guò)期商品單、到貨通知、商品編號(hào)輸入界面設(shè)計(jì)： 14 該輸入界面簡(jiǎn)單易懂，操作人員容易輸入數(shù)據(jù)，便于存檔，而且數(shù)據(jù)位置清晰，不易出錯(cuò)。我們對(duì)輸入數(shù)據(jù)采用了糾錯(cuò)措施，能夠可靠準(zhǔn)確的進(jìn)行輸入。驗(yàn)收較為滿意。 系統(tǒng)實(shí)施實(shí)施方案說(shuō)明系統(tǒng)名稱(chēng)：餐飲管理信息系統(tǒng)程序語(yǔ)言：VB使用的設(shè)備：計(jì)算機(jī)和打印機(jī)實(shí)施的總計(jì)劃系統(tǒng)測(cè)試包括：模塊測(cè)試，子系統(tǒng)測(cè)試，系統(tǒng)測(cè)試和用戶驗(yàn)收測(cè)試。測(cè)試的同時(shí)進(jìn)行了調(diào)試。各個(gè)進(jìn)度的時(shí)間安排妥當(dāng)，費(fèi)用適當(dāng),所以實(shí)施方案通過(guò)。 系統(tǒng)登錄界面當(dāng)用戶首次進(jìn)入系統(tǒng)時(shí)，必須要驗(yàn)證用戶身份，及用戶必須有自己的用戶名和密碼。在窗體中添加 2 個(gè) TextBox 控件、2 個(gè) Button 控件和 2 個(gè) Label 控件，調(diào)節(jié)他們的大小和位置；在【屬性】設(shè)置窗體中分別對(duì)這些控件和窗體設(shè)置相應(yīng)的屬性，設(shè)置結(jié)果如表所示。 控件類(lèi)別 控件名稱(chēng) 屬性button Button1Button2Texttextlabel Label1Label2Texttext 15 Label1textbox Textbox1Textbox2Texttext登錄界面的代碼Public Class Form1 39。 Dim user As String Dim password As String Dim sqlstr As String Dim username As String Dim pepdom As String Dim mod1 As String Dim mod2 As String Dim mod3 As String Dim mod4 As String Private Sub Button1_Click(ByVal sender As , ByVal e As ) Handles user = password = sqlstr = SELECT * FROM Userinfo WHERE User_Id= amp。 39。 amp。 user amp。 39。 and User_pwd=39。 amp。 password amp。 39。 Dim objdatarow As DataRow Try objdatarow = objdatarow(sqlstr).Tables(0). = 0 Catch MsgBox(口令和賬號(hào)不符,請(qǐng)重試,并檢查該賬號(hào)是否存在。, + , 系統(tǒng)登錄失敗) 16 = Exit Sub End Try username = user pepdom = (2) mod1 = CBool((3)) mod2 = CBool((4)) mod3 = CBool((5)) mod4 = CBool((6)) Dim frmmain As New Form1() () () End Sub Private Sub Button2_Click(ByVal sender As , ByVal e As ) Handles If MsgBox(您真的不登錄餐飲管理系統(tǒng)嗎?, + , 退出登錄系統(tǒng)) = Then () Else Exit Sub End If End SubEnd Class登錄代碼運(yùn)行的結(jié)果 17 主界面登錄后出現(xiàn)的餐廳的主界面 18 19 總界面的代碼Public Class Form2 Private Sub 修改用戶名ToolStripMenuItem_Click(ByVal sender As , ByVal e As ) Handles Dim newform As New Form3 = Me () End Sub Private Sub 用戶管理ToolStripMenuItem_Click(ByVal sender As , ByVal e As ) Handles Dim newform As New Form4 = Me () End Sub Private Sub 菜單編輯管理ToolStripMenuItem_Click(ByVal sender As , ByVal e As ) Handles Dim newform As New Form5 20 = Me () End Sub Private Sub 點(diǎn)餐ToolStripMenuItem_Click(ByVal sender As , ByVal e As ) Handles Dim newform As New Form6 = Me () End Sub Private Sub 訂單ToolStripMenuItem_Click(ByVal sender As , ByVal e As ) Handles Dim newform As New Form7 = Me () End Sub Private Sub 訂座ToolStripMenuItem_Click(ByVal sender As , ByVal e As ) Handles Dim newform As New Form8 = Me () End Sub Private Sub 個(gè)人信息ToolStripMenuItem_Cl
法律信息相關(guān)推薦
鄂ICP備17016276號(hào)-1