【正文】 如果修改和刪除入庫(kù)單，也需要同時(shí)更新入庫(kù)單表和庫(kù)存表，這是這個(gè)模塊的難點(diǎn)。同時(shí)為了禁止用戶在“數(shù)量”文本框輸入數(shù)字以外的字符，在 KeyPress 事件中加入代碼限制用戶輸入的范圍。 運(yùn)行界面如下圖 18所示： 圖 18 商品信息設(shè)置運(yùn)行界面 the run interface of seting merchandise information 在該信息列表中點(diǎn)擊修改則得到輸入信息界面如下圖 19 所示： 九江學(xué)院畢業(yè)論文 27 圖 19 商品信息修改 運(yùn)行界面 the run interface of modifying merchandise information 詳細(xì)的設(shè)計(jì)過程見模塊功能流程圖圖 20 所示 圖 20 商品信息模塊流程圖 Fig. 20 module’s flow chart of merchandise information 劉昌英：商品進(jìn)銷存管理系統(tǒng) 28 進(jìn)貨信息管理模塊的創(chuàng)建 主要實(shí)現(xiàn)的功能有；訂貨單的錄入與修改、入庫(kù)單的錄 入與修改以及相關(guān)的信息查詢等。在窗體顯示時(shí)，可以控制窗體中各個(gè)控件按要求的位置顯示。這個(gè)窗體 是用來顯示商品設(shè)置信息，并且可以對(duì)各條記錄進(jìn)行操作，如添加、修改、刪除等。一旦輸入完畢，系統(tǒng)將首先查詢數(shù)據(jù)庫(kù)中與新建用戶名相同的記錄，如果有相同的記錄將提示用戶重新輸入用戶名；當(dāng)確定數(shù)據(jù)庫(kù)中沒有相同的用戶名，并且兩次輸入密碼一致時(shí)，將把該條記錄添加到數(shù)據(jù)庫(kù)中，提示信息框添加用戶成功。如果輸入的用戶名在用戶表格中沒有找到，將提示不存在這個(gè)用戶 名，文本框 txtUserName 將重新獲得輸入焦點(diǎn)。并且在載入窗體時(shí)初始化這兩個(gè)全局變量。 系統(tǒng)用戶管理模塊的創(chuàng)建 主要實(shí)現(xiàn)：用戶登錄、添加用戶、修改用戶密碼以及更改登錄用戶和退出等功能 用戶登錄界面的創(chuàng)建 隨著信息系統(tǒng)的不斷完善 ,數(shù)據(jù)保密問題變得越來越重要 ,用戶必須正確地鍵入密碼才能查詢。 創(chuàng)建公用模塊 在 Visual Basic 中可以用公用模塊來存放整個(gè)工程項(xiàng)目公用的函數(shù)、過程和全局變量劉昌英：商品進(jìn)銷存管理系統(tǒng) 22 等。 在主窗體中加入狀態(tài)欄控件，可以實(shí)時(shí)反映系統(tǒng)中的各個(gè)狀態(tài)的變化。 MDI 窗體以及所有子窗體在運(yùn)行時(shí)都具有這些性質(zhì)：（ 1）所有的子窗體都顯示在父窗體的工作空間內(nèi)。 模塊需求 登錄界面 主界面窗體 用戶管理模塊 基本信息設(shè)置模塊 進(jìn)貨信息管理模塊 銷售信息管理模塊 庫(kù)存信息管理模塊 財(cái)務(wù)信息管理模塊 幫助界面 九江學(xué)院畢業(yè)論文 21 系統(tǒng)主窗體和公用模塊的創(chuàng)建 主界面窗體的實(shí)現(xiàn) 該界面采用 MDI 窗體， MDI 即多文檔界面，它允許用戶在單個(gè)容器中產(chǎn)生多個(gè)文檔，這個(gè)容器就叫做父窗體。商業(yè)企業(yè)對(duì)于查詢、匯總、統(tǒng)計(jì)功能的需求往往是多種多樣的 ,不可一概而論。一個(gè)商品銷售單價(jià)的指定 ,是由本功能完成的。利用這一功能 ,管理人員可以將自己負(fù)責(zé)的進(jìn)貨數(shù)據(jù) (包括商品名稱、進(jìn)貨單價(jià)、進(jìn)貨數(shù)量以及供貨商名稱 ,等等 ) 錄入到“進(jìn)貨數(shù) 據(jù)記錄”數(shù)據(jù)表中 ,并記錄下自己的姓名。PWD= End Function 劉昌英：商品進(jìn)銷存管理系統(tǒng) 20 4 系統(tǒng)模塊的具體設(shè)計(jì)與實(shí)現(xiàn) 系統(tǒng)模塊需求 軟件設(shè)計(jì)思想 商品進(jìn)銷存管理系統(tǒng)主要是對(duì)商業(yè)公司的業(yè)務(wù)進(jìn)行全面的計(jì)算機(jī)管理，系統(tǒng)分為系統(tǒng)管理、進(jìn)貨管理、銷售管理、庫(kù)存管理和財(cái)務(wù)統(tǒng)計(jì)分析五大功能模塊。語(yǔ)法如下： 說明： Object 就是 ADO 的對(duì)象，可以是連接對(duì)象，也可以是記錄集對(duì)象。如何定位到要想要查詢的記錄是數(shù)據(jù)訪問中一個(gè)十分重要的課題。有了結(jié)果集，就可以對(duì)它進(jìn)行更進(jìn)一步的處理，如添加新記錄、刪除記錄、修改記錄、查詢記錄、定位記錄等。PWD= 39。 Connection 對(duì)象表示到一個(gè)數(shù)據(jù)源的連接，這里數(shù)據(jù)源可以是各種類型的數(shù)據(jù)庫(kù)。動(dòng)態(tài)屬性則由數(shù)據(jù)提供者定義，并出現(xiàn)在適當(dāng)?shù)?ADO 對(duì)象的屬性集合中。字段的信息包括數(shù)據(jù)類型、精度和數(shù)值范圍等。命令對(duì)象的 Parameter 集合包含所有的參數(shù)對(duì)象。對(duì)象模型用 Command 對(duì)象來體現(xiàn)命令的概念。對(duì)象變量的使用方法與通常意義下的變量十分相似，先用“ Dim 對(duì)象變量 As 對(duì)象名稱”格式定義對(duì)象變量，再通過“ Set 對(duì)象變量 =對(duì)象”格式將對(duì)象賦給對(duì)象變量，在通過對(duì)象變量訪問數(shù)據(jù)庫(kù)。 圖 9 創(chuàng) 建數(shù)據(jù)源 the contribution of data source 劉昌英：商品進(jìn)銷存管理系統(tǒng) 18 VB 開發(fā)環(huán)境與 SQL 數(shù)據(jù)庫(kù)的鏈接 Visual Basic 作為應(yīng)用程序的開發(fā) “ 利器 ” 也 表現(xiàn)在數(shù)據(jù)庫(kù)應(yīng)用程序的開發(fā)上，它良好的界面和強(qiáng)大的控件功能使數(shù)據(jù)庫(kù)編程變得簡(jiǎn)單多了。 （ 2） 可以從自己的存儲(chǔ)過程內(nèi)引用其他存儲(chǔ)過程，這可以簡(jiǎn)化一系列復(fù)雜語(yǔ)句。存儲(chǔ)過程存儲(chǔ)在數(shù)據(jù)庫(kù)內(nèi)，可由應(yīng)用程序通過一個(gè)調(diào)用執(zhí)行，而且允許用戶聲明變量、有條件執(zhí)行以及其他強(qiáng)大的編程功能。 SQL Server 提供存儲(chǔ)過程來完成對(duì)有關(guān)操作的優(yōu)化。如下圖 6 所示： 圖 6 SQL Server2020 的登錄屬性設(shè)置 set login property of SQL Server2020 劉昌英：商品進(jìn)銷存管理系統(tǒng) 16 Visual Basic 設(shè)置 由于程序中利用 ADO（ ActiveX Data Object） 完成對(duì)數(shù)據(jù)庫(kù)的訪問和操作，需要添加ADO 庫(kù)。 表 1 User_Info用戶信息表 列 名 數(shù)據(jù)類型 可否為空 說 明 User_ID char not null 用戶名稱 User_PWD char null 用戶密碼 User_DES char null 用戶地址 表 2 dm_wz商品信息表 列名 數(shù)據(jù)類型 可否為空 說明 dm char not null 商品編號(hào) mc char null 商品名稱 jldw char null 計(jì)量單位 color_code char null 顏色 lb char null 商品類別 rkj char null 入庫(kù)價(jià)格 fxj char null 分銷價(jià)格 lsj char null 零售價(jià)格 cj char null 生產(chǎn)廠家 yxrq char null 更新日期 bz char null 備注信息 九江學(xué)院畢業(yè)論文 11 表 3 dm_wzlb 商品類別表 列 名 數(shù)據(jù)類型 可否為空 說明 lbcode char not null 商品類別編號(hào) lb char null 商品類別名稱 bz char null 備注信息 表 4 dm_yanse 商品顏色表 列名 數(shù)據(jù)類型 可否為空 說明 dm char not null 顏色編號(hào) color char null 顏色名稱 表 5 dm_gf 供應(yīng)商信息表 列名 數(shù)據(jù)類型 可否為空 說明 dm char not null 供應(yīng)商編號(hào) mc char null 供應(yīng)商名稱 addr char null 地址 yzbm char null 郵政編碼 tel char null 聯(lián)系電話 itladd char null 公司主頁(yè) char null 聯(lián)系人郵件地址 sui_no char null 稅號(hào) bank_no char null 銀行帳號(hào) bank char null 開戶銀行 ywman char null 聯(lián)系人 bz char null 備注信息 表 6 dm_kh 客戶信息表 列名 數(shù)據(jù)類型 可否為空 說明 dm char not null 客戶編號(hào) mc char null 客戶名稱 addr char null 地址 yzbm char null 郵政編碼 tel char null 聯(lián)系電話 itladd char null 公司主頁(yè) ywman char null 聯(lián)系人 char null 聯(lián)系人郵件地址 sui_no char null 稅號(hào) bank_no char null 銀行帳號(hào) bank char null 開戶銀行 card_no char null 會(huì)員卡號(hào) mb_reb numeric null 折扣比例 bz char null 備注信息 劉昌英：商品進(jìn)銷存管理系統(tǒng) 12 表 7 dm_ywylb 業(yè)務(wù)員類別表 列名 數(shù)據(jù)類型 可否為空 說明 lbcode char not null 類別編號(hào) lb char null 類別名稱 bz char Null 備 注信息 表 8 dm_ywy 業(yè)務(wù)員信息表 列名 數(shù)據(jù)類型 可否為空 說明 dm char not null 業(yè)務(wù)員編號(hào) mc char null 業(yè)務(wù)員姓名 lb char null 類別 tel char null 聯(lián)系電話 addr char null 家庭住址 sfz char null 身份證號(hào)碼 lbcode char null 類別編號(hào) bz char null 備注信息 表 9 dm_ck 倉(cāng)庫(kù)信息表 列名 數(shù)據(jù)類型 可否為空 說明 dm char not null 倉(cāng)庫(kù)編 號(hào) mc char null 倉(cāng)庫(kù)名稱 bz char null 備注信息 表 10 inh入庫(kù)單信息表 列名 數(shù)據(jù)類型 可否為空 說明 in_date datetime not null 入庫(kù)日期 ywman char null 業(yè)務(wù)員 dh_no char null 入庫(kù)單編號(hào) gfdm char null 供應(yīng)商編號(hào) ckdm char null 倉(cāng)庫(kù)編號(hào) wzdm char null 商品編號(hào) color char null 商品顏色 sl numeric null 數(shù)量 in_danj numeric null 單價(jià) i_zk numeric null 折扣 i_zke numeric null 總金額 jsfk char null 是否即時(shí)付款 jz char null 是否記帳 yf numeric null 預(yù)付比例 bz char null 備注信息