【正文】 包括銷售單的管理以及銷售信息的查詢等。邏輯結構設計的任務就是把設計好的基本ER圖轉換為與選用DBMS產(chǎn)品所支持的數(shù)據(jù)模型相符合的邏輯結構。同時在這個模塊中設置公用模塊來存放整個工程項目公用的函數(shù)、過程和全局變量。 _ 條記錄 End IfExecuteSQL_Exit: Set rst = Nothing Set n = Nothing Exit Function ExecuteSQL_Error: MsgString = 查詢錯誤: amp。data source=d2jf21。這個判斷需要在系統(tǒng)運行的最初的進行，因此將代碼放在公用模塊中。for YWY setup　　業(yè)務員設置全局變量Public gintCKSmode As Integer 39。for ying shou　　　應付全局變量Public gintOFFERmode As Integer 39。 , yyyymmdd) Case Else .TextMatrix(.Rows 1, i) = (i 1) amp。代碼如下：Private Sub cmdSave_Click() Dim intCount As Integer Dim sMeg As String Dim msgText As String For intCount = 0 To 7 If Trim(txtItem(intCount) amp。 Set mrc = ExecuteSQL(txtSQL, msgText) If = False Then MsgBox 已經(jīng)存在此產(chǎn)品編號的記錄！, vbOKOnly + vbExclamation, 警告 txtItem(0).SetFocus Exit Sub End If End If 39。 Trim(txtItem(intCount)) amp。 Trim(txtItem(intCount)) amp。代碼如下：Private Sub cmdModify_Click() Dim intCount As Integer If 1 Then gintDHmode = 2 intCount = If intCount 0 Then = select * from dh where dh_no =39。 Trim((intCount, 1)) amp。 Set mrc = ExecuteSQL(txtSQL, msgText) Unload frmdh = select dh_no,in_date,ywman,gfdm,wzdm,sl,in_danj,i_zk,i_zke,bz from dh End If End IfEnd Sub4．3進貨信息管理模塊的創(chuàng)建 在這個模塊中我們要實現(xiàn)的功能是：訂貨單的管理、入庫單的管理、進貨信息的查詢。 Trim((intCount, 1)) amp。,39。,39。 amp。 不能為空！ MsgBox sMeg, vbOKOnly + vbExclamation, 警告 txtItem(intCount).SetFocus Exit Sub End If Next intCount For intCount = 3 To 5 If Not IsNumeric(Trim(txtItem(intCount))) Then sMeg = 產(chǎn)品價格 sMeg = sMeg amp。邊界處理 If 10 * Then Exit Sub End If If + / 2 Then Exit Sub End If 39。這個窗體用來顯示產(chǎn)品設置信息，并且可以對各條記錄進行操作。for WZLB setup　產(chǎn)品類別設置全局變量Public gintDHmode As Integer 39。Login Failed so exit app End End If Unload fLogin Set fMainForm = New frmMain End Sub過程Main將在系統(tǒng)啟動時首先執(zhí)行，這就保證對用戶的管理。password=fwqa。其中SQL用來存放需要執(zhí)行的SQL語句，MsgString用來返回執(zhí)行的提示信息。添加函數(shù)ExecuteSQL,代碼如下：Public Function ExecuteSQL(ByVal SQL _ As String, MsgString As String) _ As 39。由于我們使用的關系型數(shù)據(jù)庫SQL Server 2000，所以概念結構轉化關系模型，再進行特定的轉換成為SQL所支持的數(shù)據(jù)模型，再進行優(yōu)化。工業(yè)企業(yè)進銷存系統(tǒng) 供應商設置 商品盤點轉倉單的錄入和修改 轉倉信息查詢銷售單的錄入和修改銷售信息查詢 密碼管理　用戶管理　　 商品設置 商品類別設置 業(yè)務員類別設置 業(yè)務員設置 倉庫設置 進貨信息杳詢訂貨單的錄入和修改入庫單的錄入和修改基本信息設置銷售信息管理 系統(tǒng)信息進貨信息管理庫存信息管理 第三章 數(shù)據(jù)庫的設計3．1數(shù)據(jù)庫設計概述數(shù)據(jù)庫設計是建立數(shù)據(jù)庫及其應用系統(tǒng)的技術，是信息系統(tǒng)開發(fā)和建設中的核心技術，是指對于一個給定的環(huán)境，構造最優(yōu)的數(shù)據(jù)庫模式，建立數(shù)據(jù)庫及其應用系統(tǒng)，使之能夠有效地存儲數(shù)據(jù)，滿足各種用戶的應用需求。銷售出貨單信息，包括的數(shù)據(jù)項有：銷售日期，編號，業(yè)務員，客戶編號，產(chǎn)品編號，數(shù)量，單價，折扣比例，總金額，是否即時付款，是否記帳，預付比例，備注信息等。產(chǎn)品信息，包括的數(shù)據(jù)項有：產(chǎn)品編號，產(chǎn)品名稱，計量單位，類別，入庫價格，分銷價格，零售價格，生產(chǎn)廠家，更新日期，備注信息等。Steram對象用于對Record對象相關信息和文件的二進制信息進行讀寫。Universal data Access允許用戶為相關和非相關數(shù)據(jù)使用同一高速界面，同時還可以提供一個使用簡單、語言獨立的界面。SQL Server 2000是在SQL Server 。Visual Basic提供開放式數(shù)據(jù)連接，即ODBC功能，可通過直接訪問或建立連接的方式使用并操作后臺大型網(wǎng)絡數(shù)據(jù)庫，如SQL Server，Oracle等。在設計對象時，不必編寫建立和描述每個對象的程序代碼，而是用工具畫在界面上，Visual Basic自動生成對象的程序代碼并封裝起來?？偟膩碚f，Visual Basic具有以下特點：可視化編程：用傳統(tǒng)程序設計語言設計程序時，都是通過編寫程序代碼來設計用戶界面，在設計過程中看不到界面的實際顯示效果，必須編譯后運行程序才能觀察。而生產(chǎn)管理是一項瑣碎、復雜而又十分細致的工作，產(chǎn)品的供應、銷售、統(tǒng)計、發(fā)放的工作量很大，一般不允許出錯，如果實行手工操作，每月須手工填制大量的表格，這就會耗費工作人員大量的時間和精力，計算機進行生產(chǎn)管理工作，不僅能夠保證產(chǎn)品各種信息準確無誤、快速輸出，而且還可以利用計算機對有關產(chǎn)品的各種信息進行統(tǒng)計，服務于財務部門其他方面的核算和財務處理，:檢索迅速、查找方便、可靠性高、存儲量大、保密性好、壽命長、成本低等。Visual Basic是目前廣泛流行的一種面向對象的、具有可視化圖形界面的快速交互式數(shù)據(jù)庫前臺開發(fā)工具，它支持客戶/服務器機制、分布式組件開發(fā)與因特網(wǎng)應用。計算機局域網(wǎng)、辦公自動化已成為各大小企事業(yè)單位提高工作效率、簡化工作流程、創(chuàng)造更大經(jīng)濟效益的重要手段。系統(tǒng)的主要功能是制定采購計劃、物料需求計算、材料供求分析。隨著計算機在企業(yè)管理中應用的普及，利用計算機實現(xiàn)企業(yè)的各種管理工作勢在必行。本系統(tǒng)是典型的信息管理系統(tǒng)(MIS),其開發(fā)主要包括后臺數(shù)據(jù)庫的建立和維護以及前端應用程序的開發(fā)兩個方面。由于Visual Basic采用的是Client/Server的體系結構，所以本系統(tǒng)可以在局域網(wǎng)上運行以適應需求。我們經(jīng)過分析研究，為了能使本系統(tǒng)能夠與現(xiàn)有系統(tǒng)更好地接軌，采用了目前使用率最高、保密性好的數(shù)據(jù)庫系統(tǒng)—SQL Server 2000數(shù)據(jù)庫，并選擇了Visual Basic 。建立與SQL Server數(shù)據(jù)庫的連接后，利用各類管理畫筆窗口和Visual Basic語言，開發(fā)一系列功能模塊，實現(xiàn)了對數(shù)據(jù)庫數(shù)據(jù)進行生成、處理、查詢、統(tǒng)計及字典維護等一系列功能，并能將新生成的數(shù)據(jù)制作成報表，以實現(xiàn)我們的設計思想。結合我們目前的現(xiàn)有條件設備，我們采用了SLQ Server 2000數(shù)據(jù)庫系統(tǒng)和Visual Basic ，設計開發(fā)了《企業(yè)進銷存管理系統(tǒng)》，開發(fā)了數(shù)據(jù)生成、數(shù)據(jù)匯總、數(shù)據(jù)查詢、數(shù)據(jù)統(tǒng)計和維護等幾個小模塊，可以從現(xiàn)有數(shù)據(jù)中提取企業(yè)生產(chǎn)制造的專用數(shù)據(jù)，進行分類匯總，生成每日報表和每月報表。Visual Basic提供了可視化設計工具，把Windows界面設計的復雜性“封裝”起來，開發(fā)人員不必為界面設計而編寫大量程序代碼。在設計Visual Basic程序的過程中，隨時可以運行程序，而在整個程序設計好之后，可以編譯生成可執(zhí)行文件(.EXE)，脫離Visual Basic環(huán)境，直接在Windows環(huán)境下運行。OLE技術是Microsoft公司對象技術的戰(zhàn)略，它把多個應用程序合為一體，將每個應用程序看做是一個對象進行鏈接和嵌入，是一種應用程序一體化的技術。SQL Server 2000繼承了數(shù)據(jù)軟件設計和引擎方面的優(yōu)勢，已經(jīng)成為新一代網(wǎng)絡應用程序的最佳數(shù)據(jù)庫和分析解決方案之一。如果需要，Command和Rrcordest對象能夠創(chuàng)建一個絕對的Connection對象，所以僅通過創(chuàng)建一個單一的對象就可以訪問一系列的記錄或運行數(shù)據(jù)庫函數(shù)。第四章根據(jù)需求分析的結果，對系統(tǒng)進行詳細設計，主要介紹用Visual 。業(yè)務員類別信息，包括的數(shù)據(jù)頁有：類別編號，類別名稱等。系統(tǒng)開發(fā)的總體任務是實現(xiàn)各種住處的系統(tǒng)化，規(guī)范化和自動化系統(tǒng)功能分析是在系統(tǒng)開發(fā)的總體任務的基礎上完成。3．3數(shù)據(jù)庫的邏輯結構設計 概念結構設計就是將需求分析得到的用戶需求抽象為信息結構即概念模型的過程。每個表格表示在數(shù)據(jù)庫的一個表。 39?！ublic Function ConnectString() _ As String39。一旦按下回車鍵，將返回Tab鍵，下一個控件自動獲得輸入焦點。for GF setup　　　供應商設置全局變量Public gintKHSmode As Integer 39。for xiao shou ding dan　銷售訂單全局變量Public gintOUTHmode As Integer 39。設置各列的對齊方式 For i = 0 To 10 .ColAlignment(i) = 0 Next i 39。 添加 For i = 0 To 8 txtItem(i).Text = Next i ElseIf gintWZSmode = 2 Then Set mrc = ExecuteSQL(txtSQL, msgText) If = False Then With mrc For intCount = 0 To 2 txtItem(intCount) = .Fields(intCount) Next intCount For intCount = 3 To 8 txtItem(intCount) = .Fields(intCount) Next intCount End With txtItem(0).Enabled = False End If = amp。 amp。 Set mrc = ExecuteSQL(txtSQL, msgText) 39。 39。 39。 Trim((, 1)) amp。在實現(xiàn)這個模塊功能的過程中我們注意到需要有多個數(shù)據(jù)表的關聯(lián)：比如在修改入庫信息的時候，首先要刪除入庫記錄，