1、蘇 州 技 師 學 院 2012 屆畢業設計（論文）老男人樂器出租系統管理院 （系） 信息工程系 專 業 高級計算機網絡技術 班 級 信息0706班 姓 名 陳 浩 指導教師 華 康 起迄日期 3月 3日 6月10 日 2011年3月3日摘要：隨著科技的進步、信息需求的增加，辦公自動化成為一種趨勢。本系統主要用于吉他公司對吉他租賃業務的管理，包括基本信息管理、客戶會員管理、日常業務管理、系統用戶管理、系統幫助等幾個模塊。用戶可以通過該系統及時掌握吉他出租情況，便捷地編輯和管理吉他租賃信息。另外用戶還可以通過該系統瀏覽、查詢、添加、編輯以及刪除吉他的基本信息以及會員客戶信息。同時該系統具備幫助模

2、塊，可以使用戶更加快捷，方便的使用該系統。關鍵字： 吉他租賃 信息管理系統Abstract： Nowadays with the development of science technology and the increase of information requirements, OA (office automation) has already been a trend in our society. The guitar leasing management system is used to manage the business of guitar leasing. It i

3、s made up of five modules, including guitar basic information management, member- customer information management, day-to-day business management, user information management as well as help system. Working with this system the user can grasp the situation of guitar rental in time, edit and manage t

4、he information of the leasing business in an easy way. Also the user can browse, inquiry, add, edit and delete the basic information of guitar, registered member and ordinary customer. Simultaneously the system has the help module, which could let the user to operate the system more expediently. Key

5、words Guitar Leasing; Information Management System目錄 TOC o 1-3 h z u HYPERLINK l _Toc294513740 第一章、系統概述 PAGEREF _Toc294513740 h 3 HYPERLINK l _Toc294513741 第二章、系統分析 PAGEREF _Toc294513741 h 3 HYPERLINK l _Toc294513742 可行性分析 PAGEREF _Toc294513742 h 3 HYPERLINK l _Toc294513743 經濟可行性 PAGEREF _Toc294513

6、743 h 3 HYPERLINK l _Toc294513744 技術可行性 PAGEREF _Toc294513744 h 4 HYPERLINK l _Toc294513745 2.1.3 社會因素可行性 PAGEREF _Toc294513745 h 4 HYPERLINK l _Toc294513746 2.1.4 結論 PAGEREF _Toc294513746 h 4 HYPERLINK l _Toc294513747 2.2 系統開發需求分析 PAGEREF _Toc294513747 h 4 HYPERLINK l _Toc294513748 系統結構分析 PAGEREF _

7、Toc294513748 h 5 HYPERLINK l _Toc294513749 系統功能模塊 PAGEREF _Toc294513749 h 5 HYPERLINK l _Toc294513750 第三章、系統設計 PAGEREF _Toc294513750 h 7 HYPERLINK l _Toc294513751 開發工具介紹 PAGEREF _Toc294513751 h 7 HYPERLINK l _Toc294513752 吉他基本信息管理模塊設計 PAGEREF _Toc294513752 h 8 HYPERLINK l _Toc294513753 客戶會員管理模塊設計 PA

8、GEREF _Toc294513753 h 8 HYPERLINK l _Toc294513754 日常業務管理模塊設計 PAGEREF _Toc294513754 h 9 HYPERLINK l _Toc294513755 系統數據庫邏輯結構設計 PAGEREF _Toc294513755 h 10 HYPERLINK l _Toc294513756 第四章、系統實施 PAGEREF _Toc294513756 h 13 HYPERLINK l _Toc294513757 登陸界面的實現 PAGEREF _Toc294513757 h 13 HYPERLINK l _Toc294513758

9、 系統主界面的實現 PAGEREF _Toc294513758 h 16 HYPERLINK l _Toc294513759 吉他基本信息管理模塊的實現 PAGEREF _Toc294513759 h 18 HYPERLINK l _Toc294513760 吉他信息管理子模塊的實現 PAGEREF _Toc294513760 h 18 HYPERLINK l _Toc294513761 吉他保險公司管理子模塊的實現 PAGEREF _Toc294513761 h 18 HYPERLINK l _Toc294513762 吉他銷售商管理子模塊的實現 PAGEREF _Toc294513762

10、h 19 HYPERLINK l _Toc294513763 客戶會員管理模塊的實現 PAGEREF _Toc294513763 h 20 HYPERLINK l _Toc294513764 會員信息管理子模塊的實現 PAGEREF _Toc294513764 h 20 HYPERLINK l _Toc294513765 客戶信息管理子模塊的實現 PAGEREF _Toc294513765 h 21 HYPERLINK l _Toc294513766 日常業務管理模塊的實現 PAGEREF _Toc294513766 h 22 HYPERLINK l _Toc294513767 吉他租賃歸還管

11、理模塊的實現 PAGEREF _Toc294513767 h 22 HYPERLINK l _Toc294513768 吉他出租管理模塊的實現 PAGEREF _Toc294513768 h 23 HYPERLINK l _Toc294513769 幫助模塊的實現 PAGEREF _Toc294513769 h 24 HYPERLINK l _Toc294513770 第五章、結束語 PAGEREF _Toc294513770 h 25 HYPERLINK l _Toc294513771 第六章、致謝 PAGEREF _Toc294513771 h 25 HYPERLINK l _Toc294

12、513772 第七章、參考文獻 PAGEREF _Toc294513772 h 26第一章、系統概述為了吉他管理者更好地管理吉他的合同、租金等一系列問題，現開發一個吉他出租管理系統。吉他出租管理系統是一個關于吉他及其出租業務的管理信息系統。對于用戶來講，主要包括的功能模塊有：基本信息管理、客戶會員管理、日常業務管理、系統用戶管理、系統幫助管理等。本系統的設計主要針對吉他租賃商家的管理需要，為商家提供便捷地管理吉他及其租賃業務的工具，實現吉他租賃無紙化管理。本系統采用VB開發，提供實時查詢。吉他出租管理系統應盡量的方便管理人員對吉他出租信息進行快速而有效地管理，提高吉他出租公司的工作效率。所以系

13、統應便于操作，能有效地對吉他出租信息進行添加、修改、查詢、刪除，并能對出租、租金信息進行管理，在一定程度上實現自動化。此系統開發的目的是為了進一步實現辦公自動化，減少人力投資和辦公費用，提高辦公效率。第二章、系統分析可行性分析吉他出租信息進行查詢、添加、修改、刪除等多項操作。開發軟件名稱：吉他出租管理系統用戶：老男人吉他出租公司經濟可行性吉他出租管理系統的開發和使用可盡可能的減少資源浪費，在硬件上計算機的配置方面，系統要求在Windows 2000或Windows XP中運行，且內存容量要求不高，所以配備一臺電腦的使用價格以及安裝上必須的VB軟件。系統一旦投入運行，其簡單易操作的界面幾乎不需要

14、耗費人員的培訓費。技術可行性 本系統是對各吉他出租公司的吉他出租信息的信息化管理。主要運用了VB操作程序。2.1.3 社會因素可行性 法律方面的可行性：該項目不存在合同責任、侵犯專利權和侵犯版本權等方面的問題；使用方面的可行性：該項目主要用于吉他出租信息管理。2.1.4 結論綜上所述，吉他出租管理系統的技術成熟、完備，測試手段可靠，具有良好的效益，因此本工程可立即開發。2.2 系統開發需求分析本系統建設方便了吉他源信息管理。需要達到以下的要求：（1）界面友好，操作簡單。本系統設計采用了目前國內外最新的面向對象的開發工具，系統整體結構設計合理，數據處理功能齊備，界面清晰有好，操作簡便，用戶幾個小

15、時就能學會使用。（2）完善組織結構。首先明確所開發系統的期望功能，然后圍繞期望目標進行資料的收集和整理，之后根據實際分成幾個具體部分表現出來，每個部分再進行更加細致地劃分。（3）合理規劃布局。能夠實現以下一些功能：對于會員和普通客戶區別管理：本系統在客戶會員管理模塊中設計了會員管理系統和客戶管理系統兩個子模塊，從而實現對不同的顧客進行分類管理，可以更為方便地掌握會員信息，為他們提供優惠服務，如根據等級不同享受79折的價格優惠等等。保險業務在我國蓬勃發展，保險范圍已擴展至為樂器行業，為吉他投保已經成為一種趨勢。因此在本系統基本信息管理模塊中創造性地加入了保險管理模塊，對于吉他保險相關信息進行獨立

16、管理，是本系統優點之一。（4）具備幫助模塊。該模塊功能強大，幾乎包括了吉他租賃商可能遇到的各類問題。如果使用系統時遇到不清楚，可以使用幫助，用戶可以非常容易的在此學會如果使用本系統。系統結構分析本系統包括基本信息管理、客戶會員管理、日常業務管理、系統用戶管理以及系統幫助五個總的模塊。在總模塊下又分為多個功能模塊。吉他基本信息管理總模塊下分為吉他信息管理、吉他保險公司管理以及吉他銷售商管理三個功能模塊。客戶會員管理總模塊下分為普通客戶信息管理和會員客戶管理兩個模塊。日常業務管理總模塊下則分為吉他租賃歸還管理模塊和吉他出租模塊。系統用戶模塊主要為吉他租賃商提供一個系統登陸和相關信息保存的平臺。幫助

17、模塊可以為使用該系統的客戶提供必要的幫助和說明，用戶可以非常容易的在此學會如果使用本系統。系統功能模塊合理的系統功能模塊結構能使人耳目一新。在開發一個系統前，先構想一下系統的結構是很有需要的。為系統選擇一個合適的結構，把信息組成頁的集合，就稱為信息體系結構。吉他出租管理系統由以下部分組成：基本信息管理、客戶會員管理、日常業務管理、系統用戶管理和系統幫助組成。用戶通過密碼登錄，可以進行添加、修改、刪除和維護。系統功能模塊層次圖如圖2-1所示。 圖2-1系統功能模塊圖 用戶登錄模塊：要用于用戶的登錄。當用戶輸入用戶名和密碼后經過確認，才能進入吉他管理系統。如果不是用戶，拒絕進入。這樣可以保證吉他租

18、賃商的信息不外泄。吉他基本信息管理模塊：該模塊是用戶登錄后進入的第一個模塊，主要用于用戶對吉他及其業務的情況進行管理，其中包括：吉他信息管理模塊，主要用于包括吉他型號、狀態、顏色、分類和押金等吉他基本信息的編輯、刪除、修改、保存等基本操作。吉他保險管理模塊，用于查看和編輯吉他保險相關信息，如各類險種以及保險公司的信息等都可以在此模塊中進行添加、修改以及刪除。吉他銷售商管理模塊，該模塊針對的是吉他的經銷商的信息管理。關于吉他經銷商的公司名稱，聯系 及 ，詳細地址和電子郵箱等信息都可以在此子模塊中進行編輯客戶會員管理模塊：該模塊是吉他租賃商對客戶信息的基本情況進行管理。包括有：會員管理，主要用于對

19、注冊會員的信息（包括會員編號、姓名、性別、年齡、身份證號等）進行添加、修改、注銷會員等基本的管理，同時通過客戶姓名查找功能，可以快速得地對特定會員的信息查詢和編輯。會員可分為鉆石卡、金卡、銀卡三個等級。該模塊還提供了會員類型管理子模塊，通過該子模塊用戶可以便捷地編輯會員類型以及相關優惠權限。普通客戶管理，主要用于對普通客戶的信息（包括客戶編號、姓名、性別、年齡、身份證號等）進行添加、修改、刪除和保存等基本的管理以及升級會員操作，也可以通過客戶姓名對特定客戶的信息進行快速的查詢。日常業務管理模塊：該模塊的設置是為了系統用戶能快速地對吉他的租賃情況進行統計管理。主要包括有：吉他出租管理模塊，用于吉

20、他出租信息的查詢和編輯。出租吉他的基本信息、出租客戶、租賃方式、出租歸還時間以及租金等都可以在本模塊實現添加、修改、刪除、續租等操作.吉他租賃歸還管理模塊，客戶歸還吉他后，可以通過該模塊進行租賃狀態，租金結算等操作。系統幫助：該模塊可以幫助用戶可以非常容易的學會使用本系統。界面列出了諸如“添加吉他注意事項”、“出租審核”、“會員打折”、“材料打印”等常見問題，點擊條目就可以輕松了解各項問題的具體操作和解決辦法。該模塊幾乎包括了吉他租賃商可能遇到的各類問題。第三章、系統設計吉他出租管理系統是對吉他信息及租賃情況進行統一管理。本系統可瀏覽系統數據庫中所有吉他信息；通過吉他型號找到與其相符合的所有吉

21、他出租信息；也可對吉他信息資料進行錄入；可對吉他信息數據進行維護和刪除，此維護功能的實現完善了吉他管理系統數據的正確性；客戶會員模塊實現了對不同客戶群地分類管理，通過管理系統用戶可以輕松地錄入、修改以及刪除客戶信息。幫助模塊中的幫助功能模塊使用戶在運用時遇到問題能給予解決問題的方案。開發工具介紹在吉他出租管理系統中，主要采用了VB進行開發，以下我就簡單的介紹一下這些功能。Visual Basic（VB）是一種由微軟公司開發的包含協助開發環境的事件驅動編程語言。從任何標準來說，VB都是世界上使用人數最多的語言不僅是盛贊VB的開發者還是抱怨VB的開發者的數量。它源自于BASIC編程語言。VB擁有圖

22、形用戶界面（GUI）和快速應用程序開發（RAD）系統，可以輕易的使用DAO、RDO、ADO連接數據庫，或者輕松的創建ActiveX控件。程序員可以輕松的使用VB提供的組件快速建立一個應用程序。吉他基本信息管理模塊設計該管理模塊主要實現吉他基本信息管理、吉他保險管理以及吉他銷售商管理三個功能，吉他基本信息管理模塊劃分圖如圖3-1所示。 圖3-1吉他基本信息管理模塊劃分圖客戶會員管理模塊設計客戶會員管理模塊主要普通客戶管理以及會員管理這兩個功能。客戶會員管理模塊劃分圖如圖3-3所示。 圖3-2客戶會員模塊劃分圖日常業務管理模塊設計日常業務管理模塊主要實現吉他出租管理和吉他租賃歸還管理這兩個功能。日

23、常業務管理模塊劃分圖如圖3-4所示。 圖3-3信息統計模塊劃分圖系統數據庫邏輯結構設計通過對整個系統的模塊分析，這里附上用戶表、吉他基本信息表、保險公司信息表、吉他銷售商表、會員信息表、客戶信息表、吉他租賃歸還表、吉他出租表。具體的表如下：1.用戶表用戶表是用來添加用戶登陸信息的，主要包括用戶號、用戶名和密碼，當用戶登陸之后，自動聯系到該數據表。用戶表表結構如圖表3-1所示。表3-1字段名稱數據類型是否為空用戶號Char(4)否用戶名Char(20)否密碼Char(20)否2.吉他基本信息表吉他基本信息表是用來記錄吉他基本信息的，主要包括吉他型號、狀態、吉他名、分類、顏色、押金、日租金以及周末

24、租金等等。當系統運行吉他基本信息管理模塊時，使用的數據由吉他基本信息表產生，同時用戶所操作的各類數據也會保存到該表。吉他基本信息表結構如表3-2所示。表3-2字段名稱數據類型是否為空吉他型號CHAR（2）否狀態CHAR（2）是吉他名CHAR（2）是分類CHAR（2）是顏色CHAR（2）是押金MONEY（8）是租金MONEY（8）是3.保險公司信息表保險公司信息表是用來記錄提供吉他保險業務的保險公司的信息，主要包括編號、保險公司名稱、聯系 、 、地址、 以及電子郵件。當系統運行保險公司管理模塊時，該表數據則會顯示的各個模塊上，同時用戶保存或刪除的各類數據也存儲在租金表中。保險公司信息表結構如表3

25、-3所示。表3-3字段名稱類型是否為空編號CHAR（2）否保險公司名稱CHAR（2）是聯系 CHAR（2）是 CHAR（2）是地址CHAR（2）是 CHAR（2）是電子郵件CHAR（2）是4.吉他銷售商表吉他銷售商表是用來記錄吉他銷售商信息的，主要包括編號、銷售商名稱、聯系 、 、地址、 以及電子郵件。當系統運行吉他管理模塊或者游客登陸查詢各類信息時，就會使用到該數據表中的資料，同時用戶操作的各類數據也會保存到該表中。吉他銷售商表結構如表3-4所示。表3-4字段名稱類型是否為空編號CHAR（2）否保險公司名稱CHAR（2）是聯系 CHAR（2）是 CHAR（2）是地址CHAR（2）是 CHAR

26、（2）是電子郵件CHAR（2）是5.會員信息表會員信息表是用來記錄租賃吉他的注冊會員的信息，主要包括編號、姓名、性別、年齡、會員編號、登記時間等。當系統運行會員管理模塊時，該表數據則會顯示的各個模塊上，同時用戶保存或刪除的各類數據也存儲在會員信息表中。會員信息表結構如表3-5所示。表3-5字段名稱類型是否為空編號CHAR（2）否姓名CHAR（2）是性別CHAR（2）是年齡CHAR（2）是會員編號CHAR（2）是登記時間CHAR（2）是6.普通客戶信息表普通客戶信息表是用來記錄租賃吉他的普通客戶的信息，主要包括編號、姓名、性別、年齡、身份證號、會員編號、登記時間等。當系統運行客戶管理模塊時，該表

27、數據則會顯示的各個模塊上，同時用戶保存或刪除的各類數據也存儲在普通客戶信息表中。普通客戶信息表結構如表3-6所示。表3-6字段名稱類型是否為空編號CHAR（2）否姓名CHAR（2）是性別CHAR（2）是年齡CHAR（2）是會員編號CHAR（2）是登記時間CHAR（2）是7.吉他租賃歸還表吉他租賃歸還表是用來記錄吉他租賃歸還的情況，主要包括編號、吉他號、客戶號、租賃時間、租賃模式、應歸還時間、實際歸還時間以及狀態等。當系統運行吉他租賃歸還管理模塊時，該表數據則會顯示的各個模塊上，同時用戶保存或刪除的各類數據也存儲在吉他租賃歸還表中。吉他租賃歸還表表結構如表3-7所示。表3-7字段名稱類型是否為空

28、編號CHAR（2）否吉他號CHAR（2）是客戶號CHAR（2）是租賃時間CHAR（2）是租賃模式CHAR（2）是應歸還時間CHAR（2）是實際歸還時間CHAR（2）是狀態CHAR（2）是8.吉他出租表吉他出租表是用來記錄吉他出租的情況，主要包括編號、吉他號、客戶號、租賃時間、租賃模式、歸還時間、狀態、租琴費用、其他費用以及實際支付等。當系統運行吉他租賃歸還管理模塊時，該表數據則會顯示的各個模塊上，同時用戶保存或刪除的各類數據也存儲在吉他出租表中。吉他出租表表結構如表3-8所示。表3-8字段名稱類型是否為空編號CHAR（2）否吉他號CHAR（2）是客戶號CHAR（2）是租賃時間CHAR（2）是租

29、賃模式CHAR（2）是應歸還時間CHAR（2）是實際歸還時間CHAR（2）是狀態CHAR（2）是第四章、系統實施登陸界面的實現登陸界面分為二個功能，用戶需要密碼登陸，進入系統。登陸設計效果圖如圖4-1所示。 圖4-1登陸界面效果圖代碼如下：Public PasswordKey As StringPublic NameKey As StringPublic Try_times As IntegerPrivate Sub Cmd_Cancel_Click() EndEnd SubPrivate Sub Cmd_OK_Click() Dim j As Single If txtUser = Then

30、 MsgBox 請輸入用戶名 Exit Sub End If If txtPwd = Then MsgBox 請輸入密碼 Exit Sub End If NameKey = MakeStr(txtUser) PasswordKey = MakeStr(txtPwd) If MyUser.In_DB(NameKey) = False Then MsgBox 用戶名不存在 Try_times = Try_times + 1 If Try_times = 3 Then MsgBox 您已經三次嘗試進入本系統，均不成功，系統將關閉 DBapi_Disconnect End Else Exit Sub

31、End If End If MyUser.GetInfo (NameKey) If MyUser.UserPwd PasswordKey Then MsgBox 密碼錯誤 Try_times = Try_times + 1 If Try_times = 3 Then MsgBox 您已經三次嘗試進入本系統，均不成功，系統將關閉 DBapi_Disconnect End Else Exit Sub End If End If CurUser.GetInfo (MyUser.UserName) Unload MeEnd SubPrivate Sub Label1_Click(Index As In

32、teger)End Sub系統主界面的實現吉他管理系統主窗體點擊各子菜單就可出現相應的窗口，主界面是用戶操作的開始。在主窗體的菜單欄上包括：基本信息管理、客戶會員管理、日常業務管理、系統用戶管理、系統幫助管理等。通過點擊相應的按鈕，可以顯示出該頁面。主窗體設計效果圖如圖4-2所示。 圖4-2系統主界面效果圖代碼如下：Private Sub Toolbar1_ButtonClick(ByVal Button As MSComctlLib.Button) Case aa Load FrmType FrmType.Show vbModal Case bb Load FrmSales FrmSales

33、.Show vbModal Case cc Load FrmInsurance FrmInsurance.Show vbModal Case dd Load FrmLease FrmLease.Show vbModal Case ee Load FrmReturn FrmReturn.Show vbModal Case gg Load FrmMembers FrmMembers.Show vbModal End SelectEnd Sub吉他基本信息管理模塊的實現吉他基本信息管理模塊分為吉他基本信息管理、吉他保險管理以及吉他銷售商管理三個功能。主要實現用戶進入本系統后對吉他信息的編輯和查詢。吉

34、他信息管理子模塊的實現此模塊實現用戶登錄后對吉他信息的管理，以及瀏覽吉他信息總表。通過點擊吉他信息管理頁面，顯示出吉他型號、狀態、吉他名、分類、顏色、押金、日租金以及周末租金等這幾個吉他信息，通過點擊添加、修改、刪除、保存等按鈕，可以對該吉他信息進行操作。吉他信息管理窗體界面效果圖如圖4-3所示。 圖4-3吉他信息管理窗體界面效果圖吉他保險公司管理子模塊的實現通過點擊吉他保險公司管理這個頁面，顯示出保險公司名稱、聯系 、 、地址、 以及電子郵件等信息，可以讓用戶對吉他保險公司信息一目了然。吉他保險公司管理窗體界面效果圖如圖4-4所示。 圖4-4吉他保險公司管理窗體界面效果圖吉他銷售商管理子模塊

35、的實現通過點擊吉他銷售商管理這個頁面，顯示出銷售商公司名稱、聯系 、 、地址、 以及電子郵件等信息，可以讓用戶對吉他銷售商進行管理和編輯。吉他保險公司管理窗體界面效果圖如圖4-5所示。 圖4-5吉他銷售商管理窗體界面效果圖客戶會員管理模塊的實現客戶會員管理模塊分為會員信息管理和普通客戶信息管理兩個子模塊，實現了用戶對客戶會員的查看及維護。會員信息管理子模塊的實現通過點擊會員信息管理頁面，能夠顯示出該會員姓名、性別、年齡、會員編號、住址、登記時間等會員信息，通過點擊修改等按鈕，可以對該會員信息進行操作。同時也可以進行會員注銷操作。會員信息管理窗體界面效果圖如圖4-6所示 圖4-6會員信息管理界面

36、效果圖客戶信息管理子模塊的實現 圖4-7普通客戶信息界面效果圖通過點擊普通客戶信息管理頁面，能夠顯示出該客戶姓名、性別、年齡、身份證號、會員編號、登記時間等會員信息，通過點擊添加、修改、刪除等按鈕，可以對該客戶信息進行操作。同時也可以進行加入會員操作。普通客戶信息管理窗體界面效果圖如圖4-7所示日常業務管理模塊的實現日常業務管理模塊分為吉他租賃歸還管理和吉他出租管理這兩個功能吉他租賃歸還管理模塊的實現在此模塊中，系統通過對吉他號、客戶號、租賃時間、租賃模式、應歸還時間、實際歸還時間以及狀態等信息的管理來實現了用戶對吉他出租信息的管理。吉他租賃歸還模塊界面效果圖如圖4-8所示。 圖4-8吉他租賃

37、歸還模塊界面效果圖代碼如下：Private Sub Form_Load() GridRefresh cob_Status.AddItem 出租, 0 cob_Status.AddItem 出租審核, 1 cob_Status.AddItem 續租, 2 cob_Status.AddItem 續租審核, 3 cob_Status.AddItem 歸還, 4 cob_Status.AddItem 歸還審核, 5 cob_Status.AddItem 全部, 6 Cmd_Modi.Enabled = False Cmd_Del.Enabled = False Cmd_Check.Enabled =

38、False Cmd_Cont.Enabled = False Cmd_ContCheck.Enabled = False Cmd_Print.Enabled = FalseEnd Sub吉他出租管理模塊的實現在此模塊中，系統通過對吉他號、客戶號、租賃時間、租賃模式、歸還時間、狀態、租琴費用、其他費用以及實際支付等信息的管理來實現對吉他出租情況的管理。吉他出租模塊界面效果圖如圖4-9所示。 圖4-9吉他出租模塊界面效果圖Adodc1.ConnectionString = Conn Adodc1.RecordSource = SELECT ContractNo AS 合同編號,CarNo AS 樂

39、器編號, _ + CustId AS 客戶號,LeaseTime AS 租賃時間,LeaseMode AS 租賃模式, _ + ReturnTime AS 應歸還時間,RealRTime AS 實際歸還時間,Status AS 狀態,Price1 AS 租賃價格, _ + IIF(Status=日,Price1*WorkDays+Price2*WeekEndCount,Price1*WorkDays) AS 租賃費用, _ + OtherCost AS 其他費用,Payment AS 實際支付,Deposit AS 押金,Total AS 總額 _ + FROM Lease WHERE (St

40、atus=歸還 OR Status=結算審核) + SchCnd _ + ORDER BY ReturnTime DESC,LeaseTime DESC幫助模塊的實現幫助界面用來告訴用戶如何更好的使用該系統，幫助界面如圖4-10所示。 圖4-10幫助主題界面效果圖代碼如下：Private Sub Command1_Click()Unload MeEnd SubPrivate Sub Label1_Click()Text1.Text = 在車輛基本信息的添加時， End SubPrivate Sub Label2_Click()Text1.Text = 審核信息后不可再修改相當于確定 End SubPrivate Sub Label3_Click()Text1.Text = 出租費用可打折，但其他費用不打折End SubPrivate Sub Label4_Click() Text1.Text = 打印時調用WORD文檔contract并自動更新文檔中的內容 End Sub第五章、結束語通過