无
Workdays
整型
2
无
Weekendcount
整型
2
无
Deposit
长整型
4
无
Daykm
整型
2
无
Outkm
长整型
4
无
Oprice1
长整型
4
无
Oprice2
长整型
4
无
Returntime
字符串型
10
无
Returnkm
长整型
4
无
Othercost
长整型
4
无
Rate
长整型
4
无
Payment
长整型
4
无
Total
长整型
4
无
Status
字符串型
10
无
Createdate
字符串型
10
无
Username
字符串型
20
无
Realrtime
字符串型
10
无
表3-7会员类型信息表
字段名
类型
宽度
索引
Id
长整型
4
有
Typename
字符串型
20
无
rate
双精度型
8
无
第4章系统详细设计与实现
以系统的总体设计为基础,现在可以开始系统的实现工作。系统的实现包括编码和测试。关于测试,将在下一章做具体描述。本章着重叙述前者。
编码就是把软件设计结果翻译成用某种程序设计语言书写的程序。作为软件工程过程的一个阶段,编码是对设计的进一步具体化。因此,程序的质量主要取决于软件设计的质量。而所选用的程序设计语言的特点及编码风格也将对程序的可靠性、可读性、可测试性和可维护性也将产生深远的影响。
适宜的程序设计语言能使根据设计去完成编码时困难最少,减少程序测试量,得出更容易阅读和维护的程序。VisualBasic6.0正是这样一种合适的语言。而在程序的编码过程中,应遵循源程序的逻辑简明、易读易懂的原则。
4.1主控程序流程设计
本系统为实现机动车租赁业务的信息化而设计,其主控程序流程图:
图4-1主控程序流程图
4.2登录模块设计
登录界面是进入本系统遇到的第一个界面,是用户的身份验证部分,主要用于用户进入系统的身份验证。
为了提高数据的安全性,系统设置了防止非法人员进入系统的功能。系统在开始运行的时候,首先进入用户登录界面,在由操作人员输入用户名和密码后,系统进行判定其进入系统的合法身份,此后,方可正式进入该系统。如果用户名输入有错,系统将显示"用户名不存在"提示,如果密码输入有错,系统将显示"密码错误"提示,等待操作人员重新输入用户名或密码,如果连续三次输入错误,则退出登录。程序流程图如下:
否
否
是
是
图4-2登录模块程序流程图
下图是登录模块窗体:窗体上设有三个标签控件,两个命令按钮,一个框架、两个文本框和一个框架。
图4-3登录窗体截图
首先点击工程菜单,选择添加窗体,在新建工程内添加一个空窗体,先在适当位置画出一个框架,然后在框架内添加两个标签控件和两个文本框,然后把另一个标签和两个命令按钮画在预定位置。设置各控件属性,最后编写源代码。
例如:将第二个命令按钮的控制名设为"Cmd_Cancel",Caption属性设为"取消",字体属性设为"华文行楷",Enabled和Visible属性均设为"True"编写按钮单击事件源代码如下:
PrivateSubCmd_Cancel_Click()
End
EndSub
4.3主界面设计
用户登录成功后,即进入系统主界面。主界面的外观设计应该大方美观,布局合格。方便用户的下一步操作。其窗体布局如下,菜单栏内设有五个子菜单,工具栏内设有六个按钮,分别连接常用的功能。
图4-4主界面窗体
首先点击工具栏内新建工程按钮,新建一个工程,自动产生了一个空窗体,在窗体上单击右键,在弹出的菜单上点击"菜单编辑器"命令,打开菜单编辑器。按计划设计好程序各级菜单。在窗体上添加"图像列表控件",用于保存工具栏按钮所使用的图像。在窗体上添加"工具栏控件",将其与"图像列表控件"相关联,并加入代表单个按钮的"按钮对象"。最后编写工具栏对应的源代码。
工具栏单击事件源代码如下:
PrivateSubToolbar1_Butt(ByValButtonAsMSComctlLib.Button)
SelectCaseButton.Key
Case"aa"
LoadFrmType
FrmType.ShowvbModal
Case"bb"
LoadFrmSales
FrmSales.ShowvbModal
Case"cc"
LoadFrmInsurance
FrmInsurance.ShowvbModal
Case"dd"
LoadFrmLease
FrmLease.ShowvbModal
Case"ee"
LoadFrmReturn
FrmReturn.ShowvbModal
Case"gg"
LoadFrmMembers
FrmMembers.ShowvbModal
EndSelect
EndSub
4.4基本信息管理菜单设计
基本信息管理菜单树如图:
图4-5基本信息管理菜单树
4.4.1类型信息窗体设计
进入该窗体,用户先选择要操作的对象是汽车还是保险,选择后,文本框内将出现数据库内现存的有关该类型的资料,用户即可执行对汽车类型或保险类型的添加、修改、删除操作。
其程序流程图如下:
图4-6类型信息模块程序流程图
类型信息窗体上设有一个Datalist控件,两个单选按钮,一个ADODC控件,四个命令按钮。其窗体如下:
图4-7类型信息窗体
首先按设计添加窗体,做好各控件的布局,设置相应属性,例如:将左边的"单选按钮"名称属性设为"Optsel",Caption属性设为"汽车类型",index属性设为0,字体属性设为"华文行楷",value值设置为"true"。而命令按钮设置亦如此,如对"添加"按钮的设置,设置完成后编写源代码。
4.4.2销售商信息窗体设计
此窗体用于向用户提供对汽车销售商信息如:销售商的公司名称、联系地址、联系电话、传真、邮政编码、电子邮箱、联系人、备注等的添加、修改、删除、查询操作,另外还可根据用户选择的销售商名称查询该厂商向公司出售的汽车信息。其程序流程图如下:
图4-8销售商信息模块程序流程图
其窗体布局如下:
图4-9销售商信息窗体
此窗体上设置六个命令按钮,一个Adodc控件,一个Datagrid控件,一个标签控件和一个文本框。
首先按设计添加窗体,做好各控件的布局,设置相应属性,如:Datagrid控件名称属性设置为Datagrid1,DragMode属性设置为0,AllowAddNew属性设置为False,AllowDelete属性设置为False,AllowUpdate属性设置为False,字体属性设置为"宋体",Enable和Visible属性均设置为True。
其添加命令按钮单击事件源代码如下:
PrivateSubCmd_Add_Click()
FrmCompanyEdit.Modify=False
FrmCompanyEdit.nTid=1
FrmCompanyEdit.txtCompany=""
FrmCompanyEdit.lblType="销售商"
FrmCompanyEdit.txtTelephone=""
FrmCompanyEdit.txtFax=""
FrmCompanyEdit.txtAddress=""
FrmCompanyEdit.txtContact=""
FrmCompanyEdit.txtComment=""
FrmCompanyEdit.txtZipCode=""
FrmCompanyEdit.txtEmail=""
FrmCompanyEdit.Show1
GridRefresh
EndSub
4.4.3保险公司信息窗体设计
此窗体用于向用户提供对保险公司信息如:保险公司的公司名称、联系地址、联系电话、传真、邮政编码、电子邮箱、联系人、备注等的添加、修改、删除、查询操作,另外还可根据用户选择的保险公司名称查询已在其处办理了保险业务的汽车保险信息。其程序流程图如下:
图4-10保险公司信息模块程序流程图
此窗体上设置六个命令按钮,一个Adodc控件,一个Datagrid控件,一个标签控件和一个文本框。其窗体布局如图4-4-3-2。
首先点击工程菜单,选择添加窗体,在工程内添加一个空窗体,在工具箱内选择上段提及的各个控件,把这些控件放入窗体中适当的位置,设置各个控件的属性,最后编写各个控件相应的事件过程。如:标签控件的属性设置是,名称属性设置为"Lable1",Alignment属性设置为0,即文本对齐方式为左对齐,Caption属性设置为"保险公司名",字体属性设置为"华文行楷"。
图4-11保险公司信息窗体
查看保险汽车按钮
上一篇:
VB本科毕业论文-工资管理系统毕业论文+源码(论文和程序)
下一篇:
多年来只想说一句,我不怪你