【正文】 建立復合式文檔(pound document)，這種文檔由來自多個不同應用程序的對象組成，文檔中的每個對象都與原來的應用程序相聯(lián)系，并可執(zhí)行與原來應用程序完全相同的操作。Visual Basic提供開放式數(shù)據(jù)連接，即ODBC功能，可通過直接訪問或建立連接的方式使用并操作后臺大型網(wǎng)絡數(shù)據(jù)庫，如SQL Server，Oracle等。事件驅動編程機制在用Visual Basic設計大型應用軟件時，不必建立具有明顯開始和結束的程序，而是編寫若干個微小的子程序，即過程。在設計對象時，不必編寫建立和描述每個對象的程序代碼，而是用工具畫在界面上，Visual Basic自動生成對象的程序代碼并封裝起來。只需要按設計要求的屏幕布局，用系統(tǒng)提供的工具，在屏幕上畫出各種“部件”，即圖形對象，并設置這些圖形對象的屬性。總的來說，Visual Basic具有以下特點：可視化編程：用傳統(tǒng)程序設計語言設計程序時，都是通過編寫程序代碼來設計用戶界面，在設計過程中看不到界面的實際顯示效果，必須編譯后運行程序才能觀察。 開發(fā)工具的選擇現(xiàn)在，市場上可以選購的應用開發(fā)產(chǎn)品很多，流行的也有數(shù)十種。而生產(chǎn)管理是一項瑣碎、復雜而又十分細致的工作，產(chǎn)品的供應、銷售、統(tǒng)計、發(fā)放的工作量很大，一般不允許出錯，如果實行手工操作，每月須手工填制大量的表格，這就會耗費工作人員大量的時間和精力，計算機進行生產(chǎn)管理工作，不僅能夠保證產(chǎn)品各種信息準確無誤、快速輸出，而且還可以利用計算機對有關產(chǎn)品的各種信息進行統(tǒng)計，服務于財務部門其他方面的核算和財務處理，:檢索迅速、查找方便、可靠性高、存儲量大、保密性好、壽命長、成本低等。通過我們大家的共同努力和指導老師的幫助，我們完成了整個系統(tǒng)的設計開發(fā)，基本實現(xiàn)了預期的目的，同時也通過這次設計開發(fā)過程增加了自身的實踐經(jīng)驗，提高了自身的設計開發(fā)能力，為將來工作打下了良好的基礎。Visual Basic是目前廣泛流行的一種面向對象的、具有可視化圖形界面的快速交互式數(shù)據(jù)庫前臺開發(fā)工具，它支持客戶/服務器機制、分布式組件開發(fā)與因特網(wǎng)應用。SQL Server是數(shù)據(jù)庫技術的倡導者和先驅，是標準SQL數(shù)據(jù)庫語言的產(chǎn)品。計算機局域網(wǎng)、辦公自動化已成為各大小企事業(yè)單位提高工作效率、簡化工作流程、創(chuàng)造更大經(jīng)濟效益的重要手段。因時間關系以及自身水平的限制，本系統(tǒng)的制作并不完善，所以難免有錯誤之處，請老師批評指正。系統(tǒng)的主要功能是制定采購計劃、物料需求計算、材料供求分析。對于前者要求建立起數(shù)據(jù)一致性和完整性強、數(shù)據(jù)安全性好的庫。隨著計算機在企業(yè)管理中應用的普及，利用計算機實現(xiàn)企業(yè)的各種管理工作勢在必行。計算機局域網(wǎng)、辦公自動化已成為各大小企事業(yè)單位提高工作效率、簡化工作流程、創(chuàng)造更大經(jīng)濟效益的重要手段。本系統(tǒng)是典型的信息管理系統(tǒng)(MIS),其開發(fā)主要包括后臺數(shù)據(jù)庫的建立和維護以及前端應用程序的開發(fā)兩個方面。程序的設計使用了具有一系列嶄新功能的傳統(tǒng)數(shù)據(jù)庫開發(fā)工具Visual Basic 。由于Visual Basic采用的是Client/Server的體系結構，所以本系統(tǒng)可以在局域網(wǎng)上運行以適應需求。關鍵詞：SQL Server 2000數(shù)據(jù)庫，Visual ，基本信息管理前言進入二十一世紀以來，隨著社會的不斷進步和科學技術的飛速發(fā)展，信息技術進入了爆炸式的年代，信息技術與人們的生活工作已息息相關、密不可分。我們經(jīng)過分析研究，為了能使本系統(tǒng)能夠與現(xiàn)有系統(tǒng)更好地接軌，采用了目前使用率最高、保密性好的數(shù)據(jù)庫系統(tǒng)—SQL Server 2000數(shù)據(jù)庫，并選擇了Visual Basic 。SQL Server　2000　在數(shù)據(jù)庫管理、數(shù)據(jù)完整性檢查、數(shù)據(jù)庫查詢功能、數(shù)據(jù)庫安全性方面都具有強大的功能，而且它還在保密機制、備份與恢復、空間管理、開放式聯(lián)接以及開發(fā)工具方面提供了不同的手段和方法。建立與SQL Server數(shù)據(jù)庫的連接后，利用各類管理畫筆窗口和Visual Basic語言，開發(fā)一系列功能模塊，實現(xiàn)了對數(shù)據(jù)庫數(shù)據(jù)進行生成、處理、查詢、統(tǒng)計及字典維護等一系列功能，并能將新生成的數(shù)據(jù)制作成報表，以實現(xiàn)我們的設計思想。對于大中型企業(yè)來說，利用計算機支持企業(yè)高效率完成生產(chǎn)管理的日常事務，是適應現(xiàn)代企業(yè)制度要求、推動企業(yè)生產(chǎn)走向科學化、規(guī)范化的必要條件；而企業(yè)生產(chǎn)制造的關鍵在于如何規(guī)劃和計劃各種資源在時間、地點、產(chǎn)品之間的合理配備，如何按計劃監(jiān)督責任方對資源的使用情況，如何根據(jù)預測和歷史情況為決策者提供更有效地利用資源的分析數(shù)據(jù)。結合我們目前的現(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環(huán)境下，利用事件驅動的編程機制、新穎易用的可視化設計工具，使用Windows內部的應用程序接口(API)函數(shù)，以及動態(tài)鏈接庫(DLL)、對象的鏈接與嵌入(OLE)、開放式數(shù)據(jù)訪問(ODBC)等技術，可以高效、快速地開發(fā)出Windows環(huán)境下功能強大、圖形界面豐富的應用軟件系統(tǒng)。Visual Basic提供了可視化設計工具，把Windows界面設計的復雜性“封裝”起來，開發(fā)人員不必為界面設計而編寫大量程序代碼。在一般的面向對象程序設計語言中，對象由程序代碼和數(shù)據(jù)組成，是抽象的概念；而Visual Basic則是應用面向對象的程序設計方法，把程序和數(shù)據(jù)封裝起來作為一個對象，并為每個對象賦予應有的屬性，使對象成為實在的東西。在設計Visual Basic程序的過程中，隨時可以運行程序，而在整個程序設計好之后，可以編譯生成可執(zhí)行文件(.EXE)，脫離Visual Basic環(huán)境，直接在Windows環(huán)境下運行。同時，Visual Basic還能直接編輯和訪問其他外部數(shù)據(jù)庫，如dBASE，F(xiàn)oxPro，Paradox等，這些數(shù)據(jù)庫格式都可以用Visual Basic編輯和處理。OLE技術是Microsoft公司對象技術的戰(zhàn)略，它把多個應用程序合為一體，將每個應用程序看做是一個對象進行鏈接和嵌入，是一種應用程序一體化的技術。此外，通過動態(tài)鏈接庫，還可以調用Windows應用程序接口(API)函數(shù)。SQL Server 2000繼承了數(shù)據(jù)軟件設計和引擎方面的優(yōu)勢，已經(jīng)成為新一代網(wǎng)絡應用程序的最佳數(shù)據(jù)庫和分析解決方案之一。ActiveX Data Objects是Microsoft公司應用Universal data Access的一種方式。如果需要，Command和Rrcordest對象能夠創(chuàng)建一個絕對的Connection對象，所以僅通過創(chuàng)建一個單一的對象就可以訪問一系列的記錄或運行數(shù)據(jù)庫函數(shù)。Record對象也可以用來說明Recordset對象中的數(shù)據(jù)行。第四章根據(jù)需求分析的結果，對系統(tǒng)進行詳細設計，主要介紹用Visual 。工業(yè)企業(yè)基本信息基本信息錄入銷售信息錄入進貨信息設置 基本信息錄入基本信息錄入基本信息管理庫存統(tǒng)計庫存信息管理銷售信息管理進貨信息管理針對商業(yè)企業(yè)業(yè)務的需求，能過對商業(yè)企業(yè)業(yè)務的需求，能過對商業(yè)企業(yè)管理工作過程的內容和數(shù)據(jù)流程分析，設計如下面所示的數(shù)據(jù)項和數(shù)據(jù)結構：產(chǎn)品類別信息，包括的數(shù)據(jù)項有：類別編號，類別名稱。業(yè)務員類別信息，包括的數(shù)據(jù)頁有：類別編號，類別名稱等。入庫單信息，包括的數(shù)據(jù)項前：入庫日期，編號，業(yè)務員，供應商編號，產(chǎn)品編號，數(shù)量，單價，折扣比例，總金額，是否是即時付款，是否記賬，預付比例，備注信息等。系統(tǒng)開發(fā)的總體任務是實現(xiàn)各種住處的系統(tǒng)化，規(guī)范化和自動化系統(tǒng)功能分析是在系統(tǒng)開發(fā)的總體任務的基礎上完成。包括轉倉單的管理，產(chǎn)品盤點和轉倉信息的查詢等。3．3數(shù)據(jù)庫的邏輯結構設計 概念結構設計就是將需求分析得到的用戶需求抽象為信息結構即概念模型的過程。在這一階段我們上一階段所設計的各實體及屬性就轉換為新數(shù)據(jù)庫中各個表中的記錄的數(shù)據(jù)項。每個表格表示在數(shù)據(jù)庫的一個表。 由于系統(tǒng)中各個功能模塊都將頻繁使用數(shù)據(jù)庫中的各種數(shù)據(jù)，因此需要一個公共數(shù)據(jù)操作函數(shù)，用以執(zhí)行各種SQL語句。 39。 _ Resume ExecuteSQL_ExitEnd FunctionExecuteSQL 函數(shù)有兩個參數(shù)：SQL和MsgString。　Public Function ConnectString() _ As String39。user id =sa。一旦按下回車鍵，將返回Tab鍵，下一個控件自動獲得輸入焦點。代碼如下：Sub Main() Dim fLogin As New frmLogin vbModal If Not Then 39。for GF setup　　　供應商設置全局變量Public gintKHSmode As Integer 39。for CK setup　　　　倉庫設置全局變量Public gintWZLBSmode As Integer 39。for xiao shou ding dan　銷售訂單全局變量Public gintOUTHmode As Integer 39。for YING FU　　應付全局變量4．2基本信息設置模塊的創(chuàng)建 在基本信息設置中我們要實現(xiàn)的是：添加修改產(chǎn)品信息、添加修改產(chǎn)品類別信息、添加修改客戶信息、添加修改供應商信息、添加修改業(yè)務員類別的信息、添加業(yè)務員信息添加修改倉庫信息選擇“基本信息設置｜產(chǎn)品設置”菜單，將出現(xiàn)下圖所示窗體。設置各列的對齊方式 For i = 0 To 10 .ColAlignment(i) = 0 Next i 39。 End Select End If Next i Loop End With End Sub在窗體顯示時，可以控制窗體中各個控件按照要位置顯示，可以在窗體的Resize事件中加入代碼，代碼如下： Private Sub Form_Resize() If vbMinimized And vbMinimized Then 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。 ) = Then Select Case intCount Case 0 sMeg = 款號 Case 1 sMeg = 名稱 Case 2 sMeg = 單位 Case 3 sMeg = 入庫價格 Case 4 sMeg = 分銷價格 Case 5 sMeg = 零售價格 Case 6 sMeg = 生產(chǎn)廠家 Case 7 sMeg = 設置日期 End Select sMeg = sMeg amp。 amp。先刪除已有記錄 txtSQL = delete from dm_wz where dm =39。 Set mrc = ExecuteSQL(txtSQL, msgText) 39。 39。 39。 39。 39。 amp。 Trim((, 1)) amp。 39。在實現(xiàn)這個模塊功能的過程中我們注意到需要有多個數(shù)據(jù)表的關聯(lián)：比如在修改入庫信息的時候，首先要刪除入庫記錄，