【正文】 End SubPrivate Sub Form_Unload(Cancel As Integer) Dim i As Integer 39。close all sub forms For i = 1 To 1 Step 1 Unload Forms(i) Next If vbMinimized Then SaveSetting , Settings, MainLeft, SaveSetting , Settings, MainTop, SaveSetting , Settings, MainWidth, SaveSetting , Settings, MainHeight, End If SaveSetting , Settings, ViewMode, End SubPrivate Sub Form_Resize() On Error Resume Next If 3000 Then = 3000 SizeControls End Sub 用戶管理模塊用戶管理對話框代碼設(shè)計(jì)Option ExplicitDim opAdmin As New clsOpAdminPrivate Sub CancelButton_Click() Unload MeEnd SubPrivate Sub cmdAdd_Click() lvAdminEnd SubPrivate Sub cmdDel_Click() lvAdminEnd SubPrivate Sub cmdModify_Click() lvAdminEnd SubPrivate Sub Form_Load() lvAdminEnd Sub經(jīng)營分析模塊用來對超市的運(yùn)作情況進(jìn)行分析，具有以下功能：庫存量排行。進(jìn)貨總量與登記次數(shù)排行。銷售總量與登記次數(shù)排行。報(bào)損總量與登記次數(shù)排行。控件名稱屬性屬性取消功能FrmAnalysis（Form）Caption經(jīng)營分析經(jīng)營分析對話框List庫存分析進(jìn)貨分析銷售分析報(bào)損分析CboOrder（ComboBox）Style2DropDownList前↓：降序排列，取前若干項(xiàng)；↑后：降序排列，取后若干項(xiàng)。然后再按由小到大顯示List前↓↑后TxtCount（TextBox）MaxLength3顯示數(shù)量CmdSearch（CommandButtom）Caption查看[查看]按鈕CmdClose（CommandButtom）Caption關(guān)閉[關(guān)閉]按鈕LvAna（ListView）GridLinesTrue顯示數(shù)據(jù)容器ViewlvwRiport界面設(shè)計(jì) 界面設(shè)計(jì)圖代碼分析Option ExplicitPrivate Sub cmdClose_Click() End SubPrivate Sub cmdSearch_Click() Dim nCount As Integer Dim IsDesc As Boolean Dim opMerch As New clsOpMerch Dim opBuy As New clsOpBuy Dim opSell As New clsOpSell Dim opDispose As New clsOpDispose nCount = Val() If nCount = 0 Then nCount = 10 IsDesc = IIf( = 0, True, False) Select Case Case 0 39。庫存分析 lvAna, IsDesc, nCount Case 1 39。進(jìn)貨分析 lvAna, IsDesc, nCount Case 2: 39。銷售分析 lvAna, IsDesc, nCount Case 3 39。報(bào)損分析 lvAna, IsDesc, nCount Case Else End Select End SubPrivate Sub Form_Load() = 0 = 0 = 10End Sub6 測試分析 強(qiáng)制變量聲明選擇菜單[工具]—[選項(xiàng)]命令，打開“選項(xiàng)“對話框”，在“編輯器”屬性頁中，把“要求變量聲明”復(fù)選框選上，或者手工在每個(gè)文件的開頭加上關(guān)鍵字：option Explicit這樣在編譯時(shí)會對沒有聲明的變量報(bào)錯(cuò)，從而減少很多不必要的調(diào)試。 常見錯(cuò)誤的避免數(shù)據(jù)類型不匹配 數(shù)據(jù)類型的判斷錯(cuò)誤，比如一個(gè)功能模塊，接受傳入的數(shù)據(jù)為id，要求其值必須是正數(shù)。如果寫程序時(shí)傳入的是小數(shù)，或者是非數(shù)字的字符串，那么程序?qū)霈F(xiàn)錯(cuò)誤。又如查詢數(shù)據(jù)表時(shí)，使用了WHERE子句，但是數(shù)據(jù)類型不匹配，數(shù)據(jù)庫中字段類型為數(shù)字的值，卻使用了字符串去查詢，就會出現(xiàn)錯(cuò)誤。數(shù)據(jù)與數(shù)據(jù)庫限制相沖突數(shù)據(jù)與數(shù)據(jù)庫限制相沖突，可能是其值超過了數(shù)據(jù)庫的上限和下限。比如在數(shù)據(jù)庫中，用戶名稱字符數(shù)量上限是20個(gè)字符，而在程序中沒有對此進(jìn)行判別，如果一個(gè)添加新商品時(shí)名字有21個(gè)字符，那么在使用SQL語句插入數(shù)據(jù)與記錄的時(shí)候就會出錯(cuò)。變量聲明錯(cuò)誤最后是一些常識性錯(cuò)誤，比如在If…Else…End If過程中，認(rèn)為判斷只會執(zhí)行其中的一段代碼，于是在兩段中都使用了Dim obj as clsMerch，事實(shí)上，編譯器在語法分析階段，是首先將一個(gè)函數(shù)內(nèi)聲明的全部變量都放符號表中，而不管這個(gè)變量的聲明是在這個(gè)函數(shù)的什么位置。又如在Select Case中，Case的條件是字符串，但是沒有加引號，就變成了Case一個(gè)空變量。資源的建立與釋放在將類實(shí)例化時(shí)，必須使用New關(guān)鍵字，未實(shí)例化類無法使用，例：誤： Dim obj as clsMerch正： Dim obj as clsMerch Set obj=New clsMerch 同理，在調(diào)用Set obj=Nothing后，資源已經(jīng)釋放，無法再調(diào)用類內(nèi)的方法。系統(tǒng)的編譯和發(fā)行3個(gè)工程的項(xiàng)目屬性在前面創(chuàng)建項(xiàng)目時(shí)均已設(shè)置完畢，由于在本系統(tǒng)中生成了名為，當(dāng)移植到其他機(jī)器使用時(shí)，需要先注冊此組件。，因此當(dāng)移植到其他機(jī)器時(shí)，這個(gè)路徑關(guān)系依然不能改變。總結(jié)本系統(tǒng)是針對超市進(jìn)行供銷管理而設(shè)計(jì)的，在這個(gè)系統(tǒng)中，超市進(jìn)銷存管理系統(tǒng)研究的內(nèi)容涉及超市進(jìn)銷存管理的全過程，包括入庫、出庫、退貨、訂貨、超市統(tǒng)計(jì)查詢等等。雖然，此系統(tǒng)還有許多方面還不夠完善，還存在一些不足，還需改進(jìn),但設(shè)計(jì)界面簡潔,美觀大方,基本功能比較完善.通過本系統(tǒng)的開發(fā)，我對軟件開發(fā)過程有了更清晰的了解，首先是問題定義、需求分析，然后是功能設(shè)計(jì)、詳細(xì)設(shè)計(jì)等，并對軟件測試的方法、手段有了較深的理解，同時(shí)對超市進(jìn)銷存管理系統(tǒng)的流程有了一個(gè)系統(tǒng)的認(rèn)識。在開發(fā)過程還認(rèn)真學(xué)習(xí)了與系統(tǒng)相關(guān)的知識，極大地拓寬了我的知識面,我感到收獲不小。在系統(tǒng)的開發(fā)初期，必須要熟悉超市進(jìn)銷存管理系統(tǒng)的整個(gè)流程，初步了解了超市進(jìn)銷存管理系統(tǒng)的相關(guān)知識，這樣才能進(jìn)入到設(shè)計(jì)的過程中去。從開始熟悉這些知識到對整體設(shè)計(jì)有了解，再從概要設(shè)計(jì)、詳細(xì)設(shè)計(jì)到開始編碼，以及最后的測試，整個(gè)過程感覺很充實(shí)，雖然遇到了不少困難，但當(dāng)我通過自己查資料、或是向指導(dǎo)老師請教以及向同學(xué)請教，而設(shè)計(jì)出解決方案并成功實(shí)現(xiàn)時(shí)，那種成就感和滿足感足以鼓勵(lì)自己加班加點(diǎn)的辛苦。因?yàn)橐郧坝羞^使用vb設(shè)計(jì)管理軟件的經(jīng)驗(yàn)，在這次設(shè)計(jì)的過程中，我遇到專業(yè)知識方面的困難不是非常多，主要困難集中在管理知識、業(yè)務(wù)流程上等方面的不足。在實(shí)際的開發(fā)中我深刻的體會到了自己做課程設(shè)計(jì)和實(shí)際客戶的要求之間的距離，不能憑空想象來開發(fā)軟件，而是需要與客戶不斷的溝通交流，把客戶真正的需求反映到你的軟件當(dāng)中。經(jīng)過以上詳細(xì)的設(shè)計(jì)與構(gòu)架，終于完成了畢業(yè)論文選題系統(tǒng)的開發(fā)。在本次開發(fā)過程中，遇到了很多的困難。也有指導(dǎo)老師李迎輝的細(xì)心幫助,包括數(shù)據(jù)庫設(shè)計(jì)方面，技術(shù)實(shí)現(xiàn)方面以及系統(tǒng)測試方面。同時(shí)，我也受到了很大的啟發(fā)，希望通過今后的學(xué)習(xí)，能夠?qū)Ρ鞠到y(tǒng)在安全性方面進(jìn)行進(jìn)一步的完善。參考文獻(xiàn)[1] 陸惠恩；陸陪恩，軟件工程[M]，電子工業(yè)出版社,2002年1月.[2] 王春森，程序員教程[M]，清華大學(xué)出版社,2001年5月.[3] 蔣加伏；張林峰，Visual Basic程序設(shè)計(jì)教程[M]，北京郵電大學(xué)出版社, 2003年.[4] 趙瑋，Visual Basic中文版快捷編程實(shí)戰(zhàn)訓(xùn)練[M],人民郵電出版社,2003年9月.[5] 孟小峰，WEB數(shù)據(jù)管理研究綜述[M]，清華大學(xué)出版社，2001年.[6] 黃吻，現(xiàn)代遠(yuǎn)程教育結(jié)教育發(fā)展啟示[N]，浙江大學(xué)學(xué)報(bào)，1995年5月.[7] 吳競?cè)A；陳根才，基于三層模式的檔案管理系統(tǒng)的設(shè)計(jì)與實(shí)現(xiàn)[M]，北京，機(jī)械工業(yè)出版社，2000年.[8] 金漢均，數(shù)據(jù)庫實(shí)現(xiàn)的方法[N]，華中師范大學(xué)學(xué)報(bào)，1999專輯.[9] 楊漢平；王小蕾等，數(shù)據(jù)庫中間件技術(shù)在三層操作系統(tǒng)模型中的實(shí)現(xiàn)[N]，華中師范大學(xué)學(xué)報(bào)，2001年 4月.[10]廖信彥，Visual Basic應(yīng)用大全[M]，清華大學(xué)出版社，2002年.[11]康博，Visual Basic應(yīng)用程序開發(fā)新技術(shù)[M]，人民郵電出版社，2003年.[12]陳子俠，基于B/S結(jié)構(gòu)的在線商店技術(shù)開發(fā)[N]，浙江大學(xué)學(xué)報(bào)，2002.[13]清源計(jì)算機(jī)工作室，Visual Basic設(shè)計(jì)與制作[M]，機(jī)械工業(yè)出版社，2004年.[14]周佩德，數(shù)據(jù)庫原理及應(yīng)用[M]，電子工業(yè)出版社,2005年.[15]劉炳文等，VISUAL BASIC程序設(shè)計(jì)數(shù)據(jù)庫篇[M]，人民郵電出版社,1999年3月.[16]李光明，Visual Basic [M]，冶金工業(yè)出版社,2002年8月.[17]劉炳文，精通VISUAL BASIC [M]，人民郵電出版社,2001年.[18]黃淼云，[M],國防工業(yè)出版社,2003年.[19]王要武，信息管理系統(tǒng)[M]，電子工業(yè)出版社，2003年.[20]李紅等編著，管理信息系統(tǒng)開發(fā)與應(yīng)用[M]，電子工業(yè)出版社，2003年.