1、西安財經學院實踐教學活動周登記表姓 名： 信彥君 學 號： 0905170106 專 業： 計算機科學與技術 院 系： 信息學院 本校指導教師： 實踐單位指導教師： 西安財經學院教務處 制實踐教學開展時間2012年 7 月 9 日 2012 年 7 月 20 日 實踐形式（在選項后打）集中分散 實踐單位實踐地點本校指導教師許文麗職稱講師二級學院、系信息學計算機科學與技術實習單位指導教師職稱職務所在單位實踐內容及收獲本次實踐我與同組成員共同設計了超市進銷存管理系統，本系統采用VB.6.0平臺和大型數據庫Access進行開發，主要是處理商業企業商品的采購、庫存和銷售各個環節的活動，使用ADO.NE

2、T訪問數據庫。我查閱了軟件工程、系統設計方面的書籍，了解了系統建設的基本流程、總體布局設計以及系統開發前所需的一些準備工作，特別是系統需求分析的重要性。這次設計中雖然中間碰到了許多困難，許多功能還不夠完善，但我從中學到了許多以前書本上所不能學到的也不曾碰到過的問題，通過不斷的閱讀相關書籍，開發水平有了明顯提高，對系統的設計有了新的認識。通過這次設計，我已基本上掌握了系統的設計流程，同時也掌握了一些相關技術，增強了動手能力，并積累了使用軟件工程的思想來開發軟件的經驗，這對于我今后的工作和學習是非常有益的。實踐單位意見單位蓋章：年 月 日成績評定（綜合評語） 成績： 指導教師簽字： 、 年 月 日

3、系意見簽字（蓋章）： 年 月 日二級學院意見簽字（蓋章）： 年 月 日本科生實踐教學活動周實踐教學成果成果形式： 實踐報告+系統 成果名稱： 進銷存管理系統的設計與實現 學生姓名： 信彥君 學 號： 0905170106 專 業： 計算機科學與技術 班 級： 0901班 指導教師： 許文麗 完成時間： 2012 年 7 月 22 日目 錄一、緒論2（一）研究背景2（二）進銷存系統的現狀2（三）進銷存系統的研究意義2二、進銷存管理系統的分析4（一）需求分析4（二）可行性分析4（三）開發平臺與工具的選擇41.Visual Basic簡介52. Access簡介53. AOD.NET簡介5三 進銷存

4、管理系統的實現與測試7（一）系統設計目標7（二）系統功能模塊劃分7（三）系統結構圖8四、詳細設計9（一）開發及運行環境9（二）文件夾組織結構9（三）數據庫設計91.創建數據庫92.數據表設計10（四）程序開發121.程序運行結果122.創建工程123.創建系統主窗體124.創建數據訪問模塊135.實現系統各功能模塊14五、設計總結22參 考 文 獻23一、緒論（一）研究背景隨著國家的政治經濟政策的優化改革，使得國內中小企業得以蓬勃發展。可是隨著企業的發展，客戶數量的的為斷增多，財務工作繁雜化，庫存產品零亂等一系列問題也接踵而至，給企業經營者運作帶來了很大的困擾。信息技術的迅猛發展，科學經營管理

5、觀念的迅速傳播，使中小企業經營者逐漸認識到轉變企業經營管理理念，改善企業經營管理模式是企業適應時代的發展急需解決的問題。現代管理，應該建立在真實、有效的數據信息基礎之上，應該是一種科學的、理性的管理體制，而這種管理與經營的聯系與互助，又必須依賴于計算機的強大的數據統計功能，計算機管理系統便是實際的企業進銷問題與計算機強大數據統計功能相結合的產物。管理系統解決的了商業企業商品的進、銷、存、退、換、盤、損、殘、調、借、贈等一系列操作流程中的數據信息的處理問題，提供一系列的數據分析，幫助經營者合理的調整各個經營運作環節的運作節奏，并對商品流轉過程進行了全程跟蹤管理、相應款項流通的全程記錄管理和票據信

6、息統計的管理。因此進銷存管理系統的全面應用，規范業務流程、提高了企業的管理水平，提高資金流動的透明度，加快商品資金周轉速度，進而全面提高了企業的經營水平、進而全面提升了企業的經濟效益。（二） 進銷存系統的現狀當今，企業管理在很多方面、很大程度上都必須借助信息化的工具來完成，采用電腦管理進貨、庫存和銷售等諸多環節也已成為必然趨勢。在現代企業的物流管理中，一個良好的進銷存管理系統不僅能大大降低企業由于生產經營管理不善而產生的過多的成本，提高企業的辦事效率，降低企業在物流管理中不必要的人力物流財力損失，而且能使企業的運行機制更加規范合理，使企業在節省自身成本提高競爭優勢的同時，樹立好企業形象，形成帶

7、頭優勢，從而帶動整個行業的高效發展及社會經濟效率的整體素質的提高。（三）進銷存系統的研究意義企業經營如逆水行舟不進則退。每一個努力發展的企業都明白，先進管理的重要作用，引進先進管理系統使企業經營變得規范、合理。進銷存管理系統無論是在功能設計還是業務流程上都盡可能做到滿足經營管理運作流程的需求，并且操作方便、功能強大，即使操作者對計算機知識一竅不通也能一用就會。它強化庫存管理，規范業務流程，提高資金管理的透明度，加快商品資金周轉，是企業經營管理中數據分析中必不可少的管理工具。本系統的開發適用于多個行業，可以幫助企業快速有效管理進貨、銷售、庫存等各項業務，合理控制進銷存各個環節，提高資金利用率，實

8、現管理高效率和實時性。二、進銷存管理系統的分析進銷存管理是企業日常經營管理中十分重要的一個組成部分，傳統的手工管理方式呈現出越來越多的弊端。在手工管理模式下，統計，匯總處理時的工作量極其繁重，處理效率非常低，領導也無法及時了解企業資金占用的實際狀況。通過報表管理，企業可以直觀分析企業的進銷存情況，提高企業的競爭能力。 （一）需求分析該系統的設計應具備以下功能：1.系統具有良好的人機界面，易學好懂、簡捷實用。2.規范、完善的基礎信息設置，提供快速、準確的處理進、銷、存、盤點等業務模式，能夠實現商品入庫、入庫、商品銷售、銷售退貨、庫存管理（調貨、盤點）報損管理，供貨商管理，銷售分析等操作。3.操作

9、簡單易行，查詢靈活方便，支持多條件查詢，數據存儲安全可靠。4.支持多人操作，要求有權限分配功能。在相應的權限下，刪除數據方便簡單、數據穩定性強。5.系統維護方便可靠，有較高的安全性，滿足實用性、先進性的要求。（二）可行性分析隨著經濟的全球化以及中國經濟改革的逐漸深化，中小企業面臨著越來越激烈的競爭，改善企業內部以及整個供應鏈各個環節的管理、調度及資源配置，迅速適應客戶的新需求和市場新機遇的能力，是企業贏得競爭勝利的決定性因素，進銷存管理系統的開發是提高企業競爭力的最有效的方法之一。進銷存管理系統的開發實現了從進貨、庫存、到銷售的一體化管理。提高了管理水平和工作效率，最大限度減少了手工操作帶來的

10、錯誤。（三）開發平臺與工具的選擇本系統后臺數據庫采用Microsoft Office Access，該數據庫系統在安全性、準確性、運行速度方面有絕對的優勢，并且處理數據量大、效率高；以VB作為開發語言，采用Visual Basic 6.0中文版作為開發工具，采用ADO.NET對數據庫進行訪問，同時建立ODBC數據庫接口,可與Access數據庫無縫連接。1.Visual Basic簡介微軟公司的Visual Basic是一套完整Windows系統軟件開發工具，用于開發Windows環境下的各類應用程序，是一種可視化、真正面向對象、采用事件驅動方式的結構化高級程序設計語言和工具的完美集成。它編程簡

11、單、方便、功能強大，具有與其它語言的良好接口。Visual Basic在數據庫開發方面比其他語言也有優勢，特別是6.0版本較以前的有相當大的變化，從數據源維護、數據訪問等都有良好的表現，配合后臺服務器更能顯示界面的獨到之處。2. Access簡介Microsoft Access是一種關系式數據庫，關系式數據庫由一系列表組成，表又由一系列行和列組成，每一行是一個記錄，每一列是一個字段，每個字段有一個字段名，字段名在一個表中不能重復。Access數據庫以文件形式保存，文件的擴展名是MDB。Access 數據庫由七種對象組成，它們是表、查詢、窗體、報表、宏、頁和模塊。表(Table) 表是數據庫的基

12、本對象，是創建其他5種對象的基礎。表由記錄組成，記錄由字段組成，表用來存貯數據庫的數據，故又稱數據表。查詢(Query)查詢可以按索引快速查找到需要的記錄，按要求篩選記錄并能連接若干個表的字段組成新表。窗體(Form)窗體提供了一種方便的瀏覽、輸入及更改數據的窗口。還可以創建子窗體顯示相關聯的表的內容。窗體也稱表單。報表(Report)報表的功能是將數據庫中的數據分類匯總，然后打印出來，以便分析。宏(Macro)宏相當于DOS中的批處理，用來自動執行一系列操作。Access列出了一些常用的操作供用戶選擇，使用起來十分方便。模塊(Module)模塊的功能與宏類似，但它定義的操作比宏更精細和復雜，

13、用戶可以根據自己的需要編寫程序。模塊使用Visual Basic編程。頁是一種特殊的直接連接到數據庫中數據的一種WEB頁。通過數據訪問頁將數據發布到Internet 或Intranet上，并可以適用瀏覽器進行數據的維護和操作。3. AOD.NET簡介ADO.NET是.NET Framework的重要組成部分，ADO.NET中包含用于連接至數據源、提交查詢以及處理結果的類，利用ADO.NET中最主要的非連接對象DataSet(數據集)能以脫機方式處理數據，可以對數據進行排序、搜索、篩選等操作。使用ADO.NET可以對多種數據源中的數據進行有效處理，從而輕松地在.NET Framework中創建出

14、分布式、數據共享的應用程序。下面簡單介紹下.NET Framework數據訪問對象.NET的數據訪問對象主要包括四個對象：Connection、Command、DataReader和DataAdapter。針對不同的數據源提供了不同的對象與之對應。Connection對象提供與數據源的連接；Command對象用于執行SQL命令，主要包括檢索數據、修改數據以及運行存儲過程等命令語句；DataReader對象從數據源中提供一個只讀的、前向的高性能數據流；DataAdapter對象在DataSet對象和數據源之間，起到了橋梁的作用，可以用來填充數據集，并可將修改結果更新回數據庫。三 進銷存管理系統的

15、實現與測試（一）系統設計目標該系統的制作目標如下：1.具有完善、美觀的網站界面，以便用戶可以高效的使用。2.操作簡單方便，系統信息齊全并分類清晰明確。3.數據信息完善，存儲安全、可靠。4.提供靈活、方便的權限設置功能，使整個系統的管理分工明確。5.強大的查詢功能，為管理員保證數據查詢的靈活性。6.網站維護有較強的可靠性與安全性，并滿足實用性、先進性的要求。（二）系統功能模塊劃分該進銷存管理系統主要由商品類型管理、商品管理、銷售管理、庫存管理、報損管理、供貨商管理、系統管理等模塊以及樹形列表組成，具體劃分如下：商品類型管理模塊：用來添加超市所增加的商品類型，以便于更好的管理，其由添加，修改，刪除

16、三個選項構成，每一選項中有類型名和說明構成。修改商品類型的時候需在樹形列表中選擇所需修改的商品類型，刪除時則會彈出對話框。商品管理模塊：用來記錄商品的具體信息，在這一模塊中同樣有增刪改三個選項，在增刪改操作時，都需要在樹形列表中選擇商品類型，在添加單中有商品名，商品類型，庫存量，商品介紹以及備注各選項銷售管理模塊：用于記錄超市的銷售情況，以便于更好的使超市運轉。這一模塊中同樣有增刪改三個選項來及時的更新數據存儲。庫存管理模塊：用于管理超市的庫存信息。“庫存查詢”用于查詢超市商品的庫存情況。報損管理模塊：該模塊就是用于及時的更新記錄超市的商品存儲情況對商品的影響。同樣具有增刪改三個選項。系統管理

17、模塊：該模塊最重要的就是操作員的權限管理，即用戶管理，在用戶管理中可以增刪改操作員的權限信息。樹形列表：該列表可以使商品的基本情況一目了然，在列表中列出了超市所有的商品類型，而其所在類型下的商品則會顯示在右邊的視圖中，便于統計商品。（三）系統結構圖登陸界面主界面商 品 類 型 管 理商 品 管 理進 貨 管 理銷 售 管 理報 損 管 理供 貨 商 管 理銷 售 分 析幫 助系 統 圖2-1系統功能結構圖四、詳細設計（一）開發及運行環境系統開發平臺：Microsoft Visual Basic 6.0系統開發語言：VB數據庫管理系統軟件：Microsoft Office Access 2003

18、（二）文件夾組織結構在進行系統開發之前，需要規劃文件夾組織結構，也就是說，建立多個文件夾，對各個功能模塊進行劃分，實現統一管理。這樣做的好處在于：易于開發、管理和維護。本系統的文件夾組織結構如圖4-1所示。圖4-1文件夾組織結構圖（三）數據庫設計1.創建數據庫創建數據庫打開Access企業管理器，新建一個數據庫，將其命名為超市進銷存系統。然后點擊使用設計器創建表來建自己所需的數據表。如表4-1。表4-1數據表用途表數據表名稱數據表用途用戶表保存系統使用者的信息商品類型表保存系統所存儲的所有商品類型商品表保存超市經營商品的資料信息供貨商表保存超市供貨商的資料信息進貨表保存超市所購入商品的資料信息

19、銷售表保存超市銷售商品的資料信息報損表保存超市商品報損的資料信息2.數據表設計 用戶表： 圖4-2數據庫用戶表設計商品表： 圖4-3數據庫商品表設計商品類型表： 圖4-4數據庫商品類型表設計報損表： 圖4-5數據庫報損表設計銷售表： 圖4-6數據庫銷售表設計進貨表：圖4-7數據庫進貨表設計供貨商表： 圖4-8數據庫供貨商表設計（四）程序開發采用多文檔窗體程序，每一功能對應一個子窗體。1.程序運行結果如圖：圖4-9程序運行結果截圖選擇主菜單中的各菜單項即可進入相應的功能，例如可以選擇【進貨管理】|【登記進貨信息】菜單命令，在其中輸入進貨的商品、數量、價格等信息，保存后單擊【確定】按鈕，商品庫存就

20、會增加。2.創建工程啟動Microsoft Visual Basic 6.0,在主菜單中選擇【文件】|【新建工程】命令，選擇【標準EXE】建立新的工程，后在屬性的【名稱】中更名為超市進銷存管理系統。3.創建系統主窗體(1)用系統默認生成的主窗體作為主窗體，并將其對應的文件更名為frmMain.frm,布局如圖：圖4-10程序主窗體截圖(2)在VB6.0的【工具】下拉菜單中，選擇【菜單編輯器】，開始編輯表結構的菜單。4.創建數據訪問模塊各個窗體均需要對數據庫進行訪問，故而建立了一個DB模塊，這樣可以使對數據庫的訪問更加快捷簡單，主要代碼如下Option ExplicitPublic g_Conn

21、 As Connection Public g_DBPath As StringPublic Sub DBMain() g_DBPath = App.Path & "DB超市進銷存管理系統.mdb" If ConnectToDatabase(DBAccess) = False Then Err.Raise vbObjectError + 1, , "連接數據庫出錯！" End IfEnd SubPublic Function NextID(ByVal strTable As String, ByVal strId As String) As Lo

22、ng Dim rs As Recordset Set rs = g_Conn.Execute("SELECT MAX(" & strId & ") FROM " & strTable) If IsNull(rs(0) Then NextID = 1 Else NextID = rs(0).Value + 1 End IfEnd Function5.實現系統各功能模塊實現商品信息登記模塊：利用可視化的方法建立數據庫的連接及對數據庫進行操作以實現商品商品信息登記功能。（1）新建窗體，將其【名稱】改為“frmMerch”并在窗體上分別添

23、加一個Frame控件，五個Label控件，四個TextBox控件，兩個Button控件，兩個ComboBox控件。布局如圖所示：圖4-13商品信息模塊窗體截圖（2）各控件的屬性設置如表所示：表4-4各控件屬性表控件類型對象名屬性取值（說明）FramefraMerchCaption商品信息LabelLabel1Caption商品名LabelLabel2Caption商品介紹LabelLabel3Caption備注LabelLabel4Caption商品類型LabelLabel5Caption庫存量CommandButtonOKButtonCaption確定CommandButtonCancelB

24、uttonCaption取消TextBoxtxtNameTextTextBoxtxtStorageTextTextBoxtxtIntroTextTextBoxtxtRemarkTextComboBoxcboTypeTextComboBoxcboUnitText （3）frmMerch窗體主要代碼如下：Option ExplicitPrivate OK As Boolean '確定用戶按了OK還是CANCEL按鈕Private m_obj As clsMerch '數據對象，用來存儲用戶輸入數據Public m_ViewType As gxcViewType '顯示狀態，

25、指添加還是修改Private m_TypeId As Long '商品類型'根據是“新增”還是修改，確定顯示內容Private Sub SetStatus() '設置控件默認值 Call SetDefaultValue '設置狀態 Select Case m_ViewType Case vtadd '添加 CancelButton.Visible = True OKButton.Caption = "確定" Case vtModify '修改 CancelButton.Visible = True OKButton.Capti

26、on = "保存" End SelectEnd Sub'打開對話框，并傳出用戶輸入數據Public Function ShowDlg(ByRef obj As Object, _ ByVal eViewType As gxcViewType, _ Optional nTypeId As Long = -1) As Boolean '保存數據 Set m_obj = obj '用戶輸入數據存放于此對象中 m_ViewType = eViewType '對話框狀態 If nTypeId = -1 And (Not m_obj Is Nothing

27、) Then m_TypeId = m_obj.TypeId Else m_TypeId = nTypeId End If '根據新增、編輯或查看設置顯示內容SetStatus '顯示對話框 OK = False Me.Show vbModal If OK = False Then ShowDlg = False Exit Function End If '保存數據 Set obj = m_obj '返回并釋放對話框 ShowDlg = True Unload MeEnd Function'設置控件默認值Private Sub SetDefaultVal

28、ue() Dim ctl As Control Dim i As Integer '如果是新增，則清空所有文本框 '此處判斷 m_obj為空與判斷m_ViewType = vtAdd等效，但更安全 If m_obj Is Nothing Then For Each ctl In Controls If TypeOf ctl Is TextBox Then ctl.Text = "" End If Next Else '用傳入對象的值更新數據 With m_obj txtName.Text = .MerchName txtStorage.Text =

29、.Storage cboUnit.ListIndex = 0 txtIntro.Text = .Introduce txtRemark.Text = .Remark For i = 0 To cboType.ListCount - 1 If cboType.ItemData(i) = m_TypeId Then cboType.ListIndex = i '商品類型Id Exit For End If Next i End With End If End Sub'檢查輸入有效性Private Function CheckValid() As Boolean If txtName

30、.Text = "" _ Or txtIntro.Text = "" Then MsgBox "請填寫完畢以上各項內容" CheckValid = False Exit Function End If If cboType.Text = "" Then MsgBox "請填寫完畢以上各項內容" CheckValid = False Exit Function End If If Not IsNumeric(txtStorage.Text) Then MsgBox "庫存量請輸入數字&q

31、uot; Exit Function End If CheckValid = True End Function'保存數據Private Sub SaveValue() '給“成員變量”對象賦值 With m_obj '注意以下利用RealString函數替換去除輸入中的單引號 .MerchName = RealString(txtName.Text) .Remark = RealString(txtRemark.Text) .Storage = RealString(txtStorage.Text) .Introduce = RealString(txtIntro.T

32、ext) .TypeId = cboType.ItemData(cboType.ListIndex) '商品類型Id .TypeName = cboType.Text End WithEnd Sub'取消按鈕Private Sub CancelButton_Click() Unload MeEnd SubPrivate Sub Form_Load() Dim opMType As New clsOpMType opMType.FillCombo cboTypeEnd SubPrivate Sub fraMerch_DragDrop(Source As Control, X As

33、 Single, Y As Single)End Sub'確定按鈕Private Sub OKButton_Click() OK = True '檢測輸入有效性 If Not CheckValid Then Exit Sub '如果是新增狀態，則初始化一個數據對象 If m_ViewType = vtadd Then Set m_obj = New clsMerch '保存用戶輸入 SaveValue Me.HideEnd Sub到此完成了商品信息登記的功能模塊，運行程序，可以看到結果如圖所示：圖4-14商品信息登記模塊操作效果圖實現銷售信息登記功能 ：(1)新

34、建一個窗體，Name屬性為“frmSell”并在窗體上分別添加一個Frame控件、一個DTPicker控件、六個Label控件、三個TextBox控件、兩個Button控件、兩個ComboBox控件。如圖所示：圖4-16添加控件后的窗體截圖(2)各控件的屬性設置如下表：表4-6各控件屬性設置控件類型對象名屬性取值（說明）FramefraSellCaption銷售信息ComboBoxcboMerchNameTextComboBoxcboUnitTextLabelLabel1Caption售出商品LabelLabel2Caption統計時間LabelLabel3Caption售出數量Label L

35、abelLabel4Caption售出單價TextBoxtxtCountTextTextBoxtxtPriceTextTextBoxtxtRemarkTextCommandButtonOKButtonCaption確定CommandButtonCancelButtonCaption取消DTPickerdtpRegDate自此銷售信息登記模塊已基本完成，運行程序，結果如下圖所示：圖4-17運行操作后的窗體截圖以上所展示的是整個程序的部分過程。五、設計總結在此次系統設計過程中，我首先了解了系統建設的基本流程、總體布局設計以及系統開發前所需的一些準備工作，特別是系統需求分析的重要性，這樣做到了心中有數，先把網上管理系統需要的功能劃分成幾個大模塊，然后再思考進行細分。腦子里逐步形成了系統的框架，開始進行布局設計，經過反復的修改才讓自己滿意，以為自己的這次設計開始順利起來時，在數據庫建表過程中又出現了問題，因為這方面的知識不夠成熟，沒有事先完整的設計好數據項就開始建立了數據關系，到后