【文章內(nèi)容簡(jiǎn)介】 當(dāng)原始數(shù) 據(jù)變化時(shí)，可以自動(dòng)更新鏈接的數(shù)據(jù)。 Visual Basic 提供了動(dòng)態(tài)數(shù)據(jù)交換的編程技術(shù)，可以在應(yīng)用程序中與其他 Windows 應(yīng)用程序建立動(dòng)態(tài)數(shù)據(jù)交換，在不同的應(yīng)用程序之間進(jìn)行通信。 對(duì)象的鏈接與嵌入 (OLE) 對(duì)象的鏈接與嵌入 (OLE)將每個(gè)應(yīng)用程序都看做是一個(gè)對(duì)象 (object)，將不同的對(duì)象鏈接 (link)起來(lái)，再嵌入 (embed)某個(gè)應(yīng)用程序中，從而可以得到具有聲音、影像、圖像、動(dòng)畫、文字等各種信息的集合式的文件。 OLE 技術(shù)是 Microsoft 公司對(duì)象技術(shù)的戰(zhàn)略，它把多個(gè)應(yīng)用程序合為一體，將每個(gè)應(yīng)用程 序看做是一個(gè)對(duì)象進(jìn)行鏈接和嵌入，是一種應(yīng)用程序一體化的技術(shù)。利用 OLE 技術(shù)，可以方便地建立復(fù)合式文檔 (pound document)，這種文檔由來(lái)自多個(gè)不同應(yīng)用程序的對(duì)象組成，文檔中的每個(gè)對(duì)象都與原來(lái)的應(yīng)用程序相聯(lián)系，并可執(zhí)行與原來(lái)應(yīng)用程序完全相同的操作。 動(dòng)態(tài)鏈接庫(kù) (DLL) Visual Basic是一種高級(jí)程序設(shè)計(jì)語(yǔ)言，不具備低級(jí)語(yǔ)言的功能，對(duì)訪問(wèn)機(jī)器硬件的操作不太容易實(shí)現(xiàn)。但它可以通過(guò)動(dòng)態(tài)鏈接庫(kù)技術(shù)將 C/C++或匯編語(yǔ)言編寫的程序加入到 Visual Basic應(yīng)用程序中，可以像調(diào)用內(nèi)部函數(shù)一樣 調(diào)用其他語(yǔ)言編寫的函數(shù)。此外，通過(guò)動(dòng)態(tài)鏈接庫(kù)，還可以調(diào)用 Windows應(yīng)用程序接口 (API)函數(shù)，實(shí)現(xiàn) SDK所具有的功能。 關(guān)系型數(shù)據(jù)庫(kù)的實(shí)現(xiàn) Access2020 就是關(guān)系數(shù)據(jù)庫(kù)開(kāi)發(fā)工具，數(shù)據(jù)庫(kù)能匯集各種信息以供查詢、存儲(chǔ)和檢索。 Access 的優(yōu)點(diǎn)在于它能使用數(shù)據(jù)表示圖或自定義窗體收集信息。數(shù)據(jù)表示圖提供了一種類似于 Excel 的電子表格，可以使數(shù)據(jù)庫(kù)一目了然。另外，Access 允許創(chuàng)建自定義報(bào)表用于打印或輸出數(shù)據(jù)庫(kù)中的信息。 Access也提供了數(shù)據(jù)存儲(chǔ)庫(kù)，可以使用桌面數(shù)據(jù)庫(kù)文件把數(shù)據(jù)庫(kù)文件置 于網(wǎng)絡(luò)文件服務(wù)器，與其他網(wǎng)絡(luò)用戶共享數(shù)據(jù)庫(kù)。 Access 是一種關(guān)系數(shù)據(jù)庫(kù)工具，關(guān)系數(shù)據(jù)庫(kù)是已開(kāi)發(fā)的最通用的數(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)大功能。 數(shù)據(jù)庫(kù)的概念 數(shù)據(jù)庫(kù)是一種存儲(chǔ)數(shù)據(jù)并對(duì)數(shù)據(jù)進(jìn)行操作的工具。數(shù)據(jù)庫(kù)的作用在于組織和表達(dá)信息，簡(jiǎn)而言之，數(shù)據(jù)庫(kù)就是信息的集合。計(jì)算機(jī)的數(shù)據(jù)庫(kù)可以分為兩類：非關(guān)系數(shù)據(jù)庫(kù)（ flatfile）和關(guān)系數(shù)據(jù)庫(kù)（ relational）。關(guān)系數(shù)據(jù)庫(kù)中包含了多個(gè)數(shù)據(jù)表的信息，數(shù)據(jù)庫(kù)含 有各個(gè)不同部分的術(shù)語(yǔ)，象記錄、域等。 _ 新建一個(gè)數(shù)據(jù)庫(kù) 創(chuàng)建任何一個(gè)數(shù)據(jù)庫(kù)的第一步是仔細(xì)的規(guī)劃數(shù)據(jù)庫(kù)，設(shè)計(jì)必須是靈活的、有邏輯的。創(chuàng)建一個(gè)數(shù)據(jù)庫(kù)結(jié)構(gòu)的過(guò)程被認(rèn)為是數(shù)據(jù)模型設(shè)計(jì)。 1． 標(biāo)識(shí)需要的數(shù)據(jù)； 2． 收集被標(biāo)識(shí)的字段到表中； 3． 標(biāo)識(shí)主關(guān)鍵字字段； 4． 繪制一個(gè)簡(jiǎn)單的數(shù)據(jù)圖表； 5． 規(guī)范數(shù)據(jù)； 6． 標(biāo)識(shí)指定字段的信息； 7． 創(chuàng)建物理表。 _ 修改已建的數(shù)據(jù)庫(kù) 數(shù)據(jù)庫(kù)的修改分為：添加、編輯和刪除記錄。這三種操作均可由 Visual Basic 創(chuàng)建的程序來(lái)完成，下面的章節(jié)將詳細(xì)描述實(shí)現(xiàn) 的具體方法。 _ 實(shí)現(xiàn)數(shù)據(jù)庫(kù)之間的聯(lián)系 數(shù)據(jù)庫(kù)之間的關(guān)系指明兩個(gè)庫(kù)之間共享一個(gè)共同的關(guān)鍵字值。一個(gè)連接是指一種虛擬的表，這種表是在當(dāng)用戶要求從相互關(guān)聯(lián)的各個(gè)不同的表中獲取信息時(shí)建立的，關(guān)鍵字段用于在相互連接的不同表中查找匹配的記錄。一個(gè)更高級(jí)的連接形式稱為自連接。這種連接是指一個(gè)表被連接到它自己的一個(gè)字段，或在不同的紀(jì)錄中由重復(fù)數(shù)據(jù)的組合字段。數(shù)據(jù)庫(kù)中有三種不同類型的關(guān)鍵字：主關(guān)鍵字、組合關(guān)鍵字和外關(guān)鍵字。在表中使用的關(guān)鍵字類型用于描述庫(kù)表示什么以及在數(shù)據(jù)庫(kù)中如何與其它的庫(kù)建立關(guān)系。 二者的結(jié)合（ DBA） 微軟的 JET數(shù)據(jù)庫(kù)引擎提供了與數(shù)據(jù)庫(kù)打交道的途徑，我們是通過(guò)它以及 Visual Basic 來(lái)訪問(wèn)數(shù)據(jù)庫(kù)并對(duì)其進(jìn)行各種操作。 Visual Basic、 Access以及其他微軟的軟件產(chǎn)品都是通過(guò)共用 JET數(shù)據(jù)庫(kù)引擎，從而給用戶提供了豐富的數(shù)據(jù)類型。 DATA 控件在數(shù)據(jù)庫(kù)中的信息與將信息顯示給用戶看的 Visual Basic程序之間架起了一座橋梁。我們可以設(shè)置 DATA 控件的各個(gè)屬性，告訴它要調(diào)用那個(gè)數(shù)據(jù)庫(kù)的哪個(gè)部分。缺省情況下， DATA 控件根據(jù)數(shù)據(jù)庫(kù)中的一個(gè)或多個(gè)數(shù)據(jù)表建立一個(gè) dynasettype（動(dòng)態(tài)集合）類型的記錄集合。一個(gè)記錄集合是動(dòng)態(tài)的也就意味著，當(dāng)原來(lái)的數(shù)據(jù)表中的容改變了以后，該記錄集合中的記錄也會(huì)隨之改變。DATA 控件還提供了用來(lái)瀏覽不同記錄的各種跳轉(zhuǎn)按鈕。將 DATA 控件放置在窗體中之后，我們還必須在該控件與要處理的數(shù)據(jù)庫(kù)之間建立聯(lián)系 第三章系統(tǒng)總體規(guī)劃 3． 1 組織結(jié)構(gòu)調(diào)研 在對(duì)該公司客戶管理的手工管理模式和業(yè)務(wù)流程進(jìn)行認(rèn)真分析和研究的基礎(chǔ)上，經(jīng)過(guò)與該客戶部的相關(guān)人員的反復(fù)協(xié)商、論證，最后確定了該客戶管理系統(tǒng)的邏輯模型。 下面以數(shù)據(jù)流圖和數(shù)據(jù)字典的方式來(lái)描述新系統(tǒng)的邏輯功能。 3． 數(shù)據(jù)流圖 3． 1． 3 數(shù)據(jù)字典： 下面為借書業(yè)務(wù)流程圖中的每一部分編制數(shù)據(jù)字典。 （ 1）數(shù)據(jù)元素：每個(gè)客戶都有編號(hào)這個(gè)信息，其描述內(nèi)容如下： 數(shù)據(jù)元素名稱：編號(hào) 類型：字符 長(zhǎng)度： 9 數(shù)據(jù)值類型：字符 取值范圍： 9 個(gè)字符以內(nèi) 相關(guān)的數(shù)據(jù)結(jié)構(gòu)： {姓名，性別，單位，職務(wù)，電話，地址，類型 } （ 2）數(shù)據(jù)流。數(shù)據(jù)流“客戶信息”條目如下： 數(shù)據(jù)流名稱：借戶信息 說(shuō)明：客戶的個(gè)人信息 數(shù)據(jù)流來(lái)源：客戶 數(shù)據(jù)流去向：客戶管理人員 數(shù)據(jù)流組成：｛ 客戶號(hào)｝ 數(shù)據(jù)流的流通量：大約 10位 /天 （３）數(shù)據(jù)存儲(chǔ)：數(shù)據(jù)存儲(chǔ)“客戶情況”條目如下： 數(shù)據(jù)存儲(chǔ)名稱：客戶情況 簡(jiǎn)述：存放的是每個(gè)客戶的個(gè)人情況 輸入數(shù)據(jù)：客戶情況 數(shù)據(jù)存儲(chǔ)組成：｛客戶編號(hào)，姓名，客戶類型｝ 存儲(chǔ)方式：按客戶的客戶編號(hào)順序排列 （４）數(shù)據(jù)處理。數(shù)據(jù)處理“查詢客戶”條目如下： 數(shù)據(jù)處理名稱：查詢客戶 數(shù)據(jù)處理編號(hào)：１ .１ 簡(jiǎn)要描述：根據(jù)客戶的編號(hào)，姓名，性別，職務(wù)，客戶類型 輸入數(shù)據(jù)流：客戶查詢信息 輸出數(shù)據(jù)流：查詢結(jié)果 處理邏輯：根據(jù)客戶的編號(hào)，姓名，性別，職務(wù)，客戶類型進(jìn)行查詢。 3． 2 軟件模塊結(jié)構(gòu)設(shè)計(jì) 3． 2． 1 系統(tǒng)方案確定。通過(guò)對(duì)系統(tǒng)調(diào)研與分析，系統(tǒng)主要應(yīng)完成的功能如下：客戶信息錄入、客戶信息查詢、系統(tǒng)維護(hù)等三大模塊。 3． 2． 2 軟件結(jié)構(gòu)設(shè)計(jì)。客戶管理系統(tǒng)包含客戶錄入、客戶查詢、系統(tǒng)維護(hù)等功能。該系統(tǒng)執(zhí)行時(shí)，先錄入數(shù)據(jù)，然后根據(jù)客戶的個(gè)人信息可以進(jìn)行查詢以及按照相同的屬于進(jìn)行排序，并可將結(jié)果進(jìn)行預(yù)覽?？蛻艄芾硐到y(tǒng)屬于典型的事務(wù)型系統(tǒng)，其系統(tǒng)示意圖如下圖所示： 客戶管理系統(tǒng)示意圖 系統(tǒng)結(jié)構(gòu)圖示意如下： 接受數(shù)據(jù) 事務(wù)中心 客戶錄入 客戶查詢 客戶排序 客戶資料瀏覽 輸入客戶信息 備份 恢復(fù) 客戶管理系統(tǒng) 客戶采編 客戶查詢 數(shù)據(jù)處理 客戶資料瀏覽 客戶管理系統(tǒng)結(jié)構(gòu)圖 系統(tǒng)功能圖如下 3． 3 數(shù)據(jù)庫(kù)設(shè)計(jì) 數(shù)據(jù)庫(kù)采用了 Microsoft 推出的 Visual Foxpro 自帶的數(shù)據(jù)庫(kù)，這是微軟集成到VFP 中的一個(gè)桌面數(shù)據(jù)庫(kù)，能夠快速方便的和 Office 的其他套件綜合使用。由客戶管理系統(tǒng) 系統(tǒng)登陸 客戶信息錄入 客戶信息查詢 用戶管理 添加 新增 刪除 恢復(fù) 按編號(hào) 按姓名 用戶添加 密碼修改 用戶刪除 群組設(shè)置 退出系統(tǒng) 于 VFP 具有顯著的簡(jiǎn)易性和有效性，大量的桌面數(shù)據(jù)庫(kù)系統(tǒng)都采用它作為后臺(tái)數(shù)據(jù)庫(kù)。使用它的好處還在于，如果你的系統(tǒng)擴(kuò)展到 Client/Server 模式的時(shí)候，可以使用 Microsoft 的數(shù)據(jù)庫(kù)服務(wù)器軟件 SQL Server，此時(shí)，程序只需要簡(jiǎn)單的修改一下鏈接（ ADO 的數(shù)據(jù)源）就可以，這樣，為程序的平滑擴(kuò)展提供了非常有力的條件。 本系統(tǒng)涉及到的實(shí)體：（共有三個(gè)數(shù)據(jù)表，分別為： ， ， ）。 (1)本系統(tǒng)中所涉及到的主要實(shí)體及其屬性有： （客戶）表： {編號(hào)，姓名，單位，性別，職務(wù)，電話，手機(jī)，消費(fèi)意向，個(gè)人愛(ài)好等 } (2)本系統(tǒng)的實(shí)體 聯(lián)系（ ER）圖 為了使 ER圖表示得更加清晰，現(xiàn)將 ER圖分成實(shí)體及其屬性圖和實(shí)體及其聯(lián)系圖。分別如下圖所示： 編號(hào) 姓名 性別 職務(wù) 電話 客戶管理 手機(jī) 消費(fèi)意向 生日 個(gè)人愛(ài)好 工作單位 各表的物理結(jié)構(gòu)如下： kh（客戶）表： 字段名稱 類型 寬度 小數(shù)位數(shù) 編號(hào) 字符 10 0 姓名 字符 8 0 單位 字符 20 0 性別 字符 2 0 電話 字符 11 0 手機(jī) 字符 11 0 職位 字符 10 0 個(gè)人愛(ài)好 字符 6 0 消費(fèi)意向 字符 30 0 生日 字符 2 0 備注 字符 8 0 (群組 )表： 字段名稱 類型 寬度 小數(shù)位數(shù) 群組名稱 字符 10 0 管理員 字符 10 0 群組人數(shù) 數(shù)字 5 0 電話 數(shù)字 11 0 職能 文本 10 0 收入 貨幣 10 2 第四章 系統(tǒng)功能實(shí)現(xiàn) 系統(tǒng)登陸界面： 雙擊圖標(biāo)運(yùn)行程序以后，就可以看到程序的登錄界面。需要通過(guò)系統(tǒng)管理驗(yàn)證，即輸入正確的密碼進(jìn)行系統(tǒng)登陸，本系統(tǒng)默認(rèn)的密碼為 0。當(dāng)然，用戶可以在系統(tǒng)登錄時(shí)為了防止系統(tǒng)密碼的泄露而可以進(jìn)行對(duì)密碼的及時(shí)修改和更新。 代碼如下： Private Sub Command1_Click() If Trim() = Trim() And Trim() = Trim() Then 39。用戶名和密碼 Unload Me Else For X = 1 To 1 39。錯(cuò)誤出現(xiàn) 3 次， If = True Then MsgBox 密碼錯(cuò)誤請(qǐng)重新登錄 , 16, 錯(cuò)誤： = = = 1 39。ADO 是錯(cuò)誤退出，正確進(jìn)入 Else If Trim() = Trim() And Trim() = Trim() Then = Unload Me Else X = X 1 End If End If Next X End If = End Sub Private Sub Command2_Click() Unload Me 39。End End Sub Private Sub Form_Load() = End Sub 4． 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è)置三大功能模塊。 代碼如下： Private Sub A1_Click() Unload Me 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)行查詢 End Sub Privat