【正文】 39。 amp。 39。 39。先刪除已有記錄 txtSQL = delete from dm_wz where dm =39。 ) = Then Select Case intCount Case 0 sMeg = 款號(hào) Case 1 sMeg = 名稱 Case 2 sMeg = 單位 Case 3 sMeg = 入庫價(jià)格 Case 4 sMeg = 分銷價(jià)格 Case 5 sMeg = 零售價(jià)格 Case 6 sMeg = 生產(chǎn)廠家 Case 7 sMeg = 設(shè)置日期 End Select sMeg = sMeg amp。 End Select End If Next i Loop End With End Sub在窗體顯示時(shí)，可以控制窗體中各個(gè)控件按照要位置顯示，可以在窗體的Resize事件中加入代碼，代碼如下： Private Sub Form_Resize() If vbMinimized And vbMinimized Then 39。for YING FU　　應(yīng)付全局變量4．2基本信息設(shè)置模塊的創(chuàng)建 在基本信息設(shè)置中我們要實(shí)現(xiàn)的是：添加修改產(chǎn)品信息、添加修改產(chǎn)品類別信息、添加修改客戶信息、添加修改供應(yīng)商信息、添加修改業(yè)務(wù)員類別的信息、添加業(yè)務(wù)員信息添加修改倉庫信息選擇“基本信息設(shè)置｜產(chǎn)品設(shè)置”菜單，將出現(xiàn)下圖所示窗體。for CK setup　　　　倉庫設(shè)置全局變量Public gintWZLBSmode As Integer 39。代碼如下：Sub Main() Dim fLogin As New frmLogin vbModal If Not Then 39。user id =sa。 _ Resume ExecuteSQL_ExitEnd FunctionExecuteSQL 函數(shù)有兩個(gè)參數(shù)：SQL和MsgString。 由于系統(tǒng)中各個(gè)功能模塊都將頻繁使用數(shù)據(jù)庫中的各種數(shù)據(jù)，因此需要一個(gè)公共數(shù)據(jù)操作函數(shù)，用以執(zhí)行各種SQL語句。在這一階段我們上一階段所設(shè)計(jì)的各實(shí)體及屬性就轉(zhuǎn)換為新數(shù)據(jù)庫中各個(gè)表中的記錄的數(shù)據(jù)項(xiàng)。包括轉(zhuǎn)倉單的管理，產(chǎn)品盤點(diǎn)和轉(zhuǎn)倉信息的查詢等。入庫單信息，包括的數(shù)據(jù)項(xiàng)前：入庫日期，編號(hào)，業(yè)務(wù)員，供應(yīng)商編號(hào)，產(chǎn)品編號(hào)，數(shù)量，單價(jià)，折扣比例，總金額，是否是即時(shí)付款，是否記賬，預(yù)付比例，備注信息等。工業(yè)企業(yè)基本信息基本信息錄入銷售信息錄入進(jìn)貨信息設(shè)置 基本信息錄入基本信息錄入基本信息管理庫存統(tǒng)計(jì)庫存信息管理銷售信息管理進(jìn)貨信息管理針對(duì)商業(yè)企業(yè)業(yè)務(wù)的需求，能過對(duì)商業(yè)企業(yè)業(yè)務(wù)的需求，能過對(duì)商業(yè)企業(yè)管理工作過程的內(nèi)容和數(shù)據(jù)流程分析，設(shè)計(jì)如下面所示的數(shù)據(jù)項(xiàng)和數(shù)據(jù)結(jié)構(gòu)：產(chǎn)品類別信息，包括的數(shù)據(jù)項(xiàng)有：類別編號(hào)，類別名稱。Record對(duì)象也可以用來說明Recordset對(duì)象中的數(shù)據(jù)行。ActiveX Data Objects是Microsoft公司應(yīng)用Universal data Access的一種方式。此外，通過動(dòng)態(tài)鏈接庫，還可以調(diào)用Windows應(yīng)用程序接口(API)函數(shù)。同時(shí)，Visual Basic還能直接編輯和訪問其他外部數(shù)據(jù)庫，如dBASE，F(xiàn)oxPro，Paradox等，這些數(shù)據(jù)庫格式都可以用Visual Basic編輯和處理。在一般的面向?qū)ο蟪绦蛟O(shè)計(jì)語言中，對(duì)象由程序代碼和數(shù)據(jù)組成，是抽象的概念；而Visual Basic則是應(yīng)用面向?qū)ο蟮某绦蛟O(shè)計(jì)方法，把程序和數(shù)據(jù)封裝起來作為一個(gè)對(duì)象，并為每個(gè)對(duì)象賦予應(yīng)有的屬性，使對(duì)象成為實(shí)在的東西。在Visual Basic環(huán)境下，利用事件驅(qū)動(dòng)的編程機(jī)制、新穎易用的可視化設(shè)計(jì)工具，使用Windows內(nèi)部的應(yīng)用程序接口(API)函數(shù)，以及動(dòng)態(tài)鏈接庫(DLL)、對(duì)象的鏈接與嵌入(OLE)、開放式數(shù)據(jù)訪問(ODBC)等技術(shù)，可以高效、快速地開發(fā)出Windows環(huán)境下功能強(qiáng)大、圖形界面豐富的應(yīng)用軟件系統(tǒng)。對(duì)于大中型企業(yè)來說，利用計(jì)算機(jī)支持企業(yè)高效率完成生產(chǎn)管理的日常事務(wù)，是適應(yīng)現(xiàn)代企業(yè)制度要求、推動(dòng)企業(yè)生產(chǎn)走向科學(xué)化、規(guī)范化的必要條件；而企業(yè)生產(chǎn)制造的關(guān)鍵在于如何規(guī)劃和計(jì)劃各種資源在時(shí)間、地點(diǎn)、產(chǎn)品之間的合理配備，如何按計(jì)劃監(jiān)督責(zé)任方對(duì)資源的使用情況，如何根據(jù)預(yù)測(cè)和歷史情況為決策者提供更有效地利用資源的分析數(shù)據(jù)。SQL Server　2000　在數(shù)據(jù)庫管理、數(shù)據(jù)完整性檢查、數(shù)據(jù)庫查詢功能、數(shù)據(jù)庫安全性方面都具有強(qiáng)大的功能，而且它還在保密機(jī)制、備份與恢復(fù)、空間管理、開放式聯(lián)接以及開發(fā)工具方面提供了不同的手段和方法。關(guān)鍵詞：SQL Server 2000數(shù)據(jù)庫，Visual ，基本信息管理前言進(jìn)入二十一世紀(jì)以來，隨著社會(huì)的不斷進(jìn)步和科學(xué)技術(shù)的飛速發(fā)展，信息技術(shù)進(jìn)入了爆炸式的年代，信息技術(shù)與人們的生活工作已息息相關(guān)、密不可分。程序的設(shè)計(jì)使用了具有一系列嶄新功能的傳統(tǒng)數(shù)據(jù)庫開發(fā)工具Visual Basic 。計(jì)算機(jī)局域網(wǎng)、辦公自動(dòng)化已成為各大小企事業(yè)單位提高工作效率、簡化工作流程、創(chuàng)造更大經(jīng)濟(jì)效益的重要手段。對(duì)于前者要求建立起數(shù)據(jù)一致性和完整性強(qiáng)、數(shù)據(jù)安全性好的庫。因時(shí)間關(guān)系以及自身水平的限制，本系統(tǒng)的制作并不完善，所以難免有錯(cuò)誤之處，請(qǐng)老師批評(píng)指正。SQL Server是數(shù)據(jù)庫技術(shù)的倡導(dǎo)者和先驅(qū)，是標(biāo)準(zhǔn)SQL數(shù)據(jù)庫語言的產(chǎn)品。通過我們大家的共同努力和指導(dǎo)老師的幫助，我們完成了整個(gè)系統(tǒng)的設(shè)計(jì)開發(fā)，基本實(shí)現(xiàn)了預(yù)期的目的，同時(shí)也通過這次設(shè)計(jì)開發(fā)過程增加了自身的實(shí)踐經(jīng)驗(yàn)，提高了自身的設(shè)計(jì)開發(fā)能力，為將來工作打下了良好的基礎(chǔ)。 開發(fā)工具的選擇現(xiàn)在，市場上可以選購的應(yīng)用開發(fā)產(chǎn)品很多，流行的也有數(shù)十種。只需要按設(shè)計(jì)要求的屏幕布局，用系統(tǒng)提供的工具，在屏幕上畫出各種“部件”，即圖形對(duì)象，并設(shè)置這些圖形對(duì)象的屬性。事件驅(qū)動(dòng)編程機(jī)制在用Visual Basic設(shè)計(jì)大型應(yīng)用軟件時(shí)，不必建立具有明顯開始和結(jié)束的程序，而是編寫若干個(gè)微小的子程序，即過程。利用OLE技術(shù)，可以方便地建立復(fù)合式文檔(pound document)，這種文檔由來自多個(gè)不同應(yīng)用程序的對(duì)象組成，文檔中的每個(gè)對(duì)象都與原來的應(yīng)用程序相聯(lián)系，并可執(zhí)行與原來應(yīng)用程序完全相同的操作。 Enterprise Server的核心組件，它將減少電子商務(wù)、在線商務(wù)和數(shù)據(jù)倉儲(chǔ)應(yīng)用程序推向市場的時(shí)間，并對(duì)需要的環(huán)境提供可靠的支持。Record和Steram對(duì)象主要被用來支持訪問非數(shù)據(jù)露資源。第五章畢業(yè)設(shè)計(jì)小結(jié)，總結(jié)部分介紹了設(shè)計(jì)體會(huì)和編程體會(huì)，并指出了系統(tǒng)設(shè)計(jì)中的不足和改進(jìn)的方向。業(yè)務(wù)員信息，包括的有數(shù)據(jù)項(xiàng)：業(yè)務(wù)員員編號(hào)，業(yè)務(wù)員姓名，類別，電話號(hào)碼，家庭住址，身份證號(hào)碼，備注信息等。工業(yè)企業(yè)進(jìn)銷存系統(tǒng)需要完成的功能主要有： 包括產(chǎn)品設(shè)置，產(chǎn)品類別設(shè)置，供應(yīng)商設(shè)置，客戶設(shè)置，業(yè)務(wù)員類別設(shè)置，業(yè)務(wù)員設(shè)置，倉庫設(shè)置。它是整個(gè)數(shù)據(jù)庫設(shè)計(jì)的關(guān)鍵。創(chuàng)建數(shù)據(jù)庫和存儲(chǔ)過程如下：CREATE TABLE [dbo].[dh] ( [in_date] [datetime] NULL , [ywman] [char] (8) COLLATE Chinese_PRC_CI_AS NULL , [dh_no] [char] (8) COLLATE Chinese_PRC_CI_AS NOT NULL , [gfdm] [char] (8) COLLATE Chinese_PRC_CI_AS NULL , [wzdm] [char] (30) COLLATE Chinese_PRC_CI_AS NOT NULL , [sl] [numeric](10, 0) NOT NULL , [in_danj] [numeric](12, 2) NULL , [i_zk] [numeric](5, 0) NULL , [i_zke] [numeric](12, 2) NULL , [bz] [char] (100) COLLATE Chinese_PRC_CI_AS NULL ) ON [PRIMARY]GOCREATE TABLE [dbo].[dm_ck] ( [dm] [char] (6) COLLATE Chinese_PRC_CI_AS NOT NULL , [mc] [char] (40) COLLATE Chinese_PRC_CI_AS NULL , [bz] [char] (255) COLLATE Chinese_PRC_CI_AS NULL ) ON [PRIMARY]GOCREATE TABLE [dbo].[dm_gf] ( [dm] [char] (8) COLLATE Chinese_PRC_CI_AS NOT NULL , [mc] [char] (40) COLLATE Chinese_PRC_CI_AS NULL , [addr] [char] (40) COLLATE Chinese_PRC_CI_AS NULL , [yzbm] [char] (6) COLLATE Chinese_PRC_CI_AS NULL , [tel] [char] (40) COLLATE Chinese_PRC_CI_AS NULL , [itladd] [char] (50) COLLATE Chinese_PRC_CI_AS NULL , [] [char] (50) COLLATE Chinese_PRC_CI_AS NULL , [sui_no] [char] (20) COLLATE Chinese_PRC_CI_AS NULL , [bank_no] [char] (20) COLLATE Chinese_PRC_CI_AS NULL , [bank] [char] (30) COLLATE Chinese_PRC_CI_AS NULL , [ywman] [char] (8) COLLATE Chinese_PRC_CI_AS NULL , [bz] [char] (255) COLLATE Chinese_PRC_CI_AS NULL ) ON [PRIMARY]GOCREATE TABLE [dbo].[dm_kh] ( [dm] [char] (8) COLLATE Chinese_PRC_CI_AS NOT NULL , [mc] [char] (40) COLLATE Chinese_PRC_CI_AS NULL , [addr] [char] (40) COLLATE Chinese_PRC_CI_AS NULL , [yzbm] [char] (6) COLLATE Chinese_PRC_CI_AS NULL , [tel] [char] (40) COLLATE Chinese_PRC_CI_AS NULL , [itladd] [char] (50) COLLATE Chinese_PRC_CI_AS NULL , [ywman] [char] (8) COLLATE Chinese_PRC_CI_AS NULL , [] [char] (50) COLLATE Chinese_PRC_CI_AS NULL , [sui_no] [char] (20) COLLATE Chinese_PRC_CI_AS NULL , [bank_no] [char] (30) COLLATE Chinese_PRC_CI_AS NULL , [bank] [char] (30) COLLATE Chinese_PRC_CI_AS NULL , [card_no] [char] (13) COLLATE Chinese_PRC_CI_AS NULL , [mb_reb] [numeric](12, 2) NULL , [bz] [char] (255) COLLATE Chinese_PRC_CI_AS NULL ) ON [PRIMARY]GO5．創(chuàng)建產(chǎn)品信息表CREATE TABLE [dbo].[dm_wz] ( [dm] [char] (30) COLLATE Chinese_PRC_CI_AS NOT NULL , [mc] [char] (40) COLLATE Chinese_PRC_CI_AS NULL , [jldw] [char] (8) COLLATE Chinese_PRC_CI_AS NULL , [lb] [char] (30) COLLATE Chinese_PRC_CI_AS NULL , [rkj] [numer