【正文】 通過(guò)調(diào)研了解到，該客戶(hù)各個(gè)部門(mén)負(fù)責(zé)的主要業(yè)務(wù)如下： 該公司的業(yè)務(wù)分國(guó)內(nèi)業(yè)務(wù)和國(guó)外業(yè)務(wù)兩個(gè)大類(lèi)，然后在此兩個(gè)大類(lèi)中又進(jìn)行細(xì)化，如在國(guó)內(nèi)，又根據(jù)客戶(hù)在國(guó)內(nèi)不同的地理位置的分布（如省、市、自治區(qū)客戶(hù)經(jīng)理 國(guó)內(nèi)部 國(guó)際部 A區(qū)域 B區(qū)域 A區(qū)域 B區(qū)域 … … 等的不同）又進(jìn)行進(jìn)一步的管理，國(guó)外部客戶(hù)的區(qū)域劃分主要是根據(jù)該客戶(hù)所在洲的不同（如歐洲、亞洲等不同的分布）進(jìn)行劃分和管理。 （ 6）經(jīng)過(guò)一定時(shí)間之后，為了系統(tǒng)的數(shù)據(jù)安全，將客戶(hù)資料進(jìn)行備份，并在必要時(shí)將這些數(shù)據(jù)恢復(fù)到本系統(tǒng)中。 1． 3 解決方案 基于以上的對(duì)問(wèn)題的分析，利用計(jì)算機(jī)給我們提供信息，及時(shí)地調(diào)整企業(yè)客戶(hù)管理系統(tǒng)，并且對(duì)種類(lèi)客戶(hù)的管理過(guò)程形成一整套動(dòng)態(tài)的管理就十分必要了。 這四個(gè)方面形成了企業(yè)客戶(hù)管理的一個(gè)工作整體，采用計(jì)算機(jī)自動(dòng)化信息處理，可方便快捷地共享信息、交流信息，高效地協(xié)同工作。 1． 4 可行性分析 通過(guò)對(duì)該客戶(hù)的各個(gè)方面進(jìn)行了具體的了解之后，現(xiàn)對(duì)該單位開(kāi)發(fā)客戶(hù)管理系統(tǒng)的可行性進(jìn)行分析。 管理上可行：該企業(yè)的客戶(hù)分布位置很廣闊，因此公司要為每個(gè)客戶(hù)建立資料檔案，也便加強(qiáng)公司對(duì)客戶(hù)資料的管理，因此在管理上可行。目前在我國(guó)市場(chǎng)上最為流行、使用最多、最為先進(jìn)的可用作企業(yè)級(jí)開(kāi)發(fā)工具的產(chǎn)品有： Microsoft公司的 Visual Visual Delphi. Powersoft 公司的 PowerBulider 在目前市場(chǎng)上這些眾多的程序開(kāi)發(fā)工具中，有些強(qiáng)調(diào)程語(yǔ)言的彈性與執(zhí)行效率；有些則偏重于可視化程序開(kāi)發(fā)工具所帶來(lái)的便利性與效率的得高，各有各的優(yōu)點(diǎn)和特色，也滿(mǎn)足了不同用戶(hù)的需求。它簡(jiǎn)單易學(xué)、效率高，且功能強(qiáng)大，可以與 Windows 的專(zhuān)業(yè)開(kāi)發(fā)工具 SDK 相媲美，而且程序開(kāi)發(fā)人員不必具有 C/C++編程基礎(chǔ)。有時(shí)候，這種編程 編譯 修改的操作可能要反復(fù)多次，大大影響了軟件開(kāi)發(fā)效率 。 面向?qū)ο蟮某绦蛟O(shè)計(jì) 版以后的 Visual Basic 支持面向?qū)ο蟮某绦蛟O(shè)計(jì)，但它與一般的面向?qū)ο蟮某绦蛟O(shè)計(jì)語(yǔ)言 (C++)不完全相同。 結(jié)構(gòu)化程序設(shè)計(jì)語(yǔ)言 Visual Basic 是在 BASIC 語(yǔ)言的基礎(chǔ)上發(fā)展起來(lái)的，具有高級(jí)程序設(shè)計(jì)語(yǔ)言的語(yǔ)句結(jié) 構(gòu)，接近于自然語(yǔ)言和人類(lèi)的邏輯思維方式。 事件驅(qū)動(dòng)編程機(jī)制 Visual Basic 通過(guò)事件來(lái)執(zhí)行對(duì)象的操作。這些過(guò)程分別面向不同的對(duì)象，由用戶(hù)操作引發(fā)某個(gè)事件來(lái)驅(qū)動(dòng)完成某種特定的功能，或者由事件驅(qū)動(dòng)程序調(diào)用通用過(guò)程來(lái)執(zhí)行指定的操作，這樣可以方便編程人 員，提高效率。在應(yīng)用程序中，可以使用結(jié)構(gòu)化查詢(xún)語(yǔ)言 SQL 數(shù)據(jù)標(biāo)準(zhǔn)，直接訪(fǎng)問(wèn)服務(wù)器上的數(shù)據(jù)庫(kù)，并提供了簡(jiǎn)單的面向?qū)ο蟮膸?kù)操作指令和多用戶(hù)數(shù)據(jù)庫(kù)訪(fǎng)問(wèn)的加鎖機(jī)制和網(wǎng)絡(luò)數(shù)據(jù)庫(kù)的 SQL 的編程技術(shù)，為單機(jī)上運(yùn)行的數(shù)據(jù)庫(kù)提供了 SQL 網(wǎng)絡(luò)接口，以便在分布式環(huán)境中快速而有效地實(shí)現(xiàn)客戶(hù) /服務(wù)器 (client/server)方案。 對(duì)象的鏈接與嵌入 (OLE) 對(duì)象的鏈接與嵌入 (OLE)將每個(gè)應(yīng)用程序都看做是一個(gè)對(duì)象 (object)，將不同的對(duì)象鏈接 (link)起來(lái)，再嵌入 (embed)某個(gè)應(yīng)用程序中，從而可以得到具有聲音、影像、圖像、動(dòng)畫(huà)、文字等各種信息的集合式的文件。但它可以通過(guò)動(dòng)態(tài)鏈接庫(kù)技術(shù)將 C/C++或匯編語(yǔ)言編寫(xiě)的程序加入到 Visual Basic應(yīng)用程序中，可以像調(diào) 用內(nèi)部函數(shù)一樣調(diào)用其他語(yǔ)言編寫(xiě)的函數(shù)。數(shù)據(jù)表示圖提供了一種類(lèi)似于 Excel 的電子表格，可以使數(shù)據(jù)庫(kù)一目了然。如上所述， Access 作為關(guān)系數(shù)據(jù)庫(kù)開(kāi)發(fā)具備了許多優(yōu)點(diǎn)，可以在一個(gè)數(shù)據(jù)包中同時(shí)擁有桌面數(shù)據(jù)庫(kù)的便利和關(guān)系數(shù)據(jù)庫(kù)的強(qiáng)大功能。關(guān)系數(shù)據(jù)庫(kù)中包含了多個(gè)數(shù)據(jù)表的 信息，數(shù)據(jù)庫(kù)含有各個(gè)不同部分的術(shù)語(yǔ)，象記錄、域等。 _ 修改已建的數(shù)據(jù)庫(kù) 數(shù)據(jù)庫(kù)的修改分為：添加、編輯和刪除記錄。一個(gè)更高級(jí)的連接形式稱(chēng)為自連接。 二者的結(jié)合（ DBA） 微軟的 JET數(shù)據(jù)庫(kù)引擎提供了與數(shù)據(jù)庫(kù)打交道的途徑，我們是通過(guò)它以及 Visual Basic 來(lái)訪(fǎng)問(wèn)數(shù)據(jù)庫(kù)并對(duì)其進(jìn)行各種操作。缺省情況下， DATA 控件根據(jù)數(shù)據(jù)庫(kù)中的一個(gè)或多個(gè)數(shù)據(jù)表建立一個(gè) dynasettype（動(dòng)態(tài)集合）類(lèi)型的記錄集合。 下面以數(shù)據(jù)流圖和數(shù)據(jù)字典的方式來(lái)描述新系統(tǒng)的邏輯 功能。數(shù)據(jù)處理“查詢(xún)客戶(hù)”條目如下： 數(shù)據(jù)處理名稱(chēng)：查詢(xún)客戶(hù) 數(shù)據(jù)處理編號(hào)：１ .１ 簡(jiǎn)要描述：根據(jù)客戶(hù)的編號(hào)，姓名，性別，職務(wù)，客戶(hù)類(lèi)型 輸入數(shù)據(jù)流：客戶(hù)查詢(xún)信息 輸出數(shù)據(jù)流：查詢(xún)結(jié)果 處理邏輯：根據(jù)客戶(hù)的編號(hào)，姓名，性別，職務(wù)，客戶(hù)類(lèi)型進(jìn)行查 詢(xún)?？蛻?hù)管理系統(tǒng)包含客戶(hù)錄入、客戶(hù)查詢(xún)、系統(tǒng)維護(hù)等功能。使用它的好處還在于，如果你的系統(tǒng)擴(kuò)展到 Client/Server 模式的時(shí)候，可以使 用 Microsoft 的數(shù)據(jù)庫(kù)服務(wù)器軟件 SQL Server，此時(shí)，程序只需要簡(jiǎn)單的修改一下鏈接（ ADO 的數(shù)據(jù)源）就可以，這樣，為程序的平滑擴(kuò)展提供了非常有力的條件。需要通過(guò)系統(tǒng)管理驗(yàn)證，即輸入正確的密碼進(jìn)行系統(tǒng)登陸，本系統(tǒng)默認(rèn)的密碼為 0。錯(cuò)誤出現(xiàn) 3 次， If = True Then MsgBox 密碼錯(cuò)誤請(qǐng)重新登錄 , 16, 錯(cuò)誤： = = = 1 39。關(guān)閉當(dāng)前窗體 End Sub Private Sub a2_Click() Unload Me End Sub Private Sub a3_Click() = 9345 = 12870 End Sub Private Sub b1_Click() = 8355 = 13710 End Sub Private Sub bz_Click() End Sub Private Sub c1_Click() = 9510 = 13875 End Sub Private Sub C2_Click() = 6795 = 10020 = True = 輸入群組名進(jìn)行查詢(xún) End Sub Private Sub c3_Click() = 收入查詢(xún) = 4200 = 4081 = 495 = 2055 = 輸入名稱(chēng) End Sub Private Sub cz_Click() 2 End Sub Private Sub dc_Click() 0 End Sub Private Sub glysx_Click() End Sub Private Sub gy_Click() End Sub Private Sub MDIForm_QueryUnload(Cancel As Integer, UnloadMode As Integer) Dim YesNo As Integer Dim M As Single YesNo = MsgBox(真的要退出系統(tǒng)嗎？ , vbYesNo + vbQuestion, 提示 ) If YesNo = vbYes Then EndTxt = True Unload Me Else Cancel = 1 End If End Sub Private Sub pp_Click() 1 End Sub Private Sub stsz_Click() = 6930 = 8400 End Sub Private Sub tc_Click() Unload Me End Sub Private Sub Toolbar1_ButtonClick(ByVal Button As ) Select Case Case key1 = 8355 = 13710 Case key2 = 9510 = 13875 Case key3 = 6795 = 10020 = True = 輸入群組名進(jìn)行查詢(xún) Case key4 Case key7 = 6930 = 8400 Case key6 Unload Me End Select End Sub 客戶(hù)信息管理： 本應(yīng)用模塊的主要功能是實(shí)現(xiàn)對(duì)客戶(hù)個(gè)人信息的錄入系統(tǒng)操作，如編號(hào)，姓名，性別，性別等基本操作 。 = False 39。 = True 39。 = True 39。 = 600 39。MsgBox 刷新成功！ , 16, 恭喜： End Sub Private Sub Command5_Click() = True = True = True = True = True = True = True = True = True = True = True If = Or = Then MsgBox 編號(hào)或姓名不能為空！ , 16, 出錯(cuò)： = = 男 Else MsgBox 開(kāi)始添加信息！ , 64, 恭喜！ = False = False = False End If End Sub Private Sub Command6_Click() If = True And = True Then MsgBox 您的數(shù)據(jù)庫(kù)中沒(méi)有信息可以刪除！ , 16, 出錯(cuò)！ Else MsgBox 您確定要?jiǎng)h除這條信息？ , 32, 出錯(cuò)！ If = False Then Else 39。 = True = 5728 = 600 = 1500 = False = 數(shù)據(jù)輸入： End If End If End If End If End Sub Private Sub Command2_Click() If = Or = Then MsgBox 名稱(chēng)和管理員不能為空！ , 16, 出錯(cuò)： Else MsgBox 成功保存！ , 64, 恭喜！ = True = True 39。其功能基本符合用戶(hù)需求，能夠 實(shí)現(xiàn)圖書(shū)信息的錄入、更新、刪除、打印等基本功能，從而實(shí)現(xiàn)圖書(shū)的管理。 致謝 在本次畢業(yè)設(shè)計(jì)中，我從指導(dǎo)老師 楊老師身上學(xué)到了很多東西。 第六章．主要參考文獻(xiàn) [1] Visual Basic 使用指南 作者 ： Bob Reselman , Richard Peasley , Wayne Pruchniak. 出版社：電子工業(yè)出版社 [2] 中文版 Microsoft Office 2020 自學(xué)通 作者： Ned Snell 出版社：機(jī)械工業(yè)出版社 [3] Visual Basic 中文版控件大全 作者： Microsoft 出版社；電子工業(yè)出版社 [4] 中文 Access 2020 24學(xué)時(shí)教程 作者： Craig Eddy ， Timothy Buchanan 出版 社：機(jī)械工業(yè)出版社 [5]、《中文版 Access2020 入門(mén)及提高》 作者：王成輝 . 54 Of Vainglory It was prettily devised of Aesop。s diversion, namely, the wild hunt to Amack. Ah, you don39。s night through the air to Amack. They sit backwards on their painting b all lapse of time, and had bee a cipher and a nothing. Then three alone, or moveth upon greater means, if they have never so little hand in it, they think it is they that carry it They that are glorious, must needs be factiou