【正文】 楊老師認(rèn)真負(fù)責(zé)的工作態(tài)度，嚴(yán)謹(jǐn)?shù)闹螌W(xué)精神和深厚的理論水平都使我收益匪淺。 = TrueEnd IfEnd SubPrivate Sub Command3_Click() = True = True = True = True = True = True = TrueIf = Or = ThenMsgBox 名稱和管理員不能為空！, 16, 出錯(cuò)： = ElseMsgBox 開始新建群組！, 64, 恭喜！ = False = False = FalseEnd IfEnd SubPrivate Sub Command4_Click()If = True And = True ThenMsgBox 您的數(shù)據(jù)庫中沒有信息可以刪除！, 16, 出錯(cuò)！ElseMsgBox 您確定要?jiǎng)h除這條信息？, 32, 提示！If = False ThenElseMsgBox 您的數(shù)據(jù)庫中沒有信息可以刪除！, 16, 出錯(cuò)！End IfEnd IfEnd SubPrivate Sub Form_Unload(Cancel As Integer)If = True ThenCancel = 0ElseMsgBox 請編輯完這條記錄再退出！, 64, 提示： Cancel = 1End IfEnd Sub4．6 用戶管理一個(gè)完整的應(yīng)用系統(tǒng)，必須要能夠具備適當(dāng)?shù)挠脩艄芾砉δ?，以防系統(tǒng)數(shù)據(jù)的安全。 = 150039。 = 修改記錄：ElseIf = ThenMsgBox 姓名不能為空！, 16, 出錯(cuò)：Else For X = 11 To 13 If Len(Trim()) 200 Then MsgBox 太長, 16, 出錯(cuò)： Exit Sub End If Next X39。從而完成本系統(tǒng)的客戶信息管理。當(dāng)然，用戶可以在系統(tǒng)登錄時(shí)為了防止系統(tǒng)密碼的泄露而可以進(jìn)行對密碼的及時(shí)修改和更新。該系統(tǒng)執(zhí)行時(shí)，先錄入數(shù)據(jù)，然后根據(jù)客戶的個(gè)人信息可以進(jìn)行查詢以及按照相同的屬于進(jìn)行排序，并可將結(jié)果進(jìn)行預(yù)覽。下面為借書業(yè)務(wù)流程圖中的每一部分編制數(shù)據(jù)字典。DATA 控件在數(shù)據(jù)庫中的信息與將信息顯示給用戶看的Visual Basic程序之間架起了一座橋梁。_ 實(shí)現(xiàn)數(shù)據(jù)庫之間的聯(lián)系數(shù)據(jù)庫之間的關(guān)系指明兩個(gè)庫之間共享一個(gè)共同的關(guān)鍵字值。數(shù)據(jù)庫的作用在于組織和表達(dá)信息，簡而言之，數(shù)據(jù)庫就是信息的集合。Access2000 就是關(guān)系數(shù)據(jù)庫開發(fā)工具，數(shù)據(jù)庫能匯集各種信息以供查詢、存儲(chǔ)和檢索。當(dāng)原始數(shù)據(jù)變化時(shí)，可以自動(dòng)更新鏈接的數(shù)據(jù)。例如，命令按鈕是一個(gè)對象，當(dāng)用戶單擊該按鈕時(shí)，將產(chǎn)生一個(gè)“單擊“(CLICK)事件，而在產(chǎn)生該事件時(shí)將執(zhí)行一段程序，用來實(shí)現(xiàn)指定的操作。在設(shè)計(jì)對象時(shí)，不必編寫建立和描述每個(gè)對象的程序代碼，而是用工具畫在界面上，Visual Basic自動(dòng)生成對象的程序代碼并封裝起來。總的來說，Visual Basic具有以下特點(diǎn)：可視化編程：用傳統(tǒng)程序設(shè)計(jì)語言設(shè)計(jì)程序時(shí)，都是通過編寫程序代碼來設(shè)計(jì)用戶界面，在設(shè)計(jì)過程中看不到界面的實(shí)際顯示效果，必須編譯后運(yùn)行程序才能觀察。綜上所述，開發(fā)客戶管理系統(tǒng)在技術(shù)上、經(jīng)濟(jì)上、管理上都是可行的。硬件的配置要求不能太高，這樣可以很好的適應(yīng)當(dāng)前的客戶管理。手工管理還存在這許多弊端，由于不可避免的人為因素，經(jīng)常造成數(shù)據(jù)的遺漏、誤報(bào)。管理信息系統(tǒng)的開發(fā)是一個(gè)開發(fā)周期長、技術(shù)要求高、影響因素多的復(fù)雜系統(tǒng)工程，因此制定一個(gè)完善、可行、合理的開發(fā)計(jì)劃，不僅是系統(tǒng)開發(fā)成功的保證，而且可以提高效率、節(jié)省時(shí)間、降低成本。本系統(tǒng)界面友好，操作簡單，比較實(shí)用。在社會(huì)主義經(jīng)濟(jì)高速發(fā)展的今天，如果企業(yè)對客戶關(guān)系信息的各項(xiàng)管理運(yùn)做仍然停滯在以紙、筆為主要工具的階段，就會(huì)因?yàn)樾畔⒘康目焖僭鲩L而無法迅速、準(zhǔn)確的完成各項(xiàng)管理工作，這樣，必將成為企業(yè)各方面發(fā)展的一個(gè)瓶頸。 163．2軟件模塊結(jié)構(gòu)設(shè)計(jì) 173．3數(shù)據(jù)庫設(shè)計(jì) 19第四章 系統(tǒng)功能實(shí)現(xiàn) 22： 224．2系統(tǒng)主界面： 24： 31： 38： 424．6 用戶管理 47 52第五章．結(jié)束語 53第六章．主要參考文獻(xiàn) 53 前　言企業(yè)通過設(shè)計(jì)合理的專業(yè)性客戶關(guān)系信息管理系統(tǒng),可以合理控制客戶關(guān)系信息各個(gè)環(huán)節(jié),提高資金的利用率和結(jié)算速度,實(shí)現(xiàn)管理的高效率、實(shí)時(shí)性、安全性、科學(xué)化、現(xiàn)代化和智能化。 本文介紹了在Visual “自上而下地總體規(guī)劃，自下而上地應(yīng)用開發(fā)”的策略開發(fā)一個(gè)管理信息系統(tǒng)的過程。管理信息系統(tǒng)的開發(fā)方法有生命周期法、原型法和面向?qū)ο蟮拈_發(fā)方法等。（5）然后在用戶可將（3）和（4）的操作結(jié)果進(jìn)行打印。因此對用戶的需求可分為幾個(gè)方面：一方面是客戶管理人員可以通過計(jì)算機(jī)來管理各類客戶，分類編號(hào)，調(diào)整客戶數(shù)據(jù)，增加客戶數(shù)量，適應(yīng)客戶管理的需求；二方面是相關(guān)部門的人員能通過計(jì)算機(jī)來查詢和瀏覽客戶中的客戶，來確定自已需要查找的客戶，為業(yè)務(wù)的更好開展做好準(zhǔn)備；三方面是相關(guān)工作人員對客戶數(shù)據(jù)的排序，也是說可以根據(jù)需要按照某一字段進(jìn)行排序，從而找出具有共同性的客戶，并可將這些查詢和排序的結(jié)果進(jìn)行打印操作；四方面是對客戶數(shù)據(jù)的備份和恢復(fù)工作，這也是本系統(tǒng)的一個(gè)重要的功能，以防本系統(tǒng)在發(fā)生人為的損壞時(shí)能夠及時(shí)恢復(fù)這些資料。經(jīng)濟(jì)上可行：由于公司急需采用計(jì)算機(jī)來進(jìn)行客戶的管理，因此對開發(fā)客戶管理系統(tǒng)大力支持，開發(fā)經(jīng)費(fèi)沒有問題。數(shù)據(jù)庫是MIS中的重要支持技術(shù)，在MIS開發(fā)過程中，如何選擇數(shù)據(jù)庫管理是一個(gè)重要的問題，目前，數(shù)據(jù)庫產(chǎn)品較多，每種產(chǎn)品都具有各自的特點(diǎn)和適用范圍，因此，在選擇數(shù)據(jù)庫時(shí)，應(yīng)考慮數(shù)據(jù)庫應(yīng)用的特點(diǎn)及適用范圍，本系統(tǒng)選用的數(shù)據(jù)庫語言Visual Basic語言，該開發(fā)工具具有很多長處：Visual Basic是一種可視化的、面對對象和條用事件驅(qū)動(dòng)方式的結(jié)構(gòu)化高級程序設(shè)計(jì)，可用于開發(fā)Windows環(huán)境下的種類應(yīng)用程序。Visual Basic自動(dòng)產(chǎn)生界面設(shè)計(jì)代碼，程序設(shè)計(jì)人員只需要編寫實(shí)現(xiàn)程序功能的那部分代碼，從而可以大大提高程序設(shè)計(jì)的效率。在設(shè)計(jì)Visual Basic程序的過程中，隨時(shí)可以運(yùn)行程序，而在整個(gè)程序設(shè)計(jì)好之后，可以編譯生成可執(zhí)行文件(.EXE)，脫離Visual Basic環(huán)境，直接在Windows環(huán)境下運(yùn)行。Visual Basic提供開放式數(shù)據(jù)連接，即ODBC功能，可通過直接訪問或建立連接的方式使用并操作后臺(tái)大型網(wǎng)絡(luò)數(shù)據(jù)庫，如SQL Server，Oracle等。動(dòng)態(tài)鏈接庫(DLL)Visual Basic是一種高級程序設(shè)計(jì)語言，不具備低級語言的功能，對訪問機(jī)器硬件的操作不太容易實(shí)現(xiàn)。Access 是一種關(guān)系數(shù)據(jù)庫工具，關(guān)系數(shù)據(jù)庫是已開發(fā)的最通用的數(shù)據(jù)庫之一。1． 標(biāo)識(shí)需要的數(shù)據(jù)；2． 收集被標(biāo)識(shí)的字段到表中；3． 標(biāo)識(shí)主關(guān)鍵字字段；4． 繪制一個(gè)簡單的數(shù)據(jù)圖表；5． 規(guī)范數(shù)據(jù)；6． 標(biāo)識(shí)指定字段的信息；7． 創(chuàng)建物理表。在表中使用的關(guān)鍵字類型用于描述庫表示什么以及在數(shù)據(jù)庫中如何與其它的庫建立關(guān)系。將DATA控件放置在窗體中之后，我們還必須在該控件與要處理的數(shù)據(jù)庫之間建立聯(lián)系第二章系統(tǒng)總體規(guī)劃3．1組織結(jié)構(gòu)調(diào)研在對該公司客戶管理的手工管理模式和業(yè)務(wù)流程進(jìn)行認(rèn)真分析和研究的基礎(chǔ)上，經(jīng)過與該客戶部的相關(guān)人員的反復(fù)協(xié)商、論證，最后確定了該客戶管理系統(tǒng)的邏輯模型。通過對系統(tǒng)調(diào)研與分析，系統(tǒng)主要應(yīng)完成的功能如下：客戶信息錄入、客戶信息查詢、系統(tǒng)維護(hù)等三大模塊。(1)本系統(tǒng)中所涉及到的主要實(shí)體及其屬性有：（客戶）表：{編號(hào)，姓名，單位，性別，職務(wù)，電話，手機(jī)，消費(fèi)意向，個(gè)人愛好等} (2)本系統(tǒng)的實(shí)體聯(lián)系（ER）圖為了使ER圖表示得更加清晰，現(xiàn)將ER圖分成實(shí)體及其屬性圖和實(shí)體及其聯(lián)系圖。EndEnd SubPrivate Sub Form_Load() = End Sub4．2系統(tǒng)主界面：在系統(tǒng)登錄成功之后，就會(huì)看到系統(tǒng)的主界面如下所示：在本系統(tǒng)主界面中，我們可以看到一個(gè)MDI窗體，用戶在使用時(shí)只需要點(diǎn)擊鼠標(biāo)左鍵就可以進(jìn)入相應(yīng)的功能選項(xiàng)，快捷而方便，從這個(gè)窗體上可以清楚地看到本系統(tǒng)所具備的三個(gè)主要主要功能，即客戶數(shù)據(jù)錄入，客戶數(shù)據(jù)查詢及設(shè)置三大功能模塊。 = False39。 = True39。代碼如下：Private Sub Command1_Click()If = True ThenMsgBox 這已經(jīng)是第一條信息了！, 16, 出錯(cuò)：ElseEnd IfEnd SubPrivate Sub Command2_Click()If = True ThenMsgBox 已經(jīng)到最后一條記錄了！, 16, 提示！ElseEnd IfEnd SubPrivate Sub Command3_Click()If = True ThenMsgBox 這已經(jīng)是第一條信息了！, 16, 出錯(cuò)：ElseEnd IfEnd SubPrivate Sub Command4_Click()If = True ThenMsgBox 已經(jīng)到最后一條記錄了！, 16, 提示！ElseEnd IfEnd SubPrivate Sub Command5_Click()If = ThenMsgBox 沒有輸入查詢條件！, 16, 提示！ = End IfDo While TrueIf (姓名).Value = Then = (姓名).ValueExit DoEnd IfLoop = End SubPrivate Sub Command6_Click()If = ThenMsgBox 沒有輸入查詢條件！, 16, 提示！ = End IfDo While TrueIf (客戶編號(hào)).V