校園量多超市管理信息系統(tǒng)課程設(shè)計(jì)

1、<p><b>　　工程技術(shù)學(xué)院</b></p><p><b>　　課程設(shè)計(jì)</b></p><p>　　題 目： 校園量多超市管理信息系統(tǒng) </p><p><b>　　目 錄</b></p>

2、;<p>　　一、課程設(shè)計(jì)任務(wù)書(shū) 1</p><p>　　二、 系統(tǒng)概述 2</p><p>　　三、 系統(tǒng)分析 3<

3、/p><p>　　1.1系統(tǒng)目標(biāo)總體描述2</p><p>　　1.2系統(tǒng)涉及的業(yè)務(wù)流程分析及描述與相關(guān)業(yè)務(wù)流程圖 3</p><p>　　1.3系統(tǒng)涉及的數(shù)據(jù)流程分析及描述和相關(guān)組織結(jié)構(gòu)圖 4</p><p>　　1.4系統(tǒng)涉及的數(shù)據(jù)流程分析及描述和相關(guān)數(shù)據(jù)流程圖 5</p><p>　　四 、

4、界面設(shè)計(jì)，窗口運(yùn)行狀況及設(shè)計(jì)代碼 6</p><p>　　3 界面設(shè)計(jì) 7</p><p>　　3.1系統(tǒng)主窗體設(shè)計(jì)及主界面的運(yùn)行 7</p><p>　　3.2主要程序源代碼

5、 12</p><p>　　五、課程設(shè)計(jì)結(jié)論 16</p><p><b>　　一、課程設(shè)計(jì)任務(wù)書(shū)</b></p><p><b>　　1、課程設(shè)計(jì)項(xiàng)目</b></p><p

6、>　　針對(duì)你較熟悉的一個(gè)中小型單位/公司的實(shí)際情況，對(duì)其管理業(yè)務(wù)和現(xiàn)有信息管理方案進(jìn)行調(diào)研，對(duì)其新的管理信息系統(tǒng)開(kāi)發(fā)提出規(guī)劃，并進(jìn)行系統(tǒng)分析（繪制其組織結(jié)構(gòu)圖、業(yè)務(wù)功能圖、業(yè)務(wù)流程圖、數(shù)據(jù)流程圖等）、系統(tǒng)設(shè)計(jì)（？），在設(shè)計(jì)中請(qǐng)利用VB、VC、C、Excel或Access等程序語(yǔ)言對(duì)主要的信息管理子系統(tǒng)進(jìn)行窗口化設(shè)計(jì)，并編寫(xiě)子程序代碼。</p><p><b>　　2、要求</b><

7、;/p><p>　　通過(guò)本課程設(shè)計(jì)，綜合利用該門(mén)課程所學(xué)的理論和實(shí)驗(yàn)知識(shí)與技能，對(duì)一個(gè)小型企業(yè)的信息管理意識(shí)、綜合措施與計(jì)算機(jī)系統(tǒng)方案進(jìn)行實(shí)際分析，并作優(yōu)化與改進(jìn)（改造）設(shè)計(jì)，要求分析設(shè)計(jì)的內(nèi)容考慮周全、實(shí)用，并具有遠(yuǎn)見(jiàn)性；系統(tǒng)設(shè)計(jì)方案合理，部分環(huán)節(jié)的程序編寫(xiě)正確。要求：（1）調(diào)研措施得當(dāng)，并能深入實(shí)際，獲取的信息較為全面、實(shí)用；（2）能查閱整理相關(guān)文獻(xiàn)資料，能按照課程設(shè)計(jì)的要求獨(dú)立進(jìn)行，能按規(guī)定的格式撰寫(xiě)；分析體現(xiàn)

8、的基礎(chǔ)理論知識(shí)扎實(shí)；（3）設(shè)計(jì)的綜合方案合理，技術(shù)得當(dāng)，體現(xiàn)一定的技術(shù)水平和遠(yuǎn)見(jiàn)性；（4）系統(tǒng)實(shí)現(xiàn)的技術(shù)路線可行，局部的程序編寫(xiě)正確。</p><p><b>　　3、計(jì)劃安排</b></p><p>　　依據(jù)學(xué)校課程安排，第三學(xué)期內(nèi)完成。</p><p><b>　　4、考核內(nèi)容和方式</b></p>&l

9、t;p>　　從以下幾個(gè)方面綜合權(quán)衡打分：</p><p>　?。?）調(diào)研工作（深入實(shí)際與資料查詢(xún)）深入的程度；</p><p>　?。?）分析與設(shè)計(jì)體現(xiàn)的理論知識(shí)水平；</p><p>　　（3）技術(shù)路徑與方法是否得當(dāng)；</p><p>　　（4）編寫(xiě)的程序的適用程度以及各子程序代碼正確與否；</p><p>　

10、?。?）運(yùn)行效果評(píng)價(jià)。</p><p><b>　　二、 系統(tǒng)概述</b></p><p><b>　　1 背景：</b></p><p>　　校園量多超市位于云南農(nóng)業(yè)大學(xué)天橋下，經(jīng)營(yíng)的業(yè)務(wù)范圍包括百貨，日用品，文具用品等多種商品。其營(yíng)運(yùn)模式是現(xiàn)代化企業(yè)經(jīng)營(yíng)管理模式，其管理信息系統(tǒng)是一套針對(duì)現(xiàn)代企業(yè)管理的需求，結(jié)合先進(jìn)企業(yè)

11、管理理念，運(yùn)用先進(jìn)的技術(shù)手段，精心開(kāi)發(fā)的軟件產(chǎn)品。本系統(tǒng)主要用于企業(yè)采購(gòu)、銷(xiāo)售、庫(kù)存、應(yīng)收、應(yīng)付、發(fā)票、銷(xiāo)售的管理。通過(guò)本軟件可以實(shí)現(xiàn)企業(yè)采購(gòu)、銷(xiāo)售、庫(kù)存、付款、收款、發(fā)票的集中式信息化管理，提高企業(yè)的管理水平與經(jīng)濟(jì)效益。 （1）、采購(gòu)管理：實(shí)現(xiàn)采購(gòu)單的制作、審核、執(zhí)行情況跟蹤、統(tǒng)計(jì)等 （2）、銷(xiāo)售管理：實(shí)現(xiàn)銷(xiāo)售單的制作、審核、執(zhí)行情況跟蹤、統(tǒng)計(jì)等（3）、庫(kù)存管理：實(shí)現(xiàn)入庫(kù)，出庫(kù)，盤(pán)點(diǎn)，調(diào)撥的管理 。由于本系統(tǒng)設(shè)計(jì)針對(duì)該超市的具體情況，

12、因此用戶(hù)需求的目的是通過(guò)該企業(yè)的</p><p><b>　　2需求調(diào)查：</b></p><p>　　從中總結(jié)出企業(yè)對(duì)管理信息系統(tǒng)的需求，然后根據(jù)這些需求設(shè)計(jì)出系統(tǒng)的方案。需求收集和分析是數(shù)據(jù)庫(kù)設(shè)計(jì)的第一階段。需求分析定義了軟件產(chǎn)品的各種用戶(hù)需求如功能、性能等，需求分析是否透徹、完整、正確是軟件項(xiàng)目成敗的關(guān)鍵。這一階段收集到的基礎(chǔ)數(shù)據(jù)是下一步設(shè)計(jì)概念結(jié)構(gòu)的基礎(chǔ)。從數(shù)

13、據(jù)庫(kù)設(shè)計(jì)的角度考慮，需求分析階段的目標(biāo)是:對(duì)現(xiàn)實(shí)世界要處理的對(duì)象(組織、部門(mén)、企業(yè)等)進(jìn)行詳細(xì)調(diào)查，在了解原系統(tǒng)的概況，確定新系統(tǒng)功的過(guò)程中，收集支持系統(tǒng)目標(biāo)的基礎(chǔ)數(shù)據(jù)及其處理，最重要的就是建立用戶(hù)數(shù)據(jù)模型。無(wú)論是采取哪種開(kāi)發(fā)策略，都需要訪問(wèn)用戶(hù)、記錄需求，并根據(jù)這些需求建立數(shù)據(jù)模型的原型，這樣的模型標(biāo)識(shí)了需要在數(shù)據(jù)庫(kù)中存儲(chǔ)的內(nèi)容和它們的結(jié)構(gòu)及相互關(guān)系。進(jìn)行數(shù)據(jù)建模要求既要有一定的行業(yè)知識(shí)，又要精通建模的方法和技巧。銷(xiāo)售管理模塊包括貨單

14、的錄入和維護(hù)；對(duì)銷(xiāo)售情況進(jìn)行統(tǒng)計(jì)；對(duì)商品的零售和批發(fā)進(jìn)行管理和付款的計(jì)算機(jī)操作等。進(jìn)貨管理模塊包括進(jìn)貨資料錄入和維護(hù);采購(gòu)訂單的錄入和維護(hù)和付款的計(jì)算機(jī)的操作等。和傳統(tǒng)管理模式相比較，使用本系統(tǒng)，毫無(wú)疑問(wèn)會(huì)大大提高超市的運(yùn)作效率，輔助提高超市的決策水平，管理水平，為降低經(jīng)營(yíng)成本， 提高效益，減</p><p><b>　　三、 系統(tǒng)分析</b></p><p><

15、;b>　　1 組織機(jī)構(gòu)圖</b></p><p><b>　　2 業(yè)務(wù)功能圖</b></p><p><b>　　3業(yè)務(wù)流程圖</b></p><p><b>　　4 數(shù)據(jù)流程圖 </b></p><p>　　四 、界面設(shè)計(jì)，窗口運(yùn)行狀況及設(shè)計(jì)代碼</p

16、><p><b>　　1.設(shè)計(jì)思路</b></p><p>　　校園量多超市管理系統(tǒng)主要涉及銷(xiāo)售員信息管理、商品信息管理和銷(xiāo)售信息管理，因此做如下處理：</p><p>　　每個(gè)銷(xiāo)售員對(duì)應(yīng)于一個(gè)唯一的銷(xiāo)售員編號(hào)。銷(xiāo)售員編號(hào)有4位數(shù)，前3選取101，后1位從0~4之間選??；</p><p>　　每件商品對(duì)應(yīng)于唯一的商品編號(hào)，商

17、品編號(hào)從1開(kāi)頭；</p><p>　　程序設(shè)計(jì)采用VB 6.0和Access數(shù)據(jù)庫(kù)進(jìn)行，二者連接采用Adodc和DataGrid控件</p><p><b>　　2、設(shè)計(jì)方案</b></p><p>　　在Access 數(shù)據(jù)庫(kù)中設(shè)計(jì)三張表格，分別為銷(xiāo)售員信息表、商品信息表、銷(xiāo)售信息表，銷(xiāo)售員在商品查詢(xún)時(shí)輸入自己的銷(xiāo)售員編號(hào)和密碼后就可以登錄商品

18、信息查詢(xún)系統(tǒng)進(jìn)行查詢(xún)信息。</p><p><b>　　3界面設(shè)計(jì)</b></p><p><b>　　4 運(yùn)行界面</b></p><p>　?、佥斎胝_銷(xiāo)售員編號(hào)及其密碼 </p><p><b>　　其運(yùn)行界面如下圖</b></p><p>　　②

19、輸入錯(cuò)誤銷(xiāo)售員編號(hào)或密碼</p><p><b>　　其運(yùn)行窗口如下圖</b></p><p>　?、墼谳斎胝_銷(xiāo)售員編號(hào)及密碼之后，在其運(yùn)行窗口中，輸入不存在的商品號(hào)或商品名稱(chēng)</p><p><b>　　其運(yùn)行窗口如下圖</b></p><p>　?、茌斎胝_商品號(hào)或商品名稱(chēng)，并且按正確方式查詢(xún)

20、</p><p><b>　　其運(yùn)行窗口如下圖</b></p><p>　?、蔹c(diǎn)擊返回查詢(xún)窗口，其界面會(huì)返回到銷(xiāo)售員密碼窗口</p><p><b>　　5 設(shè)計(jì)代碼</b></p><p>　?、貴orm1 “確定”按鈕程序代碼</p><p>　　Dim x As Str

21、ing, y As String</p><p>　　Private Sub Command1_Click()</p><p><b>　　x = ""</b></p><p><b>　　y = ""</b></p><p>　　Adodc1.Records

22、et.MoveFirst</p><p>　　Do Until Adodc1.Recordset.EOF</p><p>　　DataGrid1.Col = 0</p><p>　　If (Trim(Text1.Text) = Trim(DataGrid1.Text)) Then</p><p>　　x = Trim(Text1.Text)&

23、lt;/p><p>　　DataGrid1.Col = 2</p><p>　　If (Trim(Text2.Text) = Trim(DataGrid1.Text)) Then</p><p>　　y = Trim(Text2.Text)</p><p><b>　　End If</b></p><p&

24、gt;<b>　　End If</b></p><p>　　Adodc1.Recordset.MoveNext</p><p><b>　　Loop</b></p><p>　　If (x <> "" And y <> "") Then</p>

25、<p>　　Form1.Hide</p><p>　　Form2.Show</p><p><b>　　Else</b></p><p>　　MsgBox ("管理員編號(hào)或密碼不正確")</p><p><b>　　End If</b></p><p

26、><b>　　End Sub</b></p><p>　?、贔orm2 “按商品編號(hào)查詢(xún)”按鈕程序代碼</p><p>　　Private Sub Command1_Click()</p><p>　　Adodc2.Recordset.MoveFirst</p><p><b>　　x = "&

27、quot;</b></p><p>　　Do Until Adodc2.Recordset.EOF</p><p>　　DataGrid1.Col = 0</p><p>　　If (Trim(Text1.Text) = Trim(DataGrid1.Text)) Then</p><p>　　x = Trim(Text1.Tex

28、t)</p><p>　　DataGrid1.Col = 0</p><p>　　Text2.Text = DataGrid1.Text</p><p>　　DataGrid1.Col = 1</p><p>　　Text3.Text = DataGrid1.Text</p><p>　　DataGrid1.Col =

29、 2</p><p>　　Text4.Text = DataGrid1.Text</p><p>　　DataGrid1.Col = 3</p><p>　　Text5.Text = DataGrid1.Text</p><p>　　DataGrid1.Col = 4</p><p>　　Text6.Text = Da

30、taGrid1.Text</p><p>　　DataGrid1.Col = 5</p><p>　　Text7.Text = DataGrid1.Text</p><p><b>　　Exit Do</b></p><p><b>　　End If</b></p><p>

31、　　Adodc2.Recordset.MoveNext</p><p><b>　　Loop</b></p><p>　　If (x = "") Then</p><p>　　MsgBox ("經(jīng)查詢(xún)，無(wú)此商品入庫(kù)")</p><p><b>　　End If</b

32、></p><p><b>　　End Sub</b></p><p>　?、跢orm2 “按商品名稱(chēng)查詢(xún)”按鈕程序代碼</p><p>　　Private Sub Command2_Click()</p><p>　　Adodc2.Recordset.MoveFirst</p><p>&

33、lt;b>　　x = ""</b></p><p>　　Do Until Adodc2.Recordset.EOF</p><p>　　DataGrid1.Col = 1</p><p>　　If (Trim(Text1.Text) = Trim(DataGrid1.Text)) Then</p><p>

34、;　　x = Trim(Text1.Text)</p><p>　　DataGrid1.Col = 0</p><p>　　Text2.Text = DataGrid1.Text</p><p>　　DataGrid1.Col = 1</p><p>　　Text3.Text = DataGrid1.Text</p><p

35、>　　DataGrid1.Col = 2</p><p>　　Text4.Text = DataGrid1.Text</p><p>　　DataGrid1.Col = 3</p><p>　　Text5.Text = DataGrid1.Text</p><p>　　DataGrid1.Col = 4</p><p

36、>　　Text6.Text = DataGrid1.Text</p><p>　　DataGrid1.Col = 5</p><p>　　Text7.Text = DataGrid1.Text</p><p><b>　　Exit Do</b></p><p><b>　　End If</b>

37、</p><p>　　Adodc2.Recordset.MoveNext</p><p><b>　　Loop</b></p><p>　　If (x = "") Then</p><p>　　MsgBox ("經(jīng)查詢(xún)，無(wú)此商品入庫(kù)")</p><p>&l

38、t;b>　　End If</b></p><p><b>　　End Sub</b></p><p>　　④Form2 “查看銷(xiāo)售信息”按鈕程序代碼</p><p>　　Private Sub Command3_Click()</p><p>　　Form3.Show</p><p&

39、gt;　　Form2.Hide</p><p>　　Adodc2.Recordset.MoveFirst</p><p>　　Do Until Adodc2.Recordset.EOF</p><p>　　DataGrid1.Col = 1</p><p>　　If (Trim(Form2.Text1.Text) = Trim(Form3.T

40、ext1.Text)) Then</p><p>　　x = Trim(Text1.Text)</p><p>　　DataGrid2.Col = 0</p><p>　　Form3.Text1.Text = Form2.DataGrid2.Text</p><p>　　Form2.DataGrid2.Col = 1</p>&

41、lt;p>　　Form3.Text2.Text = Form2.DataGrid2.Text</p><p>　　Form2.DataGrid2.Col = 2</p><p>　　Form3.Text3.Text = Form2.DataGrid2.Text</p><p>　　Form2.DataGrid2.Col = 3</p><p

42、>　　Form3.Text4.Text = Form2.DataGrid2.Text</p><p>　　Form2.DataGrid2.Col = 4</p><p>　　Form3.Text5.Text = Form2.DataGrid2.Text</p><p><b>　　Exit Do</b></p><p&

43、gt;<b>　　End If</b></p><p>　　Form2.Adodc2.Recordset.MoveNext</p><p><b>　　Loop</b></p><p>　　If (x = "") Then</p><p>　　MsgBox ("經(jīng)查詢(xún)，

44、無(wú)此商品登記")</p><p><b>　　End If</b></p><p><b>　　End Sub</b></p><p>　?、軫orm2 “退出”按鈕程序代碼</p><p>　　Private Sub Command4_Click()</p><p&g

45、t;　　Form1.Show</p><p>　　Form2.Hide</p><p><b>　　End Sub</b></p><p>　?、轋orm3 “返回查詢(xún)窗口”按鈕程序代碼</p><p>　　Private Sub Command1_Click()</p><p>　　Form3.

46、Hide</p><p>　　Form1.Show</p><p><b>　　End Sub</b></p><p><b>　　五、課程設(shè)計(jì)結(jié)論</b></p><p>　　本次管理信息系統(tǒng)課程設(shè)計(jì)是對(duì)校園量多超市管理信息系統(tǒng)而進(jìn)行設(shè)計(jì)的。通過(guò)實(shí)地調(diào)研，收集資料，處理信息，對(duì)其經(jīng)營(yíng)管理業(yè)務(wù)和現(xiàn)有

47、銷(xiāo)售信息及其庫(kù)存管理而進(jìn)行系統(tǒng)分析，系統(tǒng)設(shè)計(jì)，窗口設(shè)計(jì)，并且編寫(xiě)了代碼。通過(guò)本次課程設(shè)計(jì)，學(xué)會(huì)了綜合利用《管理信息系統(tǒng)》這門(mén)課程之中的理論知識(shí)和試驗(yàn)技能。在專(zhuān)業(yè)指導(dǎo)老師的指導(dǎo)下，對(duì)校園量多超市管理信息系統(tǒng)進(jìn)行了設(shè)計(jì)，通過(guò)運(yùn)用課堂上所學(xué)的VB和Access等計(jì)算機(jī)技術(shù)知識(shí)對(duì)所收集的數(shù)據(jù)和信息進(jìn)行設(shè)計(jì)出來(lái)的，并且編寫(xiě)出了設(shè)計(jì)代碼，經(jīng)過(guò)運(yùn)行，編碼是正確的。通過(guò)了這次課程設(shè)計(jì)，我不僅大大提高了模型規(guī)劃、系統(tǒng)設(shè)計(jì)和軟件編程的能力，自身的各方面的素

48、質(zhì)也得到了提高。同時(shí)也培養(yǎng)了我的團(tuán)隊(duì)協(xié)作精神。這次課程設(shè)計(jì)不僅充實(shí)了我的計(jì)算機(jī)專(zhuān)業(yè)知識(shí)，擴(kuò)大了知識(shí)面，增強(qiáng)分析問(wèn)題和解決問(wèn)題的能力，也提高自學(xué)的能力與軟件開(kāi)發(fā)能力，為今后的工作打下了堅(jiān)實(shí)的基礎(chǔ)。</p><p>　　在開(kāi)發(fā)的過(guò)程中按照軟件工程的方法，貫徹結(jié)構(gòu)化的設(shè)計(jì)思想，運(yùn)用VFP數(shù)據(jù)庫(kù)開(kāi)發(fā)工具進(jìn)行數(shù)據(jù)庫(kù)設(shè)計(jì)。同時(shí)也了解了超市管理的基本運(yùn)作過(guò)程，增加管理經(jīng)驗(yàn)。整個(gè)所設(shè)計(jì)的系統(tǒng)，貫徹了超市整個(gè)經(jīng)營(yíng)和銷(xiāo)售環(huán)節(jié)，這將會(huì)