超市進銷售管理系統(tǒng)

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

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

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

4、cess簡介53. AOD.NET簡介5三 進銷存管理系統(tǒng)的實現(xiàn)與測試7（一）系統(tǒng)設計目標7（二）系統(tǒng)功能模塊劃分7（三）系統(tǒng)結構圖8四、詳細設計9（一）開發(fā)及運行環(huán)境9（二）文件夾組織結構9（三）數(shù)據(jù)庫設計91.創(chuàng)建數(shù)據(jù)庫92.數(shù)據(jù)表設計10（四）程序開發(fā)121.程序運行結果122.創(chuàng)建工程123.創(chuàng)建系統(tǒng)主窗體124.創(chuàng)建數(shù)據(jù)訪問模塊135.實現(xiàn)系統(tǒng)各功能模塊14五、設計總結22參 考 文 獻2324計算機專業(yè)本科實踐教學 進銷存管理系統(tǒng)的應用與實現(xiàn)一、緒論（一）研究背景隨著國家的政治經濟政策的優(yōu)化改革，使得國內中小企業(yè)得以蓬勃發(fā)展?？墒请S著企業(yè)的發(fā)展，客戶數(shù)量的的為斷增多，財務工作繁雜化

5、，庫存產品零亂等一系列問題也接踵而至，給企業(yè)經營者運作帶來了很大的困擾。信息技術的迅猛發(fā)展，科學經營管理觀念的迅速傳播，使中小企業(yè)經營者逐漸認識到轉變企業(yè)經營管理理念，改善企業(yè)經營管理模式是企業(yè)適應時代的發(fā)展急需解決的問題?，F(xiàn)代管理，應該建立在真實、有效的數(shù)據(jù)信息基礎之上，應該是一種科學的、理性的管理體制，而這種管理與經營的聯(lián)系與互助，又必須依賴于計算機的強大的數(shù)據(jù)統(tǒng)計功能，計算機管理系統(tǒng)便是實際的企業(yè)進銷問題與計算機強大數(shù)據(jù)統(tǒng)計功能相結合的產物。管理系統(tǒng)解決的了商業(yè)企業(yè)商品的進、銷、存、退、換、盤、損、殘、調、借、贈等一系列操作流程中的數(shù)據(jù)信息的處理問題，提供一系列的數(shù)據(jù)分析，幫助經營者合理

6、的調整各個經營運作環(huán)節(jié)的運作節(jié)奏，并對商品流轉過程進行了全程跟蹤管理、相應款項流通的全程記錄管理和票據(jù)信息統(tǒng)計的管理。因此進銷存管理系統(tǒng)的全面應用，規(guī)范業(yè)務流程、提高了企業(yè)的管理水平，提高資金流動的透明度，加快商品資金周轉速度，進而全面提高了企業(yè)的經營水平、進而全面提升了企業(yè)的經濟效益。（二） 進銷存系統(tǒng)的現(xiàn)狀當今，企業(yè)管理在很多方面、很大程度上都必須借助信息化的工具來完成，采用電腦管理進貨、庫存和銷售等諸多環(huán)節(jié)也已成為必然趨勢。在現(xiàn)代企業(yè)的物流管理中，一個良好的進銷存管理系統(tǒng)不僅能大大降低企業(yè)由于生產經營管理不善而產生的過多的成本，提高企業(yè)的辦事效率，降低企業(yè)在物流管理中不必要的人力物流財力

7、損失，而且能使企業(yè)的運行機制更加規(guī)范合理，使企業(yè)在節(jié)省自身成本提高競爭優(yōu)勢的同時，樹立好企業(yè)形象，形成帶頭優(yōu)勢，從而帶動整個行業(yè)的高效發(fā)展及社會經濟效率的整體素質的提高。（三）進銷存系統(tǒng)的研究意義企業(yè)經營如逆水行舟不進則退。每一個努力發(fā)展的企業(yè)都明白，先進管理的重要作用，引進先進管理系統(tǒng)使企業(yè)經營變得規(guī)范、合理。進銷存管理系統(tǒng)無論是在功能設計還是業(yè)務流程上都盡可能做到滿足經營管理運作流程的需求，并且操作方便、功能強大，即使操作者對計算機知識一竅不通也能一用就會。它強化庫存管理，規(guī)范業(yè)務流程，提高資金管理的透明度，加快商品資金周轉，是企業(yè)經營管理中數(shù)據(jù)分析中必不可少的管理工具。本系統(tǒng)的開發(fā)適用于

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

9、商品入庫、入庫、商品銷售、銷售退貨、庫存管理（調貨、盤點）報損管理，供貨商管理，銷售分析等操作。3.操作簡單易行，查詢靈活方便，支持多條件查詢，數(shù)據(jù)存儲安全可靠。4.支持多人操作，要求有權限分配功能。在相應的權限下，刪除數(shù)據(jù)方便簡單、數(shù)據(jù)穩(wěn)定性強。5.系統(tǒng)維護方便可靠，有較高的安全性，滿足實用性、先進性的要求。（二）可行性分析隨著經濟的全球化以及中國經濟改革的逐漸深化，中小企業(yè)面臨著越來越激烈的競爭，改善企業(yè)內部以及整個供應鏈各個環(huán)節(jié)的管理、調度及資源配置，迅速適應客戶的新需求和市場新機遇的能力，是企業(yè)贏得競爭勝利的決定性因素，進銷存管理系統(tǒng)的開發(fā)是提高企業(yè)競爭力的最有效的方法之一。進銷存管理

10、系統(tǒng)的開發(fā)實現(xiàn)了從進貨、庫存、到銷售的一體化管理。提高了管理水平和工作效率，最大限度減少了手工操作帶來的錯誤。（三）開發(fā)平臺與工具的選擇本系統(tǒng)后臺數(shù)據(jù)庫采用Microsoft Office Access，該數(shù)據(jù)庫系統(tǒng)在安全性、準確性、運行速度方面有絕對的優(yōu)勢，并且處理數(shù)據(jù)量大、效率高；以VB作為開發(fā)語言，采用Visual Basic 6.0中文版作為開發(fā)工具，采用ADO.NET對數(shù)據(jù)庫進行訪問，同時建立ODBC數(shù)據(jù)庫接口,可與Access數(shù)據(jù)庫無縫連接。1.Visual Basic簡介微軟公司的Visual Basic是一套完整Windows系統(tǒng)軟件開發(fā)工具，用于開發(fā)Windows環(huán)境下的各類

11、應用程序，是一種可視化、真正面向對象、采用事件驅動方式的結構化高級程序設計語言和工具的完美集成。它編程簡單、方便、功能強大，具有與其它語言的良好接口。Visual Basic在數(shù)據(jù)庫開發(fā)方面比其他語言也有優(yōu)勢，特別是6.0版本較以前的有相當大的變化，從數(shù)據(jù)源維護、數(shù)據(jù)訪問等都有良好的表現(xiàn)，配合后臺服務器更能顯示界面的獨到之處。2. Access簡介Microsoft Access是一種關系式數(shù)據(jù)庫，關系式數(shù)據(jù)庫由一系列表組成，表又由一系列行和列組成，每一行是一個記錄，每一列是一個字段，每個字段有一個字段名，字段名在一個表中不能重復。Access數(shù)據(jù)庫以文件形式保存，文件的擴展名是MDB。Acc

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

13、作供用戶選擇，使用起來十分方便。模塊(Module)模塊的功能與宏類似，但它定義的操作比宏更精細和復雜，用戶可以根據(jù)自己的需要編寫程序。模塊使用Visual Basic編程。頁是一種特殊的直接連接到數(shù)據(jù)庫中數(shù)據(jù)的一種WEB頁。通過數(shù)據(jù)訪問頁將數(shù)據(jù)發(fā)布到Internet 或Intranet上，并可以適用瀏覽器進行數(shù)據(jù)的維護和操作。3. AOD.NET簡介ADO.NET是.NET Framework的重要組成部分，ADO.NET中包含用于連接至數(shù)據(jù)源、提交查詢以及處理結果的類，利用ADO.NET中最主要的非連接對象DataSet(數(shù)據(jù)集)能以脫機方式處理數(shù)據(jù)，可以對數(shù)據(jù)進行排序、搜索、篩選等操作。

14、使用ADO.NET可以對多種數(shù)據(jù)源中的數(shù)據(jù)進行有效處理，從而輕松地在.NET Framework中創(chuàng)建出分布式、數(shù)據(jù)共享的應用程序。下面簡單介紹下.NET Framework數(shù)據(jù)訪問對象.NET的數(shù)據(jù)訪問對象主要包括四個對象：Connection、Command、DataReader和DataAdapter。針對不同的數(shù)據(jù)源提供了不同的對象與之對應。Connection對象提供與數(shù)據(jù)源的連接；Command對象用于執(zhí)行SQL命令，主要包括檢索數(shù)據(jù)、修改數(shù)據(jù)以及運行存儲過程等命令語句；DataReader對象從數(shù)據(jù)源中提供一個只讀的、前向的高性能數(shù)據(jù)流；DataAdapter對象在DataSet

15、對象和數(shù)據(jù)源之間，起到了橋梁的作用，可以用來填充數(shù)據(jù)集，并可將修改結果更新回數(shù)據(jù)庫。三 進銷存管理系統(tǒng)的實現(xiàn)與測試（一）系統(tǒng)設計目標該系統(tǒng)的制作目標如下：1.具有完善、美觀的網站界面，以便用戶可以高效的使用。2.操作簡單方便，系統(tǒng)信息齊全并分類清晰明確。3.數(shù)據(jù)信息完善，存儲安全、可靠。4.提供靈活、方便的權限設置功能，使整個系統(tǒng)的管理分工明確。5.強大的查詢功能，為管理員保證數(shù)據(jù)查詢的靈活性。6.網站維護有較強的可靠性與安全性，并滿足實用性、先進性的要求。（二）系統(tǒng)功能模塊劃分該進銷存管理系統(tǒng)主要由商品類型管理、商品管理、銷售管理、庫存管理、報損管理、供貨商管理、系統(tǒng)管理等模塊以及樹形列表組

16、成，具體劃分如下：商品類型管理模塊：用來添加超市所增加的商品類型，以便于更好的管理，其由添加，修改，刪除三個選項構成，每一選項中有類型名和說明構成。修改商品類型的時候需在樹形列表中選擇所需修改的商品類型，刪除時則會彈出對話框。商品管理模塊：用來記錄商品的具體信息，在這一模塊中同樣有增刪改三個選項，在增刪改操作時，都需要在樹形列表中選擇商品類型，在添加單中有商品名，商品類型，庫存量，商品介紹以及備注各選項銷售管理模塊：用于記錄超市的銷售情況，以便于更好的使超市運轉。這一模塊中同樣有增刪改三個選項來及時的更新數(shù)據(jù)存儲。庫存管理模塊：用于管理超市的庫存信息?！皫齑娌樵儭庇糜诓樵兂猩唐返膸齑媲闆r。報

17、損管理模塊：該模塊就是用于及時的更新記錄超市的商品存儲情況對商品的影響。同樣具有增刪改三個選項。系統(tǒng)管理模塊：該模塊最重要的就是操作員的權限管理，即用戶管理，在用戶管理中可以增刪改操作員的權限信息。樹形列表：該列表可以使商品的基本情況一目了然，在列表中列出了超市所有的商品類型，而其所在類型下的商品則會顯示在右邊的視圖中，便于統(tǒng)計商品。（三）系統(tǒng)結構圖登陸界面主界面商 品 類 型 管 理商 品 管 理進 貨 管 理銷 售 管 理報 損 管 理供 貨 商 管 理銷 售 分 析幫 助系 統(tǒng) 圖2-1系統(tǒng)功能結構圖四、詳細設計（一）開發(fā)及運行環(huán)境系統(tǒng)開發(fā)平臺：Microsoft Visual Basi

18、c 6.0系統(tǒng)開發(fā)語言：VB數(shù)據(jù)庫管理系統(tǒng)軟件：Microsoft Office Access 2003（二）文件夾組織結構在進行系統(tǒng)開發(fā)之前，需要規(guī)劃文件夾組織結構，也就是說，建立多個文件夾，對各個功能模塊進行劃分，實現(xiàn)統(tǒng)一管理。這樣做的好處在于：易于開發(fā)、管理和維護。本系統(tǒng)的文件夾組織結構如圖4-1所示。圖4-1文件夾組織結構圖（三）數(shù)據(jù)庫設計1.創(chuàng)建數(shù)據(jù)庫創(chuàng)建數(shù)據(jù)庫打開Access企業(yè)管理器，新建一個數(shù)據(jù)庫，將其命名為超市進銷存系統(tǒng)。然后點擊使用設計器創(chuàng)建表來建自己所需的數(shù)據(jù)表。如表4-1。表4-1數(shù)據(jù)表用途表數(shù)據(jù)表名稱數(shù)據(jù)表用途用戶表保存系統(tǒng)使用者的信息商品類型表保存系統(tǒng)所存儲的所有商

19、品類型商品表保存超市經營商品的資料信息供貨商表保存超市供貨商的資料信息進貨表保存超市所購入商品的資料信息銷售表保存超市銷售商品的資料信息報損表保存超市商品報損的資料信息2.數(shù)據(jù)表設計 用戶表： 圖4-2數(shù)據(jù)庫用戶表設計商品表： 圖4-3數(shù)據(jù)庫商品表設計商品類型表： 圖4-4數(shù)據(jù)庫商品類型表設計報損表： 圖4-5數(shù)據(jù)庫報損表設計銷售表： 圖4-6數(shù)據(jù)庫銷售表設計進貨表：圖4-7數(shù)據(jù)庫進貨表設計供貨商表： 圖4-8數(shù)據(jù)庫供貨商表設計（四）程序開發(fā)采用多文檔窗體程序，每一功能對應一個子窗體。1.程序運行結果如圖：圖4-9程序運行結果截圖選擇主菜單中的各菜單項即可進入相應的功能，例如可以選擇【進貨管理

20、】|【登記進貨信息】菜單命令，在其中輸入進貨的商品、數(shù)量、價格等信息，保存后單擊【確定】按鈕，商品庫存就會增加。2.創(chuàng)建工程啟動Microsoft Visual Basic 6.0,在主菜單中選擇【文件】|【新建工程】命令，選擇【標準EXE】建立新的工程，后在屬性的【名稱】中更名為超市進銷存管理系統(tǒng)。3.創(chuàng)建系統(tǒng)主窗體(1)用系統(tǒng)默認生成的主窗體作為主窗體，并將其對應的文件更名為frmMain.frm,布局如圖：圖4-10程序主窗體截圖(2)在VB6.0的【工具】下拉菜單中，選擇【菜單編輯器】，開始編輯表結構的菜單。4.創(chuàng)建數(shù)據(jù)訪問模塊各個窗體均需要對數(shù)據(jù)庫進行訪問，故而建立了一個DB模塊，這

21、樣可以使對數(shù)據(jù)庫的訪問更加快捷簡單，主要代碼如下Option ExplicitPublic g_Conn As Connection Public g_DBPath As StringPublic Sub DBMain() g_DBPath = App.Path & DB超市進銷存管理系統(tǒng).mdb If ConnectToDatabase(DBAccess) = False Then Err.Raise vbObjectError + 1, , 連接數(shù)據(jù)庫出錯！ End IfEnd SubPublic Function NextID(ByVal strTable As String, ByVa

22、l strId As String) As Long 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.實現(xiàn)系統(tǒng)各功能模塊實現(xiàn)商品信息登記模塊：利用可視化的方法建立數(shù)據(jù)庫的連接及對數(shù)據(jù)庫進行操作以實現(xiàn)商品商品信息登記功能。（1）新建窗體，將其【名稱】改為“frmMerch”并在窗體上分別添加一個Frame控件，五個

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

24、消TextBoxtxtNameTextTextBoxtxtStorageTextTextBoxtxtIntroTextTextBoxtxtRemarkTextComboBoxcboTypeTextComboBoxcboUnitText （3）frmMerch窗體主要代碼如下：Option ExplicitPrivate OK As Boolean 確定用戶按了OK還是CANCEL按鈕Private m_obj As clsMerch 數(shù)據(jù)對象，用來存儲用戶輸入數(shù)據(jù)Public m_ViewType As gxcViewType 顯示狀態(tài)，指添加還是修改Private m_TypeId As L

25、ong 商品類型根據(jù)是“新增”還是修改，確定顯示內容Private Sub SetStatus() 設置控件默認值 Call SetDefaultValue 設置狀態(tài) Select Case m_ViewType Case vtadd 添加 CancelButton.Visible = True OKButton.Caption = 確定 Case vtModify 修改 CancelButton.Visible = True OKButton.Caption = 保存 End SelectEnd Sub打開對話框，并傳出用戶輸入數(shù)據(jù)Public Function ShowDlg(ByRef

26、obj As Object, _ ByVal eViewType As gxcViewType, _ Optional nTypeId As Long = -1) As Boolean 保存數(shù)據(jù) Set m_obj = obj 用戶輸入數(shù)據(jù)存放于此對象中 m_ViewType = eViewType 對話框狀態(tài) If nTypeId = -1 And (Not m_obj Is Nothing) Then m_TypeId = m_obj.TypeId Else m_TypeId = nTypeId End If 根據(jù)新增、編輯或查看設置顯示內容SetStatus 顯示對話框 OK = Fal

27、se Me.Show vbModal If OK = False Then ShowDlg = False Exit Function End If 保存數(shù)據(jù) Set obj = m_obj 返回并釋放對話框 ShowDlg = True Unload MeEnd Function設置控件默認值Private Sub SetDefaultValue() Dim ctl As Control Dim i As Integer 如果是新增，則清空所有文本框 此處判斷 m_obj為空與判斷m_ViewType = vtAdd等效，但更安全 If m_obj Is Nothing Then For E

28、ach ctl In Controls If TypeOf ctl Is TextBox Then ctl.Text = End If Next Else 用傳入對象的值更新數(shù)據(jù) With m_obj txtName.Text = .MerchName txtStorage.Text = .Storage cboUnit.ListIndex = 0 txtIntro.Text = .Introduce txtRemark.Text = .Remark For i = 0 To cboType.ListCount - 1 If cboType.ItemData(i) = m_TypeId The

29、n cboType.ListIndex = i 商品類型Id Exit For End If Next i End With End If End Sub檢查輸入有效性Private Function CheckValid() As Boolean If txtName.Text = _ Or txtIntro.Text = Then MsgBox 請?zhí)顚懲戤呉陨细黜梼热?CheckValid = False Exit Function End If If cboType.Text = Then MsgBox 請?zhí)顚懲戤呉陨细黜梼热?CheckValid = False Exit Functi

30、on End If If Not IsNumeric(txtStorage.Text) Then MsgBox 庫存量請輸入數(shù)字 Exit Function End If CheckValid = True End Function保存數(shù)據(jù)Private Sub SaveValue() 給“成員變量”對象賦值 With m_obj 注意以下利用RealString函數(shù)替換去除輸入中的單引號 .MerchName = RealString(txtName.Text) .Remark = RealString(txtRemark.Text) .Storage = RealString(txtSto

31、rage.Text) .Introduce = RealString(txtIntro.Text) .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 fraMer

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

33、現(xiàn)銷售信息登記功能 ：(1)新建一個窗體，Name屬性為“frmSell”并在窗體上分別添加一個Frame控件、一個DTPicker控件、六個Label控件、三個TextBox控件、兩個Button控件、兩個ComboBox控件。如圖所示：圖4-16添加控件后的窗體截圖(2)各控件的屬性設置如下表：表4-6各控件屬性設置控件類型對象名屬性取值（說明）FramefraSellCaption銷售信息ComboBoxcboMerchNameTextComboBoxcboUnitTextLabelLabel1Caption售出商品LabelLabel2Caption統(tǒng)計時間LabelLabel3Cap

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