【正文】 人等。采購單中的商品名稱、供應(yīng)商和經(jīng)手人字段分別對應(yīng) Product 數(shù)據(jù)表、Supplier 數(shù)據(jù)表和 Users 數(shù)據(jù)表中的相關(guān)字段，所以這里需要檢驗用戶輸入的合法性。供應(yīng)商管理：基礎(chǔ)信息維護中的一個模塊，主要用于對供應(yīng)商信息進行查詢和維護。在具體的實現(xiàn)各個功能模塊之前，需要在 Visual Basic 中創(chuàng)建一個工程，以管理系統(tǒng)開發(fā)中的不同資源。26 創(chuàng)建系統(tǒng)窗口 創(chuàng)建登陸窗口在進入應(yīng)用程序主界面之前，一般都需要登錄操作，以便確認用戶身份，從而保證企業(yè)數(shù)據(jù)的安全性。（6） 、當系統(tǒng)運行打開 frmLogin 窗口的時候，需要從數(shù)據(jù)庫的 Users 數(shù)據(jù)表中查找當前系統(tǒng)中所有的用戶，然后將它們添加到 cmbUserName 組合框中。Password=ecc。如果記錄為空則說明不存在此條記錄，也說明用戶名錯誤 MsgBox 沒有這個用戶!, vbCrLf amp。輸入錯誤次數(shù)不足 3 次 num = num + 1 39。關(guān)閉數(shù)據(jù)庫連接 End Sub這樣，登錄界面的設(shè)計和代碼編寫就全部完成了。（3） 、設(shè)置 frmMain 窗口的屬性。每個菜單項通過“amp。具體操作步驟如下：30（1） 、在設(shè)計工具欄之前，首先需要創(chuàng)建工具欄按鈕圖標對應(yīng)的圖片列表。這樣 tlbMain 工具欄就可以使用上面定義的 imlToolBar 圖像列表的圖片了。 創(chuàng)建狀態(tài)欄應(yīng)用程序中的狀態(tài)欄用于顯示當前狀態(tài)下應(yīng)用程序或者操作系統(tǒng)的執(zhí)行狀態(tài)。這樣，狀態(tài)欄的創(chuàng)建就完成了，至此，主窗口 frmMain 的界面就全部創(chuàng)建完成了，效果如下所示。（5） 、利用 Adodc 控件連接數(shù)據(jù)庫。（9） 、當在主窗口菜單欄中依次選擇“日常業(yè)務(wù)”→“采購單”菜單項時，需要加載 frmCGD 窗體。有異常跳轉(zhuǎn) = adCmdText = Select from 商品名稱 Product 39。如果已有記錄則在原來的序號上遞增 .MoveLast If !票號 Then Dim lsph As String lsph = Right(Trim(!票號), 3) + 1 = $ amp。設(shè)計銷售單的操作步驟如下：（1） 、按照前述方法在應(yīng)用程序中新增一個 Windows 窗口 frmXSD。如果單擊的工具欄按鈕的關(guān)鍵字為 CGD，則觸發(fā)菜單欄中的”采購單“菜單項的單擊事件 Case Is = CGD CGD_Click 39。設(shè)置其連接屬性使其連接到數(shù)據(jù)庫并檢索數(shù)據(jù)表中的所有記錄。 商品名稱=）connstring = Provider=。下面需要將 frmKCPD 窗口和主窗口中相應(yīng)的菜單綁定。（3） 利用 Adodc 控件連接到數(shù)據(jù)庫。（6） 在 frmCPGL 窗體設(shè)置中放置 5 個命令按鈕控件，設(shè)置其 Caption 為“添加” 、 “修改。（2） 設(shè)置 frmCPGL 窗口的 Icon 屬性為 System。Server=(local)If 1 Then (connstring)End If (strUpdate)myerr:End Sub（9） 、當用戶單擊“退出窗口”按鈕時，需要調(diào)用窗體的卸載事件。（8） 、當用戶單擊“庫存盤點”按鈕后，需要根據(jù)數(shù)據(jù)表更新字段的值，38雙擊 Command1 控件，在其單擊事件中輸入如下代碼：Private Sub Command1_Click()On Error GoTo myerrDim conn As New Dim rs As New Dim strUpdata As StringDim connstring As StringstrUpdate = update product set 庫存=（select sum(數(shù)量) from purchase where amp。（2） 、設(shè)置 frmKCPD 窗口的屬性。顯示 frmXSD 窗體 = False 39。系統(tǒng)當前日期的字符串形式賦值myerr:End Sub 創(chuàng)建銷售單菜單欄中的第 2 項是銷售單。從第一條開始逐條添加到 Combo3 的子項中 DoEvents (!供應(yīng)商簡稱) .MoveNext Loop End With = select 票號 from purchase order by 票號 39。輸入如下代碼：Private Sub tlbMain_ButtonClick(ByVal Button As ) Select Case 39。（8） 、至此，采購單的界面部分就設(shè)計完成了。（3） 、使用 Adode 控件連接數(shù)據(jù)庫，首先將這個控件添加到工具箱中，在工具箱中單擊鼠標右鍵，在彈出的快捷菜單中選擇“部件”菜單項。這樣就在狀態(tài)欄中添加了一個寬度為 6 的狀態(tài)條，在中間顯示“進銷存管理系統(tǒng)”文本。（9） 、單擊“確定”按鈕，完成工具欄的創(chuàng)建。（4） 、用鼠標右鍵單擊 tlbMain 控件，在彈出的快捷菜單中選擇“屬性”菜單項。這避免了用戶去菜單欄中層層查找需要的功能而浪費時間。N） ”，在“名稱”文本框中輸入“RCYW” 。在工程資源管理器窗口中單擊鼠標右鍵，29在彈出的快捷菜單中依次選擇“添加”→“添加窗體”項。提示錯誤 Exit Sub Else 39。顯示主窗口 Else 39。 Trim() ) 39。首先要求用戶名不能為空 MsgBox 用戶名不能為空!, vbOKOnly + vbExclamation, 警告! 39。（5） 、在“可用的引用”列表中選擇“Microsoft ActiveX Data Objects Library”項，然后單擊“確定”按鈕即可。這樣，就成功的創(chuàng)建了進銷存管理系統(tǒng)工程。25整個系統(tǒng)運行的流程圖大致如圖所示。銷售查詢：統(tǒng)計查詢功能中的一個模塊，提供了對銷售記錄的多種字段的復(fù)合式查詢功能。采購單中的供應(yīng)商必須是 Supplier 數(shù)據(jù)表中有相應(yīng)的記錄。Users 數(shù)據(jù)表的結(jié)構(gòu)如下圖所示：字段名 數(shù)據(jù)類型 長度 是否允許為空 說明用戶 Nvarchar 10 否 主鍵，唯一標識系統(tǒng)用戶密碼 nvarchar 10 是 用戶密碼，可以為空 Purchase 數(shù)據(jù)表結(jié)構(gòu)Purchase 數(shù)據(jù)表主要用于存儲企業(yè)的采購信息，比如采購商品的名稱、價格、供應(yīng)商編號、采購數(shù)量、采購日期、經(jīng)手人等。Sale 表 用于存儲銷售記錄的基本信息。 ER 圖型關(guān)系模型的轉(zhuǎn)化要解決的問題是如何將實體和實體間的關(guān)系轉(zhuǎn)化為關(guān)系模式，如何確定這些關(guān)系模式的屬性和代碼。從而使概念模型成為現(xiàn)實世界到機器世界的一個過度的中間層次。 數(shù)據(jù)庫設(shè)計的一般性原則 數(shù)據(jù)庫設(shè)計的一般性原則如下所示：第一個基本原則：對于每一個要存儲其信息的實體（或事物） ，我們都應(yīng)該給他一個自己的表；第二個處理規(guī)則：如果需要在一個列里存儲多個值，那證明你的設(shè)想是有缺陷的。數(shù)據(jù)存儲是數(shù)據(jù)及其結(jié)構(gòu)停留或保存的地方，也是數(shù)據(jù)流的來源和去向之一。數(shù)據(jù)字典通常包括一下 5 個部分：（1）數(shù)據(jù)項。（4）各類文檔、數(shù)據(jù)，它表明了數(shù)據(jù)的載體?？偨Y(jié)需求分析的步驟為：（1）通過對現(xiàn)實化境的調(diào)查研究，獲得當前系統(tǒng)的具體模型；11（2）去掉具體模型中的非本質(zhì)因素，抽象出當前系統(tǒng)的邏輯模型；（3）分析當前系統(tǒng)與目標系統(tǒng)的差別、建立了目標的邏輯模型；（4）對目標進行完善和補充，并寫出完整的需求說明；（5）對需求說明進行復(fù)審，直到確認文檔齊全，并且符合用戶的全部需求為止。第二章 系統(tǒng)的需求分析第二章 系統(tǒng)的需求分析 需求分析的目標需求分析的目標：按照系統(tǒng)規(guī)劃原則在業(yè)務(wù)系統(tǒng)項目范圍內(nèi)，具體明確系統(tǒng)開發(fā)的目標和用戶的信息要求。 可行性研究 技術(shù)可行性本系統(tǒng)所采用的軟硬件平臺具體要求如下：●硬件：處理器：英特爾 賽揚 D325 主板：雙敏 UP4PEN Pro。使用集合方法可按名稱（文本字符串）或序號（整形數(shù)）對集合中的對象進行檢索。它簡單易學(xué)、效率高，且功能強大。我國目前共有各類企業(yè) 800 萬家，這些企業(yè)在近 20 年來，在不同程度上都遇到了企業(yè)信息系統(tǒng)的建設(shè)問題。通過計算機的高速運算和處理提高數(shù)據(jù)處理效率。以進、銷、存管理為基本要求，主要功能包括：用戶名和密碼的管理、基本信息的輸入和修改、進貨信息的管理、銷售信息的管理、庫存信息的管理、財務(wù)信息的管理。系統(tǒng)開發(fā)的總體任務(wù)是實現(xiàn)各種信息的系統(tǒng)化、規(guī)范化、自動化。其發(fā)展過程大致分為如下 3 個階段：（1）電子數(shù)據(jù)處理系統(tǒng)（Electronic Date Processing System,EDPS）電子數(shù)據(jù)處理系統(tǒng)是數(shù)據(jù)處理的計算機化。6 國內(nèi)管理信息系統(tǒng)發(fā)展現(xiàn)狀企業(yè)是國民經(jīng)濟的基本單元，企業(yè)信息系統(tǒng)建設(shè)是我國企業(yè)走向現(xiàn)代化的必由之路。 開發(fā)工具簡介 Visual basic 簡介Visual basic 是一種可視化的、面向?qū)ο蠛筒捎檬录?qū)動方式的高級語言程序設(shè)計工具，可用于開發(fā) Windows 環(huán)境下的各類應(yīng)用程序。ADO 提供“集合” ，這是一種可方便地包含其他特殊類型對象的對象類型。（3） 、集成性，它已經(jīng)與 Windows 2020 以上的操作系統(tǒng)緊密結(jié)合，能夠提供更加有效的安全性?；谝陨戏治?，系統(tǒng)實現(xiàn)是可行的。接著進入需求描述階段，以需求模型為基礎(chǔ)，考慮到問題的軟件可解性，生成規(guī)格說明和初步的用戶手冊。（3）業(yè)務(wù)數(shù)據(jù)流動及方向，它表達了業(yè)務(wù)數(shù)據(jù)的流動方向，這個方向用雙箭頭表示。 數(shù)據(jù)字典數(shù)據(jù)字典是各類數(shù)據(jù)描述的集合，它是進行詳細的數(shù)據(jù)收集和數(shù)據(jù)分析后所獲得的主要成果。（4）數(shù)據(jù)存儲。另外，合理的數(shù)據(jù)庫結(jié)構(gòu)將非常有利于程序的實現(xiàn)。它應(yīng)該能夠真實、充分的反映現(xiàn)實世界中事物和事物直接的聯(lián)系；應(yīng)該簡潔、明晰、獨立于機器，容易理解，方便數(shù)據(jù)庫設(shè)計人員和應(yīng)用人員進行交流；應(yīng)該易于變動，便于修改；應(yīng)該很容易向關(guān)系、層次或網(wǎng)狀等各種數(shù)據(jù)模型轉(zhuǎn)變，方便的導(dǎo)出與 DBMS 有關(guān)的邏輯模型。這些模式在功能性、完整性和一致性約束及數(shù)據(jù)庫的可擴充性等方面應(yīng)滿足用戶的各種需求。Purchase 表 用于存儲采購記錄的基本信息；Customer 數(shù)據(jù)表的結(jié)構(gòu)如下表所示：Customer 數(shù)據(jù)表結(jié)構(gòu)字段名 數(shù)據(jù)類型 長度 是否允許為空 說明客戶簡稱 Nvarcher 10 否 主鍵，唯一標識客戶記錄客戶全稱 Nvarcher 100 是 客戶單位全稱地址 Nvarcher 100 是郵政編碼 Nchar 6 是電話 Numeric 9 是傳真 Numeric 9 是聯(lián)系人 Nvarcher 30 是聯(lián)系人電話 Nvarcher 9 是開戶銀行 Nvarcher 100 是銀行賬號 Numeric 13 是企業(yè)網(wǎng)址 Nvarcher 50 是20 Users 數(shù)據(jù)表結(jié)構(gòu)Users 數(shù)據(jù)表主要用于存儲本系統(tǒng)的用戶信息，包括用戶的名稱和系統(tǒng)登陸密碼。如果采購一種新商品，必須先在 Product 數(shù)據(jù)表中增加這種商品的信息；進銷存管理系統(tǒng)日常業(yè)務(wù) 庫存管理 統(tǒng)計查詢 基礎(chǔ)信息 系統(tǒng)設(shè)置 退出系統(tǒng)采購單銷售單庫存盤點產(chǎn)品管理庫存查詢采購查詢銷售查詢供應(yīng)商管理客戶管理密碼設(shè)置關(guān)于系統(tǒng)圖 4 1 2 進銷存管理系統(tǒng)模塊組織結(jié)構(gòu)圖下面對各個模塊的設(shè)計功能進行說明。為了管理的方便和規(guī)范，每筆銷售單對應(yīng)一個惟一的銷售單票號。為了方便對多個客戶的管理和比較，本案例中也將此功能用 Tab 頁的形式實現(xiàn)，既方便對單個客戶信息的查看和編輯，又利于對客戶總體的評價和比較。為了防止用戶的誤操作，推出系統(tǒng)之前需要用戶確認推出的操作。（5） 、單擊工具欄上的保存按鈕，保存該工程。在菜單欄中一次選擇“工程”→“引用”菜單。在界面設(shè)計窗口中雙擊 cmbOK 控件，進入“確定”按鈕的單擊事件處理代碼中，輸入如下代碼：Private Sub cmdOK_Click() If Trim() = Then 39。如果數(shù)據(jù)庫沒有打開，則打開數(shù)據(jù)庫 (connstring) End If Set rs = (select * from users where 用戶 = amp。加載主窗口 39。 次機會!, vbOKOnly + vbExclamation, 提示 39。（1） 、在工程中添加一個窗體。在“標題”文本框中輸入“日常業(yè)務(wù)（amp。 創(chuàng)建工具欄在應(yīng)用程序的開發(fā)中，一般將使用比較頻繁的功能以工具欄的形式放