小型超市管理報(bào)告論文.doc

超市管理系統(tǒng)小型超市管理系統(tǒng)報(bào)告題目： 超市管理系統(tǒng) 班 級(jí)： 學(xué) 號(hào)： 完 成 人： 指導(dǎo)教師： 完成時(shí)間： 目錄第1章 緒論31.1 系統(tǒng)開(kāi)發(fā)的背景1.2 系統(tǒng)開(kāi)發(fā)的目的及意義1.3 論文的主要工作1.4 論文的組織結(jié)構(gòu)第2章 系統(tǒng)可行性分析與需求分析42.1 系統(tǒng)可行性分析2.2 系統(tǒng)需求分析第3章 相關(guān)技術(shù)介紹53.1 Visual Basic簡(jiǎn)介3.2 ACCESS數(shù)據(jù)庫(kù)的簡(jiǎn)介第4章 系統(tǒng)總體設(shè)計(jì)64.1 系統(tǒng)總體功能4.2 系統(tǒng)的體系結(jié)構(gòu)4.2.1 系統(tǒng)應(yīng)具備的功能詳細(xì)介紹4.2.2 系統(tǒng)部分模塊概要介紹第5章 數(shù)據(jù)庫(kù)設(shè)計(jì)75.1 數(shù)據(jù)庫(kù)安全設(shè)計(jì)5.2 數(shù)據(jù)庫(kù)的物理結(jié)構(gòu)第6章 系統(tǒng)的詳細(xì)設(shè)計(jì)與實(shí)現(xiàn)116.1 流程圖說(shuō)明6.2 主要界面的詳細(xì)設(shè)計(jì)與實(shí)現(xiàn)6.2.1 登陸界面6.2.2 用戶注冊(cè)界面6.2.3 貨物登記界面6.2.4 商品圖表界面6.2.5 數(shù)量盤點(diǎn)界面6.2.6 報(bào)表顯示結(jié)論20謝 辭20參考文獻(xiàn)附錄21 緒論1.1 課程設(shè)計(jì)的目的通過(guò)本次課程設(shè)計(jì)，使我們能夠全面、深刻地掌握數(shù)據(jù)庫(kù) vb系統(tǒng)的設(shè)計(jì)流程。根據(jù)在數(shù)據(jù)庫(kù)原理課程中所學(xué)到的數(shù)據(jù)庫(kù)理論知識(shí)，結(jié)合某個(gè)具體的實(shí)際需求，最終開(kāi)發(fā)出一個(gè)較為實(shí)用的數(shù)據(jù)庫(kù)系統(tǒng)。1.2.1課程設(shè)計(jì)的背景1.2 課程設(shè)計(jì)的背景和意義20世紀(jì)90年代后期特別是近幾年，我國(guó)的超市產(chǎn)業(yè)飛速發(fā)展，其經(jīng)營(yíng)模式更為復(fù)雜，舊的管理體制已經(jīng)無(wú)法適應(yīng)超市的發(fā)展，這就迫切的需要引進(jìn)新的管理技術(shù)。超市的數(shù)據(jù)和業(yè)務(wù)越來(lái)越龐大，而計(jì)算機(jī)就是一種高效的管理系統(tǒng)，這就需要我們把超市的管理與計(jì)算機(jī)結(jié)合起來(lái)，從而超市管理系統(tǒng)應(yīng)運(yùn)而生。依靠現(xiàn)代化的計(jì)算機(jī)信息處理技術(shù)來(lái)管理超市，節(jié)省了大量的人力、物力，改善了員工的并且能夠快速反映出商品的進(jìn)、銷、存等狀況和各種反饋信息分析，使管理人員快速對(duì)市場(chǎng)的變化做出相應(yīng)的決策，加快超市經(jīng)營(yíng)管理效率。1.2.2 課程設(shè)計(jì)的意義“vb數(shù)據(jù)庫(kù)課程設(shè)計(jì)”的設(shè)計(jì)思想旨在強(qiáng)調(diào)學(xué)生的實(shí)際編程能力的培養(yǎng)與創(chuàng)意靈感的發(fā)揮。為此，本課程結(jié)合學(xué)科特點(diǎn)，除了讓學(xué)生掌握數(shù)據(jù)庫(kù)原理的理論知識(shí)，還增加了需求功能讓學(xué)生完成，并鼓勵(lì)學(xué)生的創(chuàng)作出個(gè)性的程序，滿足客戶需求，與市場(chǎng)的實(shí)際項(xiàng)目相結(jié)合。學(xué)生對(duì)此熱情高，實(shí)際收獲大，效果好。通過(guò)課堂學(xué)習(xí)和參與相關(guān)項(xiàng)目設(shè)計(jì)，學(xué)生對(duì)書(shū)本支持有了深刻的理解，實(shí)踐性教學(xué)取得了良好效果。1.3 課程設(shè)計(jì)環(huán)境 簡(jiǎn)單介紹了vb及數(shù)據(jù)路的使用和應(yīng)用，加深我們對(duì)程序的認(rèn)識(shí)和實(shí)際意義的重要性。第2章 系統(tǒng)可行性與需求分析隨著人們生活水平的不斷提高，對(duì)于物質(zhì)的需求也越來(lái)越高，而超市作為日常生活用品聚集的場(chǎng)所，隨著全球各種超市的數(shù)目的不斷增加，規(guī)模不斷增大，其管理難度也相應(yīng)的增加，而為了適應(yīng)當(dāng)今信息化發(fā)展的時(shí)代，一套完整的超市商品管理系統(tǒng)顯得尤為重要。2.1 可行性分析系統(tǒng)的可行性分析是對(duì)課題的通盤考慮，是系統(tǒng)開(kāi)發(fā)者進(jìn)行進(jìn)一步工作的前提，是系統(tǒng)設(shè)計(jì)與開(kāi)發(fā)的前提與基礎(chǔ)。系統(tǒng)的可行性分析可以使系統(tǒng)開(kāi)發(fā)者盡可能早的估計(jì)到課題開(kāi)發(fā)過(guò)程中的困難，并在定義階段認(rèn)識(shí)到系統(tǒng)方案的缺陷，這樣就能花費(fèi)較少的時(shí)間和精力，也可以避免許多專業(yè)方面的困難。所以，系統(tǒng)的可行性分析在整個(gè)開(kāi)發(fā)過(guò)程中是非常重要的。本系統(tǒng)采用基于Windows的圖形用戶界面，而該系統(tǒng)是大家熟悉的操作系統(tǒng)，對(duì)于那些有一般的計(jì)算機(jī)知識(shí)的人員就可以輕松上手。而整個(gè)超市管理系統(tǒng)采用最友好的交互界面，簡(jiǎn)介明了，不需要對(duì)數(shù)據(jù)庫(kù)進(jìn)行深入的了解。由此，該系統(tǒng)的操作是可行的，有必要開(kāi)發(fā)該系統(tǒng)。2.3 系統(tǒng)的設(shè)計(jì)目標(biāo)本系統(tǒng)主要包括四大模塊，分別是人事管理模塊，銷售管理模塊，進(jìn)貨管理模塊，庫(kù)存管理模塊。每個(gè)模塊的功能如下：1. 人事管理模塊功能：(1)實(shí)現(xiàn)職工信息的查詢；(2)實(shí)現(xiàn)職工信息的更新，包括增加、刪除、修改功能；(3)實(shí)現(xiàn)供貨商信息的查詢；(4)實(shí)現(xiàn)供貨商信息的更新，包括增加、刪除、修改功能。2. 進(jìn)貨管理模塊功能：(1)實(shí)現(xiàn)進(jìn)貨信息的查詢；(2)實(shí)現(xiàn)進(jìn)貨信息的更新，包括增加、刪除、修改功能。4. 庫(kù)存管理模塊功能：(1)實(shí)現(xiàn)商品庫(kù)存信息的查詢；第3章 系統(tǒng)開(kāi)發(fā)的技術(shù)背景3.1 開(kāi)發(fā)技術(shù)及運(yùn)行環(huán)境3.1 Visual Basic簡(jiǎn)介通過(guò)權(quán)衡對(duì)各種編程語(yǔ)言和數(shù)據(jù)庫(kù)使用的熟練程度，本系統(tǒng)選用Visual Basic語(yǔ)言編寫，它是一種調(diào)試簡(jiǎn)單應(yīng)用廣泛的語(yǔ)言而且簡(jiǎn)單易學(xué)。 3.2 ACCESS數(shù)據(jù)庫(kù)的簡(jiǎn)介客戶端數(shù)據(jù)模型是數(shù)據(jù)庫(kù)數(shù)據(jù)的儲(chǔ)存方式，是數(shù)據(jù)庫(kù)系統(tǒng)的核心和基礎(chǔ)。通過(guò)建立簡(jiǎn)單表之間的關(guān)系來(lái)定義結(jié)構(gòu)，而不是根據(jù)數(shù)據(jù)物理儲(chǔ)存建立數(shù)據(jù)關(guān)系。Access則是小型數(shù)據(jù)庫(kù)的代表之作。第4章 系統(tǒng)分析與總體設(shè)計(jì)4.1 系統(tǒng)結(jié)構(gòu)框架一般的超市商品管理系統(tǒng)，主要由五大模塊組成，即商品信息管理模塊，人事管理模塊，銷售管理模塊，進(jìn)貨管理模塊，庫(kù)存管理模塊，此系統(tǒng)也不例外，主要有此五大模塊組成。圖4-1系統(tǒng)功能結(jié)構(gòu)圖。圖4-1 系統(tǒng)功能結(jié)構(gòu)圖4.2 系統(tǒng)功能設(shè)計(jì)系統(tǒng)功能設(shè)計(jì)是使整個(gè)系統(tǒng)能基本實(shí)現(xiàn)超市的進(jìn)、銷、存等管理功能，能讓超市管理者更直觀的了解超市的經(jīng)營(yíng)狀況，以做出相應(yīng)的經(jīng)營(yíng)決策。管理信息系統(tǒng)(MIS)就是要對(duì)這些資源建立正確的數(shù)據(jù)庫(kù)，并進(jìn)行信息的收集、傳送、存儲(chǔ)、編制成各種憑證、報(bào)表、臺(tái)帳、圖形等信息，同時(shí)對(duì)這些信息進(jìn)行維護(hù)，通過(guò)實(shí)測(cè)超市的各種運(yùn)行情況，并利用過(guò)去的歷史數(shù)據(jù)預(yù)測(cè)未來(lái)的發(fā)展，從超市全局的角度出發(fā)進(jìn)行決策，利用信息控制超市的行為，附注超市完成其目標(biāo)。本系統(tǒng)主要包括四大模塊，分別是人事管理模塊，銷售管理模塊，進(jìn)貨管理模塊，庫(kù)存管理模塊。每個(gè)模塊的功能如下：1. 商品管理模塊功能：(1)實(shí)現(xiàn)商品信息的查詢；(2)實(shí)現(xiàn)職工信息的更新，包括增加、刪除、修改功能；2. 人事管理模塊功能：(1)實(shí)現(xiàn)職工信息的查詢；(2)實(shí)現(xiàn)職工信息的更新，包括增加、刪除、修改功能；(3)實(shí)現(xiàn)供貨商信息的查詢；(4)實(shí)現(xiàn)供貨商信息的更新，包括增加、刪除、修改功能。3. 銷售管理模塊功能：(1)實(shí)現(xiàn)前臺(tái)商品的銷售；(2)將商品的銷售信息與數(shù)據(jù)庫(kù)聯(lián)系起來(lái)。4. 進(jìn)貨管理模塊功能：(1)實(shí)現(xiàn)進(jìn)貨信息的查詢；(2)實(shí)現(xiàn)進(jìn)貨信息的更新，包括增加、刪除、修改功能。5. 庫(kù)存管理模塊功能：(3)實(shí)現(xiàn)庫(kù)存信息的查詢；第5章 數(shù)據(jù)庫(kù)設(shè)計(jì)5.1超市管理系統(tǒng)數(shù)據(jù)庫(kù)E-R模型通過(guò)對(duì)超市管理系統(tǒng)分析，得出系統(tǒng)的E-R圖。圖5-1 數(shù)據(jù)庫(kù)E-R模型圖。名稱職工/用戶職工編號(hào)供貨日期進(jìn)貨日期電話地址供貨商編號(hào)供貨商進(jìn)貨進(jìn)貨單號(hào)商品編號(hào)名稱價(jià)格商品姓名性別mnmn供貨圖5-1 數(shù)據(jù)庫(kù)E-R模型圖5.2數(shù)據(jù)庫(kù)表設(shè)計(jì)5.2.1 職工信息表職工信息表(StaffBill)用于存儲(chǔ)職工信息，職工編號(hào)為主鍵是唯一標(biāo)識(shí)。表中各字段功能定義如表5-1所示。中文字段名英文字段名字段類型長(zhǎng)度主鍵/外鍵字段值約束職工編號(hào)staffIDchar6PNOT NULL姓名namenvarchar8NOT NULL性別sexnchar2NOT NULL類別kindnvarchar10NULL備注othersntext50NULL表5-1職工信息表(StaffBill)5.2.2 用戶登錄表用戶登錄表（Users_Info）用于存儲(chǔ)用戶的基本登錄信息。表中各字段功能定義如表5-2所示。 中文字段名英文字段名字段類型長(zhǎng)度主鍵/外鍵字段值約束帳號(hào)loginIDchar6P/FNOT NULL密碼passWordchar6NOT NULL5.2.3 商品信息表商品信息表（Goods_Info）用于存儲(chǔ)商品的信息。表中各字段功能定義如表5-3所示。中文字段名英文字段名字段類型長(zhǎng)度主鍵/外鍵字段值約束商品編號(hào)merchIDchar6PNOT NULL供貨商號(hào)profferIDchar6FNOT NULL名稱fullNamenvarchar80NOT NULL類別kindnvarchar8NULL單價(jià)unitCostmoney4NOT NULL備注othersntext50NULL表5-3商品信息表（Goods_Info）5.2.4 供貨商信息表供貨商信息表（Sup_Info）用于存儲(chǔ)供貨商的信息。表中各字段功能定義如表5-4所示。中文字段名英文字段名字段類型長(zhǎng)度主鍵/外鍵字段值約束供貨商號(hào)SupplierIDchar6PNOT NULL名稱Namenvarchar50NOT NULL聯(lián)系人contactPersonnvarchar8NOT NULL聯(lián)系電話phonevarchar12NOT NULL聯(lián)系地址addressnvarchar50NOT NULL備注othersntext50NULL表5-4 供貨商信息表（Sup_Info）5.2.5 進(jìn)貨信息表進(jìn)貨信息表（Buy）存儲(chǔ)進(jìn)貨信息。表中各字段功能定義如表5-5所示。中文字段名英文字段名字段類型長(zhǎng)度主鍵/外鍵字段值約束進(jìn)貨單號(hào)BuyIDchar6PNOT NULL商品編號(hào)GoodsIDchar6P/FNOT NULL供貨商號(hào)SupplierIDchar6FNOT NULL進(jìn)貨價(jià)Pricemoney4NOT NULL數(shù)量Amountint4NOT NULL金額Summoney4NOT NULL進(jìn)貨日期Datedatetime8NOT NULL備注Remarkntext50NULL表5-5進(jìn)貨信息表(Buy)表5-6銷售信息表（Sell）5.2.6 庫(kù)存信息表庫(kù)存信息表（Stock）存儲(chǔ)庫(kù)存信息。表中各字段定義如表5-7所示。中文字段名英文字段名字段類型長(zhǎng)度主鍵/外鍵字段值約束商品編號(hào)GoodsIDchar6P/FNOT NULL庫(kù)存數(shù)量Amountint4NOT NULL第6章 系統(tǒng)功能模塊實(shí)現(xiàn)6.1 系統(tǒng)登錄模塊用戶登錄模塊在本系統(tǒng)的首頁(yè)。用戶輸入用戶名和密碼后，系統(tǒng)進(jìn)行驗(yàn)證，驗(yàn)證通過(guò)進(jìn)入程序的主界面。界面如圖6-1所示。 圖61用戶登陸界面主要代碼實(shí)現(xiàn)如下：Private Sub Command1_Click() Adodc1.RecordSource = Select * From 用戶信息表 Where 編號(hào)= & Trim(txtno) & and 用戶名= & Trim(txtname) & and 密碼= & Trim(txtpwd) & Adodc1.RefreshIf Adodc1.Recordset.EOF ThenMsgBox 用戶名或密碼或編號(hào)不正確，請(qǐng)重新輸入！, vbOKOnly + vbInformation, 提示信息txtno.Text = txtname.Text = txtpwd.Text = Elsemdimain.ShowIf cbotype.Text = 管理員 Thenmdimain.gl.Enabled = Truemdimain.hwgl.Enabled = TrueUnload MeElseIf cbotype.Text = 銷售員 Thenmdimain.xsgl.Enabled = TrueUnload MeElseIf cbotype.Text = 經(jīng)理 Thenmdimain.gl.Enabled = Truemdimain.hwgl.Enabled = Truemdimain.xsgl.Enabled = TrueUnload MeEnd IfEnd IfEnd Sub6.2 用戶管理模塊此模塊進(jìn)行對(duì)用戶信息的輸入，修改，增加，刪除等功效。界面如圖62所示 圖62用戶管理系統(tǒng) 主要實(shí)現(xiàn)代碼如下Private Sub Command1_Click()n = MsgBox(你確認(rèn)刪除當(dāng)前記錄嗎？, vbYesNo + vbQuestion, 提示信息)If n = 6 ThenAdodc1.Recordset.DeleteAdodc1.Recordset.MoveNextEnd IfEnd SubPrivate Sub Command2_Click()Unload MeEnd SubPrivate Sub Command3_Click()Adodc1.Recordset.AddNewAdodc1.Recordset(權(quán)限) = cbotype.TextAdodc1.Recordset(編號(hào)) = Text1.TextAdodc1.Recordset(用戶名) = Text2.TextAdodc1.Recordset(密碼) = Text3.TextAdodc1.Recordset.UpdateText2.Text = Text3.Text = Text1.Text = cbotype.Text = End SubPrivate Sub Command4_Click()Adodc1.Recordset.Find 用戶名= & Text2.Text & , , , 1 ask = MsgBox(確定要修改嗎?, vbQuestion + vbYesNo, 提示) If ask = 6 Then If Adodc1.Recordset.EOF = True Then Adodc1.Recordset.MoveLast Adodc1.Recordset.Fields(權(quán)限) = cbotype.Text Adodc1.Recordset.Fields(0) = Text1 Adodc1.Recordset.Fields(1) = Text2 Adodc1.Recordset.Fields(2) = Text3 Adodc1.Recordset.Update End IfEnd Sub Private Sub DataGrid1_Click() cbotype.Text = Adodc1.Recordset.Fields(權(quán)限) Text1 = Adodc1.Recordset.Fields(編號(hào)) Text2 = Adodc1.Recordset.Fields(用戶名) Text3 = Adodc1.Recordset.Fields(密碼)End Sub6.3 貨物登記此模塊有對(duì)貨物的顯示，查詢，能夠?qū)τ脩暨M(jìn)行合理的管理，界面如圖6-2所示。 圖63 貨物信息管理 主要實(shí)現(xiàn)代碼如下Private Sub Command1_Click() Text1 = Adodc1.Recordset.Fields(編號(hào)) Text2 = Adodc1.Recordset.Fields(條形碼) Text3 = Adodc1.Recordset.Fields(名稱) Text4 = Adodc1.Recordset.Fields(計(jì)量單位) Text5 = Adodc1.Recordset.Fields(數(shù)量) Text6 = Adodc1.Recordset.Fields(單價(jià)) Text7 = Adodc1.Recordset.Fields(生產(chǎn)廠家) Text8 = Adodc1.Recordset.Fields(進(jìn)貨日期)End SubPrivate Sub Command2_Click() mdimain.ShowEnd Sub6.4 分類查詢管理模塊 此模塊可以按照種類查詢是查詢更加方便，是顯示更加簡(jiǎn)潔。界面如圖63所示 圖6-4 分類查詢管理界面 主要實(shí)現(xiàn)代碼如下Private Sub Combo1_Click()If Combo1.Text = 食品 ThenAdodc1.RecordSource = select * from 商品信息表 where 分類= & Combo1.Text & ElseIf Combo1.Text = 文具 Then Adodc1.RecordSource = select * from 商品信息表 where 分類= & Combo1.Text & ElseIf Combo1.Text = 日化 Then Adodc1.RecordSource = select * from 商品信息表 where 分類= & Combo1.Text & ElseIf Combo1.Text = 電器 ThenAdodc1.RecordSource = select * from 商品信息表 where 分類= & Combo1.Text & End IfAdodc1.RefreshSet DataGrid1.DataSource = Adodc1End SubPrivate Sub Command1_Click() Form2.Hide Form1.ShowEnd Sub 6.5報(bào)表的實(shí)現(xiàn) 圖6.5報(bào)表的實(shí)現(xiàn)6.6商品用各種圖形的顯示圖6.5各種圖形的表示實(shí)現(xiàn)程序的源代碼Public Sub Connectionstring() Dim mapth As String, mlink As String mpath = App.Path If Right(mpath, 1) Then mpath = mpath + mlink = Provider=Microsoft.Jet.OLEDB.4.0; Data Source= + mpath + shop.mdb Adodc1.Connectionstring = mlink Adodc1.CommandType = adCmdUnknownEnd SubPrivate Sub Form_Load() Call Connectionstring Adodc1.RecordSource = Select * From 銷售信息表 Adodc1.Refresh Open data.txt For Output As #1 Do While Not Adodc1.Recordset.EOF Write #1, Adodc1.Recordset.Fields(編號(hào)), Val(Adodc1.Recordset.Fields(數(shù)量) Adodc1.Recordset.MoveNext Loop Close #1End SubPrivate Sub zbx() Cls n = 0 max = 0 Open data.txt For Input As #1 Do While Not EOF(1) n = n + 1 ReDim Preserve a(n) ReDim Preserve b(n) Input #1, a(n), b(n) If b(n) max Then max = b(n) Loop Close #1 Me.Scale (-3, max * 1.2)-(max * 1.2, -max * 0.1) Line (0, 0)-(max * 1.2, 0): Line (0, max * 1.2)-(0, 0) CurrentX = -3: CurrentY = -1 Print 數(shù)據(jù):; For i = 1 To UBound(a) Print a(i); b(i); ,; Next iEnd SubPrivate Sub menu1_Click() 繪制直方圖 zbx X1 = max / 2 / n w = X1 For i = 1 To n X2 = X1 + w Y2 = b(i) Line (X1, 0)-(X2, Y2), QBColor(Rnd * 15), BF CurrentX = X1 CurrentY = Y2 + max * 0.1 Print a(i) X1 = X2 + w Next iEnd SubPrivate Sub menu2_Click() 繪制折線圖 zbx w = max / 2 / n CurrentX = max / 2 / n: CurrentY = b(1) For i = 1 To n X = w * i Y = b(i) Line -(X, Y) DrawWidth = 10 PSet (X, Y) DrawWidth = 1 Next iEnd SubPrivate Sub menu3_Click() 繪制散點(diǎn)圖 zbx w = max / 2 / n DrawWidth = 10 For i = 1 To n X = i * w Y = b(i) PSet (X, Y) Next iEnd SubPrivate Sub menu4_Click() 繪制餅圖 zbx X = Abs(Me.ScaleHeight / 2) r = max / 4 For i = 1 To n Sum = Sum + b(i) Next i a1 = 0 FontSize = 10 For i = 1 To n a2 = a1 + 2 * 3.14159 * b(i) / Sum Me.FillStyle = 0 FillColor = QBColor(Rnd * 15) Circle (X, X), r, , -a1, -a2 CurrentX = X + r * Cos(a2 + a1) / 2) CurrentY = X + r * Sin(a2 + a1) / 2) Print Format(b(i) / Sum * 100, 0.00); % & & a(i) a1 = a2 Next iEnd SubPrivate Sub menu5_Click() 繪制立體直方圖 zbx w = max / 2 / n X1 = w For i = 1 To n X2 = X1 + w Y2 = b(i) Line (X1, 0)-(X2, Y2), QBColor(Rnd * 15), BF Line (X1, Y2)-(X2 - w / 2, Y2 + w / 2) Line -(X2 + w / 2, Y2 + w / 2) Line -(X2, Y2) Line (X2 + w / 2, Y2 + w / 2)-(X2 + w / 2, w / 2) Line -(X2, 0) X1 = X1 + 2 * w Next iEnd Sub結(jié) 論經(jīng)過(guò)半個(gè)月的努力，報(bào)告基本