【文章內容簡介】 Basic通過事件來執(zhí)行對象的操作。一個對象可能會產生多個事件，每個事件都可以通過一段程序來響應。例如，命令按鈕是一個對象，當用戶單擊該按鈕時，將產生一個“單擊”(CLICK)事件，而在產生該事件時將執(zhí)行一段程序，用來實現指定的操作。在用Visual Basic設計大型應用軟件時，不必建立具有明顯開始和結束的程序，而是編寫若干個微小的子程序，即過程。這些過程分別面向不同的對象，由用戶操作引發(fā)某個事件來驅動完成某種特定的功能，或者由事件驅動程序調用通用過程來執(zhí)行指定的操作，這樣可以方便編程人員，提高效率。訪問數據庫Visual Basic具有強大的數據庫管理功能，利用數據控件和數據庫管理窗口，可以直接建立或處理Microsoft Access格式的數據庫，并提供了強大的數據存儲和檢索功能。同時，Visual Basic還能直接編輯和訪問其他外部數據庫，如dBASE，FoxPro，Paradox等，這些數據庫格式都可以用Visual Basic編輯和處理。Visual Basic提供開放式數據連接，即ODBC功能，可通過直接訪問或建立連接的方式使用并操作后臺大型網絡數據庫，如SQL Server，Oracle等。在應用程序中，可以使用結構化查詢語言SQL數據標準，直接訪問服務器上的數據庫，并提供了簡單的面向對象的庫操作指令和多用戶數據庫訪問的加鎖機制和網絡數據庫的SQL的編程技術，為單機上運行的數據庫提供了SQL網絡接口，以便在分布式環(huán)境中快速而有效地實現客戶/服務器(client/server)方案。動態(tài)數據交換(DDE)利用動態(tài)數據交換(Dynamic Data Exchange)技術，可以把一種應用程序中的數據動態(tài)地鏈接到另一種應用程序中，使兩種完全不同的應用程序建立起一條動態(tài)數據鏈路。當原始數據變化時，可以自動更新鏈接的數據。Visual Basic提供了動態(tài)數據交換的編程技術，可以在應用程序中與其他Windows應用程序建立動態(tài)數據交換，在不同的應用程序之間進行通信。對象的鏈接與嵌入(OLE)對象的鏈接與嵌入(OLE)將每個應用程序都看作是一個對象(object)，將不同的對象鏈接(link)起來，再嵌入(embed)某個應用程序中，從而可以得到具有聲音、影像、圖像、動畫、文字等各種信息的集合式的文件。OLE技術是Microsoft公司對象技術的戰(zhàn)略，它把多個應用程序合為一體，將每個應用程序看作是一個對象進行鏈接和嵌入，是一種應用程序一體化的技術。利用OLE技術，可以方便地建立復合式文檔(pound document)，這種文檔由來自多個不同應用程序的對象組成，文檔中的每個對象都與原來的應用程序相聯系，并可執(zhí)行與原來應用程序完全相同的操作。動態(tài)鏈接庫(DLL)Visual Basic是一種高級程序設計語言，不具備低級語言的功能，對訪問機器硬件的操作不太容易實現。但它可以通過動態(tài)鏈接庫技術將C/C++或匯編語言編寫的程序加入到Visual Basic應用程序中，可以像調用內部函數一樣調用其他語言編寫的函數。此外，通過動態(tài)鏈接庫，還可以調用Windows應用程序接口(API)函數，實現SDK所具有的功能第四章 房屋租賃管理系統(tǒng)的詳細設計所謂數據庫，就是為了滿足某些系統(tǒng)、某些用戶的需要，在計算機系統(tǒng)中按照一定的數據模型、數據結構等方式進行組織、存儲和使用的互相關聯的數據集合，是數據按科學的結構形式組織的“倉庫”。在實際中，人們把數據庫以文件形式存入于磁盤（軟盤、硬盤或磁帶）中，數據庫管理系統(tǒng)以文件形式對其進行調度管理。 數據庫管理系統(tǒng)數據庫管理系統(tǒng)，簡稱DBMS，是為數據庫的建立，使用和維護而配置的軟件，它提供了安全性和完整性等統(tǒng)一控制機制，方便用戶管理和存取大量的數據資源。例如，Visual Basic 。在數據庫管理系統(tǒng)的支持下，數據完全獨立于應用程序，并且能被多個用戶或程序共享，其關系如圖所示。 應用程序3應用程序2應用程序1數據庫管理系統(tǒng)數據庫應用程序與數據庫的關系數據庫管理系統(tǒng)一般具備數據庫的定義、操作、查詢及控制等功能。它將所有應用程序使用的數據匯集起來，建立數據庫，使之面對所有應用程序的查詢和訪問。因此，作為訪問者的應用程序相對于數據庫來說是獨立的，而作為被訪問的數據在數據庫中同樣是獨立的。當要建立新的數據管理系統(tǒng)時，只要生成一個新的應用程序即可，它可以立即使用現成的數據庫，而不必建立新的數據文件。數據庫管理系統(tǒng)是為數據庫的建立、使用、管理和維護而配置的軟件。它建立在操作系統(tǒng)的基礎上，對數據庫進行統(tǒng)一的管理和控制。用戶使用的各種數據庫命令以及應用程序的執(zhí)行都要通過數據庫管理系統(tǒng)。數據庫管理系統(tǒng)還承擔著數據庫的維護工作，保證數據庫的安全性和完整性。數據庫管理系統(tǒng)的功能體現在“管理”二字上。它針對不同的用戶及不同的使用目的，提供給用戶各種操作、管理數據庫的命令、函數、控件和對象，以幫助用戶完成任務。其主要功能如下： 定義數據庫 根據用戶設計的數據結構,建立數據庫結構組織. 存取數據 它包括很多基本操作:輸入、更新、插入、檢索、刪除、輸出、統(tǒng)計、排序、索引等。 數據庫運行管理 所有數據庫的操作都要在數據庫管理系統(tǒng)的餓控制程序的統(tǒng)一管理下進行，以保證正確運行，保證數據庫正確有效。 數據庫系統(tǒng)的維護 系統(tǒng)維護是一項重要的工作，它包括數據庫的轉存、恢復、數據庫的重組及性能監(jiān)視、分析等。由上可見，數據庫管理系統(tǒng)是一個能使用和管理數據庫中數據的軟件。這是數據庫系統(tǒng)與文件系統(tǒng)的一個最大的區(qū)別。數據庫管理系統(tǒng)功能的強弱基本上決定了整個數據庫系統(tǒng)功能。 數據庫應用系統(tǒng)數據庫應用系統(tǒng)是指系統(tǒng)開發(fā)人員利用數據庫系統(tǒng)資源開發(fā)出來的，面向某一類信息處理問題而建立的軟件系統(tǒng)。數據庫系統(tǒng)的用戶自己編寫的、基于數據庫數據的程序稱為應用程序，針對某一數據庫管理而編制的一組應用程序形成該數據庫的應用系統(tǒng)，它是數據庫系統(tǒng)的一個重要組成部分，它們與數據庫上的數據構成數據庫中最活躍的部分。 數據庫的結構設計為了實現管理信息系統(tǒng)的計算機化，僅僅用文字來描述信息的流動和存儲還遠遠不夠，還要進一步調查分析舍去物質流，抽象出信息流，定義出數據庫,各數據表的結構，并對各種數據的屬性和各項處理功能進行詳細分析。系統(tǒng)分析的主要成果是系統(tǒng)的邏輯模型。通過對該系統(tǒng)的研究,將系統(tǒng)數據分為以下幾個表:客戶信息表,定金表,房屋表,押金表,求租，預定表以及租金等幾個表,各表的具體設計結構如下:客戶信息表:字段名 類型 寬度 小數位數客戶編號 字符型 10租戶姓名 字符型 6工作單位 字符型 20聯系電話 字符型 2性別 字符型 8租戶人數 字符型 20身份證編號 字符型 20備注 備注型 4定金表:字段名 類型 寬度 小數位數收費編號 字符型 10定金金額 字符型 10預定金編號 字符型 10收費日期 日期型 8預定客戶 字符型 10預定房屋編號 字符型 10備注 備注型房屋表:字段名 類型 寬度 小數位數房屋編號 字符型 8物業(yè)地址 字符型 10房型 字符型 20建筑面積 數值型 5 2使用面積 數值型 5 2裝修情況 字符型 10出租價位 數值型 5 2目前狀態(tài) 字符型 字符型備注 備注型押金表:字段名 類型 寬度 小數位數收費編號 字符型 10押金金額 數值型 5 2收費日期 日期型 8合同編號 字符型 10客戶姓名 字符型 8房屋編號 字符型 10備注 備注型求租表:字段名 類型 寬度 小數位數求租客戶編號 字符型 10求租客戶姓名 字符型 10電話 字符型 15房型要求 字符型 50面積要求 數值型 5 2裝修要求 字符型 50意向價位 數值型 5 2意向房屋編號 字符型 10備注 備注租金表:字段名 類型 寬度 小數位數收費編號 字符型 10租金年份 日期型 8租金月份 日期型 8應交租金 數值型 5 2已交租金 數值型 5 2久費金額 數值型 5 2客戶姓名 字符型 10交費日期 日期型 8備注 備注啟動系統(tǒng)后，主界面設計效果圖如下: 公用模塊的設計代碼分析如下:Option ExplicitPublic conn As New 39。定義全局變量queryhouse 作為判斷frmHouse 窗體顯示查詢的數據還是全體數據Public queryhouse As Boolean39。定義全局變量sqlqh 作為查詢房屋信息時的sql語句Public sqlqh As String39。定義全局變量querycf 作為判斷frmClient 窗體家庭租戶選項卡顯示查詢的數據還是全體數據Public querycf As Boolean39。定義全局變量sqlqcf 作為查詢家庭租戶信息時的sql語句Public sqlqcf As String39。定義全局變量querycg 作為判斷frmClient 窗體家公司戶選項卡顯示查詢的數據還是全體數據Public querycg As Boolean39。定義全局變量sqlqcg 作為查詢公司租戶信息時的sql語句Public sqlqcg As String39。定義全局變量queryemp 作為判斷frmEmp 窗體顯示查詢的數據還是全體數據Public queryemp As Boolean39。定義全局變量sqlqe 作為查詢員工信息時的sql語句Public sqlqe As String39。定義全局變量queryqzc 作為判斷frmQZClient 窗體顯示查詢的數據還是全體數據Public queryqzc As Boolean39。定義全局變量sqlqzc 作為查詢求租客戶信息時的sql語句Public sqlqzc As String39。定義全局變量querycon 作為判斷frmAdminContract 窗體顯示查詢的數據還是全體數據Public querycon As Boolean39。定義全局變量sqlqcon 作為查詢合同信息時的sql語句Public sqlqcon As String39。定義全局變量sqlqyd 作為查詢預定單信息時的sql語句Public sqlqyd As String39。定義全局變量fromqzc 作為判斷frmYuDing 窗體是從frmQZClient窗體中單擊下定金預定調用的39。還是直接菜單調用的Public fromqzc As Boolean39。定義全局變量fromYuding 作為判斷frmPayDingJin 窗體是從frmYuDing窗體中單擊收取定金調用的39。還是直接菜單調用的Public fromYuding As Boolean39。定義全局變量fromContract 作為判斷frmPayYaJin 窗體是從frmSignContract窗體中單擊收取押金調用的39。還是直接菜單調用的Public fromContract As Boolean39。定義全局變量ZuJinfromContract 作為判斷frmPayZuJin 窗體是從frmSignContract窗體中單擊收取租金調用的39。還是直接菜單調用的Public ZuJinfromContract As Boolean39。定義全局變量queryZuJin 作為判斷frmAdminZuJin 窗體顯示查詢的數據還是全體數據Public queryZuJin As Boolean39。定義全局變量sqlqzj 作為查詢合同信息時的sql語句Public sqlqzj As String39。定義全局變量sqlqdj 作為查詢定金信息時的sql語句Public sqlqdj As String39。定義全局變量sqlqyj 作為查詢押金信息時的sql語句Public sqlqyj As String 各主要功能模塊的設計與實現4．3．1基本資料管理模塊設計房屋基本資料管理的運行效果圖如下:其表單界面的屬性設計比較直觀,在此重點分析新增,修改,刪除,保存四個命令按鈕的源代碼設計：新增按鈕源碼:Private Sub cmdAdd_Click() 39。設置除保存和取消按鈕外的其他按鈕不可用 = False = False = False = True = True = False = False = False = False = False 39。需要清空所有text框，并且設置它們可寫 For i = 0 To 7 Text1(i).Text = Text1(i).Enabled = True Next i = True 39。add變量用于保存時判斷是從添加還是修改后保存 add = 1 Text1(0).SetFocus End SubPrivate Sub cmdCancel_Click() 39。取消按鈕用于用戶添加或修改過程中放棄添加或修改操作 = False = False = True = True 39。如果是從添加后取消 If add = 1 Then 39。如果當前House表中有數據則顯示第一條