《VB汽车租赁课程设计》由会员分享，可在线阅读，更多相关《VB汽车租赁课程设计（16页珍藏版）》请在金锄头文库上搜索。
1、辽 宁 工 业 大 学可视化编程技术 课程设计（论文）题目： 汽车租赁管理系统 院（系）： 专业班级： 学 号： 学生姓名： 指导教师： 教师职称： 起止时间： 课程设计（论文）任务及评语院（系）： 教研室：学 号 学生姓名 专业班级课程设计（论文）题目汽车租赁管理系统课程设计（论文）任务课程设计任务及要求：1、掌握 VB 程序设计语言的基础知识。2、设计所选择的题目，对具体功能进行详细的分析，根据系统的要求在 VB中设计窗体界面，使其合理化。3、了解 VB 与数据库的连接方法。4、编写代码，实现系统的功能。5、通过调试程序，加深对 VB 编程的基本技巧及方法的理解。课程设计过程中，要严格遵守
2、实践环节的时间安排，听从指导教师的指导。正确地完成上述内容，记录实习日记，规范完整地撰写出课程设计论文。指导教师评语及成绩成绩： 指导教师签字： 2008 年 12 月 16 日辽 宁 工 业 大 学 课 程 设 计 说 明 书（论 文）目 录第 1 章 课程设计目的与要求 .11.1 课程设计目的.11.2 课程设计的实验环境.11.3 课程设计的预备知识.11.4 课程设计要求.1第 2 章 课程设计内容 .22.1 系统功能设计.22.2 系统详细设计.32.3 系统运行与测试.10第 3 章 课程设计总结 .12参考文献 .13辽 宁 工 业 大 学 课 程 设 计 说 明 书（论 文
3、）1第 1 章 课程设计目的与要求1.1 课程设计目的本课程的课程设计实际是学生学习完可视化编程技术课程后，进行的一次全面的综合训练，其目的在于加深对可视化编程技术基本知识的理解，掌握运用 VB 开发应用程序的基本方法及基本技巧。1.2 课程设计的实验环境硬件要求能运行 Windows 9.X 操作系统的微机系统。软件：Microsoft Visual Basic 6.0Microsoft Access 20031.3 课程设计的预备知识熟悉 Visual Basic 6.0 程序设计的基本语法知识及常用技巧。1.4 课程设计要求按课程设计指导书提供的课题，每个小组设计一个完整的管理系统应用程
4、序。要求根据规定设计系统的具体要求，按照应用程序的设计步骤和 VB 的基本知识应用程序的分析与实现。应根据基本学时分配合理安排设计时间，并独立完成各方面的设计。选择同一题目的同学，可以共同协作完成一个应用程序的开发任务。要求书写详细的设计说明书，对有复杂的代码段和程序段的部分，应画出程序流程图，写出全部的代码。在界面设计中，需画出每个窗体的布局，进行属性说明，杜绝雷同。辽 宁 工 业 大 学 课 程 设 计 说 明 书（论 文）2第 2 章 课程设计内容2.1 系统功能设计2.1.1 系统功能分析车辆租赁管理系统是一套针对车辆租赁的基础信息、车辆管理、司机管理、客户管理、综合业务、租金统计进行
5、全面管理的系统。 功能特点： 基本信息（修理厂设置、加油站设置、车辆类型设置、车辆名称设置、会员类型设置、证件类型设置、保险类型设置、燃油类型设置、租赁模式设置） ；信息管理（车辆管理、司机管理） ；客户管理（客户查询、会员查询） ；综合业务（汽车预出续租、催车还交、事故登记、汽车加油、维修记录、还车结算） ；租金统计（当天租金统计、一定期间租金统计）几大部分。系统提供了各种管理的查询功能和报表功能，它集输入、维护、查询、筛选、统计和各种处理为一体，信息导入导出方便共享，灵活、专业的报表设计，形象、增强的数据处理，用户可自定义自开发这些功能。操作快捷、方便，性能高效、强大；使用易懂、易会，便于
6、车辆租赁部门对车辆租赁使用情况进行全面管理。依托系统强大的辅助录入，减少了录入工作量，提高了工作效率，降低了工作强度。汽车租赁管理系统属于数据库应用的范畴从数据库的角度看,系统主要功能是实现对录入的车辆客户销售商租赁合同等文件的管理汽车租赁系统是对 Visual Basic6.0 编程技术Access 数据库技术的具体应用2.1.2 系统功能模块设计汽车出租管理系统主要实现 5 个大的功能模块：系统用户信息管理、查询报表、日常业务管理、系统管理、 。每个模块有分成多详细的功能子模块。辽 宁 工 业 大 学 课 程 设 计 说 明 书（论 文）3汽车租赁管理系统系统用户信息管理日常业务管理查询报
7、表系统管理管理员设置人事管理车辆管理车辆信息管理客户信息查询汽车信息查询客户服务查询排行信息登记信息汽车信息管理类型信息管理服务信息管理基本信息管理图 2.1 系统功能模块图2.2 系统详细设计2.2.1 汽车租赁系统模块设计1.界面设计（1）系统管理员用户可以添加汽车记录、修改汽车记录、删除汽车记录和查看汽车记录。（2）普通用户只能查看汽车租赁数据。为了表现系统间的层次结构，本模块使用 TreeView 控件对系统数据进行管理。TreeView 控件是显示 Node 对象的分层列表，每个 Node 对象均由一个标签和一个可选的辽 宁 工 业 大 学 课 程 设 计 说 明 书（论 文）4位图
8、组成。选择“工程”菜单中的“部件“命令，打开”属性“对话框。在控件列表中，查找兵选择 Microsoft Windows Common Controls 6.0。在窗体中添加一个 ImageList 控件。右击此控件，选择菜单中的“属性”命令，打开“属性页”对话框。单击“图像”选项卡，通过单击“插入图像”和“删除图像”来编辑图像列表。在窗体中添加一个 TreeView 控件。右击此控件，选择菜单中的“属性”命令，打开“属性页”对话框。将“图像列表”属性设置为 ImageList1,其他属性根据需要设置。在该部门信息模块中，TreeView 控件使用惟一的关键字来标识每一个结点，关键字的第一个字
9、符必须是字母。我们规定关键字的格式为“a”加上部门编号，结果部门编号为 1，则此部门在 TreeView 控件中的关键字为”al”.在 GeneralFunc 模块中，有一个自定义过程 Add_DepToTree()。窗体布局窗口开机后进入 VB6.0 环境下，双击租赁信用管理系统图标，稍候出现登录消息框，如图所示：图 2.2.1在输入框中依次输入用户的用户名和口令，然后按下回车键（Enter）或者用鼠标单击 “确认”按钮，在用户名和口令均正确的情况下，就可以顺利进入本系统，此时如果想退出系统请点击“取消”按钮。2.代码设计Dim hwndl As Long用户登陆后成功显示各标签Privat
10、e sub Form Activate()辽 宁 工 业 大 学 课 程 设 计 说 明 书（论 文）5If 用户登陆.Falg=1 ThenLabel1.Visible=True:Label2.Visible=TrueLabel3.Visilel=True:Label2.Visible=TrueEnd IfEnd SubPrivate Sub Form click()If 用户登陆.Falg0Then用户登陆.ShowEnd IfEnd IfEnd SubPrivate Sub Form Load()Dim A As StringDim B As IntegerA=Me.hwndB=0Dis
11、abled A,BMe.Left=0:Me.Top=0Label1.Visible=False:Label2.Visible=FalseLabel3.Visible=False:Label4.Visible=FalsePrivate Sub Text1 KeyPress(KeyAscii As Integer)Dim X AS IntegerIf KeyAscii=13 ThenIf Text12 ThenMsgBox“对不起。您无权使用本系统！Open App.Path+Screen.txt For Input As #1Input #1,apiRECT.RightClose #1Call
12、SetWindowPos(hwndl,0,0,0,0,0,swp SHOWWINDOW)Select Case apiRECT.RightCase 1024SetDisplayMode 1024,600,16Case 800SetDisplayMode 800,600,16Case 640SetDisplayMode 640, 480,16End SelectUnload MeEndEnd IfMsgBox”您的密码不正确，请重新输入密码！，Text1=“”ElseDoEventsFslg=1Unload MeEnd IfEnd IfEnd Sub2.2.2 基本信息管理模块设计基本信息管理具体的设计如下：辽 宁 工 业 大 学 课 程 设 计 说 明 书（论 文）7一，基本信息的管理：系统管理员可以对客户进
