【正文】 tName) (OriId) MsgBox 修改成功 DataRefresh 39。設置連接字符串 = Conn 39。選擇類別 Else TmpSource = TmpSource + And = And = _ + Trim() + ORDER BY End If Else If = 4 Then 39。設置列表綁定字段 End Sub（3）客戶基本信息管理窗體Private Sub Refresh_Customer() Dim TmpSource As String If = 0 And = 0 Then lblSel = 0 Exit Sub End If 39。判斷是否存在此記錄信息 OriTypeName = Trim() 39。刷新DataList1End SubPrivate Sub Cmd_Exit_Click() Unload MeEnd SubPrivate Sub Cmd_Modi_Click() 39。類型編號Private OriTypeName As String 39。你們的言傳身教將使我終生受益！感謝所有幫助過我的人! 主要參考文獻⑴馬力，《Visual Basic程序設計院》，北京大學出版社，200481⑵馮碩，費志博，《Visual Basic數(shù)據(jù)庫編程寶典》，電子工業(yè)出版社，200151⑶王守茂，《管理信息系統(tǒng)的分析與設計》，天津科技翻譯出版公司，1993年⑷曹青、邱李華、郭志強,《Visual Basic程序設計教程》,機械工業(yè)出版社, 2002年⑸姜旭平，《信息系統(tǒng)開發(fā)方法》，清華大學出版社，2002年⑹王珊，《數(shù)據(jù)庫系統(tǒng)概述》，高等教育出版社，1999年⑺姚達，《數(shù)據(jù)庫設計》，高等教育出版社，2000年⑻王珊、陳紅，《數(shù)據(jù)庫系統(tǒng)原理教程》，清華大學出版社，1999年⑼Korth, Silberschatz, Abraha，《Database System Concepts》，New York ：McGrawHill, Inc. ⑽Patrick O’Neil Elizabeth O’Neil，《DATABASE Principles,Programming,and Performance》(Second Edition)，New York:Higher Education Press Morgan Kaufmann Publishers,附錄：部分窗體源代碼（1）地域管理窗體代碼Private Sub Cmd_Add_Click() If = 4 Then MsgBox 此地域已不能再細分 Exit Sub End If 39。致 謝在論文的選題及其后的設計過程中得到指導老師的悉心指導，使本文得以順利完成，在此向趙老師表示衷心的感謝。由于本人自身能力的局限性，所以做編寫的代碼，即使經(jīng)過反復檢查也難免出錯所以在本階段力求使用有限的時間找出盡可能多的錯誤，力求系統(tǒng)盡量正確。圖20 測試的基本層次(1) 單元測試 單元測試的用例從單元詳細設計中導出。我們力求在每個階段結(jié)束之前通過嚴格的技術審查，盡可能早的發(fā)現(xiàn)并糾正錯誤。將地域信息讀取到CurArea對象中 ()End Sub. 設計選擇地域信息窗體為了方便用戶在其他模塊中選擇地域信息，設計一個選擇地域信息的窗體，窗體名為FrmAreaSel。單擊“圖像”選項卡，通過單擊“插入圖像”和“刪除圖像”來編輯圖像列表，如圖9所示：圖9 地域信息管理窗體下面分析窗體FrmClassMan中部分過程的代碼。當選擇“退出系統(tǒng)”菜單項時觸發(fā)mn_Click事件，代碼如下：Private Sub mn_Exit_Click() DBapi_Disconnect EndEnd Sub. 基本信息管理模塊設計基本信息管理模塊包括地域信息管理、客戶類別管理、行業(yè)分類管理、職務名稱管理、項目類型管理和銷售人員管理。如果密碼不同，要求用戶重新輸入，同時將計數(shù)變量Try_times加1。判斷用戶是否存在 If (NameKey) = False Then MsgBox 用戶名不存在 Try_times = Try_times + 1 If Try_times = 3 Then MsgBox 您已經(jīng)三次嘗試進入本系統(tǒng)，均不成功，系統(tǒng)將關閉 DBapi_Disconnect End Else Exit Sub End If End If 39。這樣整個數(shù)據(jù)庫設計后的結(jié)果如圖4所示： 圖4客戶管理系統(tǒng)數(shù)據(jù)庫下面分別介紹各表結(jié)構(gòu)：（1）基本信息表Types表Types用來保存客戶類別信息、行業(yè)分類信息、職務名稱信息和項目類型信息，結(jié)構(gòu)如表1所示：表1 Types的結(jié)構(gòu)編號字段名稱數(shù)據(jù)結(jié)構(gòu)說 明1Id自動編號記錄編號，主鍵2TypeName文本，長度50信息名稱3Flag數(shù)字／字節(jié)類型標記。 (4) 商業(yè)往來管理模塊商業(yè)往來管理模塊包括商業(yè)機會管理和客戶跟蹤管理等功能。總體設計的基本目的就是回答“從總體上說，系統(tǒng)應該如何實現(xiàn)？”這個問題。. 環(huán)境需求說明（1）軟件運行硬件環(huán)境： PII或更高檔的微機，筆記本電腦； 運行內(nèi)存要求:≥32MB； 安裝所需硬盤:≥20MB；（2）軟件要求： 中文 Windows 95/98/2000/Me/XP； 英文 Windows 95/98/2000/Me/XP。. 目的需求分析不僅是軟件定義時期的最后一個階段，而且是軟件開發(fā)期的第一個階段，也是關系到軟件開發(fā)成敗的關鍵步驟。軟件要求：系統(tǒng)采用Visual Basic Access開發(fā)，用VB制作系統(tǒng)的用戶界面，Access制作后臺數(shù)據(jù)庫，兩者結(jié)合完成系統(tǒng)功能，可運行在Windows98及以上的系列操作系統(tǒng)上。（4）通過創(chuàng)建聯(lián)機窗體，用戶可以直接對數(shù)據(jù)庫中的記錄執(zhí)行查看和編輯操作。對于一個小列表來說，這算不上什么，但對于經(jīng)常需要更新信息的列表來說（例如地址列表），用這種方法來保持最新的數(shù)據(jù)無疑是一項繁重的工作。方便地通過Web共享信息。通過數(shù)據(jù)集可以對記錄以及組成記錄的列進行各種操作。 使用Execute方法執(zhí)行命令行并返回一個數(shù)據(jù)集對象（Recordset）。ADO提供一系列的類和對象來完成各種操作。(2) 創(chuàng)建一個代表SQL命令行（包括變量、參數(shù)、可選項等）的對象。Microsoft在Visual Basic 。（5）轉(zhuǎn)換為運行時版本。動態(tài)鏈接庫（DLL，Dynamic Link Libraries）將C／C++或匯編語言編寫的程序加入到Visual Basic 的應用程序中，或是調(diào)用Windows應用程序接口（API，Application Programming Interface）函數(shù)，實現(xiàn)SDK（Software Development Kit）所具有的功能。其編輯器支持彩色代碼，可自動進行語法錯誤檢查，具有功能強且使用靈活的調(diào)試器和編譯器。. Visual Basic的特點Visual Basic是從BASIC發(fā)展而來的，對于開發(fā)Windows應用程序而言，VB是目前所有開發(fā)語言中最簡單、最容易使用的語言。Visual的意思是“可視的”，也就是直觀的編程方法。課程特點及意義：（1）特點：目前市面上流行的客戶資源管理系統(tǒng)不少。關鍵詞：客戶管理系統(tǒng)，Access數(shù)據(jù)庫，Visual Basic開發(fā)語言，管理信息系統(tǒng) AbstractThe customer resources are enterprise39。系統(tǒng)采用目前比較流行的ADO數(shù)據(jù)訪問技術，并將每個數(shù)據(jù)庫表的字段和操作封裝到類中，從而成功地將面向?qū)ο蟮某绦蛟O計思想應用到數(shù)據(jù)庫應用程序設計中。可以實現(xiàn)多點操作的信息共享，相互之間可以進行準確，快捷的信息傳遞。多少年來，Visual Basic經(jīng)歷過初級產(chǎn)品試驗、16位開發(fā)平臺和目前的32位新產(chǎn)品的多次的升級換代，Visual Basic已成為了一個全新的成熟的高端產(chǎn)品。“basic“是指BASIC（Beginners Allpurpose Symbolic Instruction Code）語言，一種在計算機技術發(fā)展史上應用得最為廣泛的語言。Visual Basic自動產(chǎn)生界面設計代碼，程序員只需要編寫實現(xiàn)程序功能的那部分代碼，從而大大提高了程序設計的效率。 (5) 充分利用Windows資源Visual Basic提供的動態(tài)數(shù)據(jù)交換（DDE，Dynamic Data Exchange）編程技術，可以在應用程序中實現(xiàn)與其他Windows應用程序建立動態(tài)數(shù)據(jù)交換、在不同的應用程序之間進行通信。（2）編寫響應事件的代碼。. 什么是ADO ADO,即Active數(shù)據(jù)對象(Active Data Objects)。RDO是ODBC API的一個淺層界面接口，是專為訪問遠程ODBC關系數(shù)據(jù)源而設計的。(6) 更新數(shù)據(jù)源，如果使用事務，確認是否接受事務期間發(fā)生的數(shù)據(jù)變化。 在打開連接前需要設置ConnectionString、ConnectionTimeout和Mode屬性。 設置Provider可以位連接指定一個OLEDB寄主。 通過檢查Errors對象可以知道數(shù)據(jù)源返回的錯誤。使用命令行對象的各種屬性和方法可以完成如下操作：根據(jù)指定的選擇標準檢索信息；將數(shù)據(jù)存儲在計算機中有幾種方法，例如，可以將列表存儲在Microsoft Word或Microsoft Excel工作表中。作為一種出色的數(shù)據(jù)庫軟件，Access可以實現(xiàn)以下的功能：（1）數(shù)據(jù)庫中包含多個表，每個表可以分別表示和存儲不同類型的信息。通過向?qū)峁┑囊幌盗械目梢暬^程，用戶可以方便地生成和操作數(shù)據(jù)庫對象。. 系統(tǒng)需求分析. 引言需求分析是軟件定義時期的最后一個階段，這個階段的任務仍然不是具體地解決問題，而是準確地確定“為了解決這個問題，目標系統(tǒng)必須做什么”。. 任務需求分析的任務還不是確定系統(tǒng)怎樣完成它的工作，而僅僅是確定系統(tǒng)必須完成哪些工作，也就是對目標系統(tǒng)提出完整、準確、具體的要求。這是確保需求模型一致性的一條重要規(guī)則。登錄成功后，將顯示系統(tǒng)主界面。數(shù)據(jù)庫結(jié)構(gòu)設計是總體設計階段非常重要的環(huán)節(jié)，好的數(shù)據(jù)庫結(jié)構(gòu)可以簡化開發(fā)過程，使系統(tǒng)功能更加清晰明確。（1）設計登錄窗體登錄窗體的名稱為FrmLogin，它的界面布局如圖5所示:圖5 登錄窗體的界面布局登錄窗體的屬性表如表9所示。l ()函數(shù)，判斷當臆用戶名是否存在。本系統(tǒng)中主窗體名為FrmMain。修改 If Trim(txtArea) Then If .In_DB(Trim(txtArea), .UpperId) = True Then MsgBox Trim(txtArea) + 已經(jīng)存在 Exit Sub End If End If Call .Update() If Trim(txtArea) Then = Trim(txtArea) End If = Trim(txtArea) End If End With Unload MeEnd Sub. 設計地域信息管理窗體地域信息管理窗體的名稱設置為FrmAreaMan。根據(jù)關鍵字獲取地域信息 FocusKey = = TmpType = Asc(Left(, 1)) = TmpType Asc(a) = Val(Right(, Len() 1)) 39。. 設計商業(yè)機會信息編輯窗體商業(yè)機會信息編輯窗體的名稱為FrmSaleEdit，窗體布局如圖17所示:圖17 商業(yè)機會信息編輯窗體. 設計商業(yè)機會信息管理窗體商業(yè)機會信息管理窗體的名稱為FrmSaleMan，窗體布局如圖18所示: 圖18 商業(yè)機會信息管理窗體. 設計商業(yè)機會查看管理窗體在客戶單位信息管理窗體中，選擇一個客戶單位記錄，然后再單擊“查看銷售機會”按鈕，將打開商業(yè)機會信息查看窗體。與開發(fā)過程類似，測試過程也必須分步驟進行，每個步驟在邏輯上是前一個步驟地繼續(xù)。 子系統(tǒng)測試在客戶資源管理系統(tǒng)的開發(fā)過程中，每開發(fā)完一個模塊都會進行模塊功能測試，由于系統(tǒng)還沒有最后完成，現(xiàn)在暫時還不能進行集成和系統(tǒng)測試，這部分將在系統(tǒng)完成后才能進行。我們會對系統(tǒng)不斷進行完善和升級，力求將不足之處一一改正過來。感謝給予我?guī)椭钠渌藛T，他們在我的畢業(yè)設計過程中經(jīng)常給我提出許多關鍵性的問題，使我受益匪淺。如果是根結(jié)點，則不需要再處理 If =