【正文】 第 11頁(yè) 表格的設(shè)計(jì) 表 (MerchandiseType) 列名 數(shù)據(jù)類型 字段大小 必填字段 默認(rèn)值 說明 MT_ID_N 自動(dòng)編號(hào) 長(zhǎng)整型 是 商品類型號(hào)，遞增，主鍵 MT_Name_S 文本 15 是 商品類型名 MT_RemarkR 備注 是 備注 表 ： 商品信息表 (Merchandise) 列名 數(shù)據(jù)類型 字段大小 必填字段 默認(rèn)值 說明 M_Id_N 自動(dòng)編號(hào) 長(zhǎng)整型 是 商品編號(hào) ，遞增，主鍵 M_Name_S 文本 80 是 商品名稱 M_Introduce_S 文本 255 是 商品介紹 M_TypeId_N 數(shù)字 長(zhǎng)整型 是 1 商品類型 ID M_Storage_N 數(shù)字 長(zhǎng)整型 是 0 庫(kù)存量 M_UnitId_N 數(shù)字 長(zhǎng)整型 是 1 單位編號(hào) M_Remark_R 備注 是 備注 表 ：商品單位信息表 (Unit) 列名 數(shù)據(jù)類型 字段大小 必填字段 默認(rèn)值 說明 U_ID_N 自動(dòng)編號(hào) 長(zhǎng)整型 是 單位編號(hào)，遞增，主健 U_NAME_S 文本 10 是 單位名稱 表 ：供應(yīng)商信息表 (Provider) 列名 數(shù)據(jù)類型 字段大小 必填字段 默認(rèn)值 說明 浙江經(jīng)貿(mào)職業(yè)技術(shù)學(xué)院論文（設(shè)計(jì)） 第 12頁(yè) P_Id_N 自動(dòng)編號(hào) 長(zhǎng)整型 是 供貨商編號(hào)，主健 P_Name_S 文本 50 是 供貨商名稱 P_Introduce_S 文本 255 是 供貨商簡(jiǎn)介 P_Remark_R 備注 是 備注 表 ：進(jìn)貨信息表 (Buy) 列名 數(shù)據(jù)類型 字段大小 必填字段 默認(rèn)值 說明 B_ID_N 自動(dòng)編號(hào) 長(zhǎng)整型 是 進(jìn)貨 ID，遞增，主健 B_ProviderId_N 文本 長(zhǎng)整型 是 供應(yīng)商 ID B_MerchandiseId_N 數(shù)學(xué) 長(zhǎng)整型 是 商品 ID B_StockDate_D 日期 短日期 是 Dare() 進(jìn)貨時(shí)間 B_Deliver_S 文本 20 是 送貨人姓名 B_Consignee_S 文本 20 是 經(jīng)手人姓名 B_Count_N 數(shù)字 長(zhǎng)整型 是 0 購(gòu)入量 B_StockPrice_N 數(shù)字 單精度型 是 0 進(jìn)貨單價(jià) B_OperatorId_S 文本 20 是 操作員 ID B_Remark_R 備注 是 備注 表 ：銷售信息表 (Sell) 浙江經(jīng)貿(mào)職業(yè)技術(shù)學(xué)院論文（設(shè)計(jì)） 第 13頁(yè) 表 ：報(bào)損信息表 (Dispose) 列名 數(shù)據(jù)類型 字段大小 必填字段 默認(rèn)值 說明 D_ID_N 自動(dòng)編號(hào) 長(zhǎng)整型 是 報(bào)損編號(hào)，遞增，主鍵 D_MerchandiseID_N 數(shù)字 長(zhǎng)整型 是 商品 ID D_RegDate_D 日期 短日期 是 Date（） 登記日期 D_Count_N 數(shù)字 長(zhǎng)整型 是 0 報(bào)損數(shù)量 D_Reason_S 文本 255 是 報(bào)損原因 D_Operatorld_S 文本 20 是 操作員 ID D_Remark_R 備注 是 備注 表 ： 管理員信息實(shí)體 (Admins) 列名 數(shù)據(jù)類型 字段大小 必填字段 默認(rèn)值 說明 列名 數(shù)據(jù)類型 字段大小 必填字段 默認(rèn)值 說明 S_ID_N 自動(dòng)編號(hào) 長(zhǎng)整型 是 銷售編號(hào)，遞增，主鍵 S_MerchandiseID_D 數(shù)字 長(zhǎng)整型 是 商品 ID S_RegDate_D 日期 短日期 是 Date（） 登記日期 S_Count_N 數(shù)字 長(zhǎng)整型 是 0 售出數(shù)量 S_SellPrice_N 數(shù)字 單精度型 是 0 賣出單價(jià) S_OperatorId_S 文本 20 是 操作員 ID S_Remark_R 備注 是 備注 浙江經(jīng)貿(mào)職業(yè)技術(shù)學(xué)院論文（設(shè)計(jì)） 第 14頁(yè) A_Account_S 文本 20 是 賬號(hào)，主鍵 A_Pwd_S 文本 20 是 密碼 A_IsDefault_B 是 /否 是 False 是否是默認(rèn)用戶 數(shù)據(jù)庫(kù)的生成與配置 經(jīng)過以上的需求分析和概念結(jié)構(gòu)設(shè)計(jì)以后，得到數(shù)據(jù)庫(kù)的邏輯結(jié)構(gòu)。 (2)創(chuàng)建業(yè)務(wù)邏輯處理組件 新建 ActiveX DLL工程 設(shè)置工程屬性 加入對(duì) ADO的引用。 5 詳細(xì)設(shè)計(jì) 開發(fā)業(yè) 務(wù)邏輯處理組件 進(jìn)銷存業(yè)務(wù)處理組件用來處理進(jìn)銷存管理系統(tǒng)中的業(yè)務(wù)邏輯，既負(fù)責(zé)與界面進(jìn)行數(shù)據(jù)傳遞，同時(shí)也要將界面端的請(qǐng)求應(yīng)用業(yè)務(wù)邏輯之后對(duì)數(shù)據(jù)庫(kù)進(jìn)行操作。進(jìn)貨信息管理，對(duì)應(yīng) clsBuy類和 clsBuys類 . 銷浙江經(jīng)貿(mào)職業(yè)技術(shù)學(xué)院論文（設(shè)計(jì)） 第 15頁(yè) 售信息管理，對(duì)應(yīng) clsSell類和 clsSells類。具體完成的功能如下：在信息管理類：實(shí)現(xiàn)與單個(gè)信息相關(guān)的操作，包括添加、修改和刪除。修改商品類型信息。 (1)商品類型信息管理類 clsMType創(chuàng)建 clsMType類并添加屬性 商品類型信息類 clsMType用來處理單個(gè)商品類型的信息，實(shí)現(xiàn)商品類型操作的基本功能，如添加、修改、刪除等。 浙江經(jīng)貿(mào)職業(yè)技術(shù)學(xué)院論文（設(shè)計(jì)） 第 16頁(yè) （ 2） AddNew方法功能：添加耽擱商品類型。返回值： gxcUpdate類型，請(qǐng)參考clsPublic類中 gxcUpdate枚舉類型的定義。 商品類型信息管理集合類 clsMTypes 商品類型信息集合類 clsMTypes用來處理多個(gè)商品類型的信息 ，其最小的單元是 clsMType，它完成與一組商品類型信息相關(guān)的操作，比如查找功能。參數(shù)設(shè)計(jì)：一個(gè)可選的類型 ID，默認(rèn)值為 1。返回值： gxcAddNew類型，參考 clsPublic類中 gxcAddNew枚舉類型的定義。 Delete方法功能：刪除商品信息。 選擇菜單 [工程 ]— [添加類模塊 ]命令，打開“添加類模塊”對(duì)話框，選擇“ VB類生成器 ”，使用類生成器在工程中添加一個(gè)集合類，命名為 clsMerchs類，在“基于”下拉列表框中選擇 clsDBbases，在“集合組成”欄中選擇 clsMerch類。返回值： clsMerchs類型，一個(gè) clsMerch的集合。返回值： clsMerchs類型，一個(gè) clsMerch的集合。 表 clsProvider類的屬性設(shè)置 屬性名稱 數(shù)據(jù)類型 說明 ID Long 供貨商編號(hào) ProviderName String 供貨商名稱 Introduce String 供貨商簡(jiǎn)介 Remark String 備注 AddNew方法 ,功能：添加單個(gè)供貨商信息。參數(shù)設(shè)計(jì)：無。返回值： gxcDelete類型，參考 clsPublic類中 gxcDelete枚舉類型的定義。應(yīng)用設(shè)置后系統(tǒng)會(huì)自動(dòng)生成一個(gè)標(biāo)準(zhǔn)集合類所具有的最基本屬性與方法，下面，為 clsProviders添加必要的方法。省略參數(shù)是，返回全部供貨商。查找進(jìn)貨信息。參數(shù)設(shè)計(jì)：無。返回值： gxcUpdate類型，請(qǐng)參考 clsPublic類中 gxcUpdate枚舉類型的定義。 進(jìn)貨信息管理集合類 clsBuys,添加 AddEx方法 ,添加 Find方法功能：根據(jù)給定參數(shù)查找進(jìn)貨信息，結(jié)果以 clsBuys類型返回。 表 參數(shù)設(shè)計(jì) 參數(shù)名 參數(shù)類型 功能 是否可選及默認(rèn)值 說明 IsDesc Boolean 表示是否采用降序 可選，默認(rèn)值=True 無 nCount Integer 最多顯示多少條記錄 可選，默認(rèn)值 =10 無 浙江經(jīng)貿(mào)職業(yè)技術(shù)學(xué)院論文（設(shè)計(jì)） 第 21頁(yè) ? 返回值： clsBuys類型，一個(gè) clsBuy的集合。查找銷售信息。 選擇菜單 [工程 ]— [添加類模塊 ]命令，打開“添加類模塊”框，選擇“ VB類生成器”，使用類生成器在工程中添加 clsSell類， 表 銷售信息類 clsSell 屬性名稱 數(shù)據(jù)類型 說明 ID Long 銷售編號(hào) MerchandiseID Long 商品 ID MerchName String 商品名稱 RegDate Date 登記日期 Count Long 售 出數(shù)量 SellPrice Single 售出單價(jià) OperatorId String 操作員 ID Remark String 備注 TypeName String 商品類型名稱 RegTime Long 登記次數(shù) TotalPrice Single 售出總價(jià) clsASell類中的 AddNew、 Update和 Delete方法，與進(jìn)貨信息中的處理很類似，只是數(shù)據(jù)庫(kù)中的字段不同而已。查找報(bào)損信息 ,按商品統(tǒng)計(jì)分析報(bào)損信息。 管理員信息管理模塊 管理員信息管理模塊的功能需要由 clsAdmin和 clsAdmins兩個(gè)類來實(shí)現(xiàn)，它的主要功能是：添加管理員信息。驗(yàn)證管理員密碼。 表 clsAdmin表 屬性名稱 數(shù)據(jù)類型 說明 浙江經(jīng)貿(mào)職業(yè)技術(shù)學(xué)院論文（設(shè)計(jì)） 第 23頁(yè) Account String 管理員賬號(hào) Pwd String 密碼 IsDefault Boolean 是否是默認(rèn)用戶 clsAdmin中的 AddNew、 Update和 Delete方法，與以上各類中的處理很類似，只是數(shù)據(jù)庫(kù)中的字段不同而已。供貨商操作管理，對(duì)應(yīng) frmProvider窗體和clsOpProvider類。管理員操作管理，對(duì)應(yīng) frmUser窗體和 clsOpAdmin類。 SetStatus：設(shè)計(jì)對(duì)話框控件的默認(rèn)狀態(tài)。 SaveValue：保存用戶輸入。 Modify： 管理修改操作。 ObjsToListView： 將對(duì)象集合顯示到 ListView中。 FillCombo：將全部對(duì)象加入到組合框中。處理修改商品的操作。 (7)供貨商操作管理模塊 供貨商操作管理模塊實(shí)現(xiàn)以下的功能：處理添加供貨商的操作 ,處理修改供貨商的操作 ,處理刪除供貨商的操作 ,處理列舉或查找供貨商的操作。處理刪除銷售的操作。處理修改報(bào)損的操作。 (11)管理員信息操作管理模塊 管理員信息操作管理模塊實(shí)現(xiàn)以下的功能：處理添加管理員信息的操作。 界面端應(yīng)用程序設(shè)計(jì) 公共模塊的設(shè)計(jì) 在創(chuàng)建用戶界面端應(yīng)用程序時(shí)，向?qū)б呀?jīng)為我們生成了一個(gè)名為 mdlMain的模塊，我們對(duì)這個(gè)模塊稍微 修改即可使用。檢查正確密碼 Dim Account As String Dim Pwd As String Account = RealString() Pwd = RealString() 39。添加菜單 添加主界面模塊 主界面設(shè)計(jì)：包括系統(tǒng)，視圖 ，商品類型管理，進(jìn)貨管理，銷售管理，報(bào)損管理，供貨商管理，銷售分析，幫助等等如圖 浙江經(jīng)貿(mào)職業(yè)技術(shù)學(xué)院論文（設(shè)計(jì)） 第 29頁(yè) 圖 主界面效果圖 其他代碼 Private Sub Form_Load() LoadResStrings Me = GetSetting(, Settings, MainLeft, 1000) = GetSetting(, Settings, MainTop, 1000) = GetSetting(, Settings, MainWidth, 6500) = GetSetting(, Settings, MainHeight, 6500) = Val(GetSetting(, Settings, ViewMode, 0)) 39。銷售總量與登記次數(shù)排行。庫(kù)存分析 lvAna, IsDesc, nCount Case 1 39。 常見錯(cuò)誤的避免 數(shù)據(jù)類型不匹配 數(shù)據(jù)類型的判斷錯(cuò)誤，比如一個(gè)功能模塊，接受傳入的數(shù) 據(jù)為 id，要求其值必須是正數(shù)。比如在數(shù)據(jù)庫(kù)中，用戶名稱字符數(shù)量上限是 20個(gè)字符，而在程序中沒有對(duì)此進(jìn)行判別，如果一個(gè)添加新商品時(shí)名字有 21個(gè)字符，那么在使用 SQL語(yǔ)句插入數(shù)據(jù)與記錄的時(shí)候就會(huì)出錯(cuò)。 系統(tǒng)的編譯和發(fā)行 3個(gè)工程的項(xiàng)目屬性在前面創(chuàng)建項(xiàng)目時(shí)均已設(shè)置完畢，由于在本系統(tǒng)中生成了名為 ，當(dāng) 移植到其他機(jī)器使用時(shí)，需要先注冊(cè)此組件。在開發(fā)過程還認(rèn)真學(xué)習(xí)了與系統(tǒng)相關(guān)的知識(shí)，極大地拓寬了我的知識(shí)面 ,我感到收獲不小。在實(shí)際的開發(fā)中我深刻的體會(huì)到了自己做課程設(shè)計(jì)和實(shí)際客戶的要求之間的距離，不能憑空想象來開發(fā)軟件，而是需要與客戶不斷的溝通交流，把客戶真正的需求反映到你的軟件當(dāng)中。同時(shí)，我也受 到了很大的啟發(fā)，希望通過今后的學(xué)習(xí)，能夠?qū)Ρ鞠到y(tǒng)在安全性方面進(jìn)行進(jìn)一步的完善 。 個(gè)人能力 培訓(xùn)經(jīng)歷