医疗纠纷信息检索系统-VB毕业设计

1、医疗纠纷信息检索系统用户子系统专业班级:2000级计算机4班姓名:王宁目 录引言11 医疗纠纷信息检索系统的 系统分析91.1 开发医疗纠纷信息检索系统的 意义91.2 系统分析91.3 开发工具选取102 医疗纠纷信息检索系统的 需求分析132.1 系统用户组成132.2 对数据处理的 要求133 医疗纠纷信息检索系统的 总体设计143.1 数据处理流程分析143.2 程序结构设计前的 分析153.3 总体框图164 医疗纠纷信息检索系统的 功能模块184.1 系统的 功能模块设计184.2 设计的 准备工作185 医疗纠纷信息检索系统的 详细设计215.1 数据库结构设计215.2 用户登

2、录模块设计245.3 工作选项模块(米DI主窗体模块)设计285.4 用户信息管理模块设计385.5 数据信息统计模块设计415.6 帮助模块的 设计466 医疗纠纷信息检索系统的 实现556.1 软件环境556.2 硬件环境55结 论56致 谢56参考文献57附录1 程序清单58摘 要医疗纠纷信息检索系统是采用Visual Basic语言和大型数据库开发语言共同开发的 ,用于医院医务处对医疗纠纷的 检索与统计.设计本系统的 目的 就是为了 减少过多的 人工操作,使医生能够快速而且准确的 完成对医疗纠纷的 录入、修改、删除、查找、统计等操作,系统的 开发及应用为医疗纠纷管理提供了 灵活、方便的

3、 管理机制,提高工作人员的 工作效率.本设计采用所见即所得的 可视界面设计方法,在开发环境、功能上进一步完善和扩充,尤其在数据库管理、网络应用方面更胜一筹.利用Visual Basic 6.0提供的 强大的 可视化组件库进行编程,可以快速、高效地开发基于Windows环境的 各类应用系统.在此还使用了 SQL Server 2000提供的 DTS服务.现阶段本系统可实现的 功能是:一、可以进行数据的 录入、删除、保存等操作,便于数据的 更新、维护;二、通过查询列出符合条件的 详细信息;三、以上各查找结果均可以报表形式输出,便于分析、使用及存档管理;四、可以对数据统计,使数据更加直观的 显示在用

4、户的 面前.关键词:医疗纠纷 Visual Basic SQL Server 数据库 DTS服务AbstractThe searching syste米 for the 米edical dissension infor米ation use Visual Basic 6.0 and a big database to develop. This design is used to search and count the 米edical dissensions of 米edical affairs Dept. of the hospitals. The reason of 米aking this

5、 design is to reduce the 米anpower operation and i米prove the effect of recording, 米odifying, deleting, searching and counting work etc. of 米edical dissension 米ore quickly and exactly. The develop米ent and application of this syste米 offers a flexible and convenient 米anage米ent syste米 for the 米anage米ent

6、of 米edical dissension and hasten the work effect. This syste米 offers a kind of visual-interface-design, which 米eans you can get the result as soon as you see the interface. It also i米proves and enlarges the develop米ent environ米ent and functions, especially on data 米anage米ent and network application.

7、 It is faster and 米ore effective to develop all kinds of application syste米s on the basic of Windows Environ米ent by utilizing the powerful visual groupware roo米 to progra米. So we use DTS of SQL Server 2000.Now the functions of this software are: first it helps the recording, deleting and storing of

8、the data and the refreshing and protecting of the data; second it can list the detailed infor米ation by searching; third, all the results can be output in the for米 of report that is easy for the 米anage米ent of analyzing, using and storing; forth, it can count the data, so the data can be showed direct

9、ly in front of the users.Keywords: 米edical dissension, Visual Basic, SQL Server, database, DTS serve引言人类已跨入新世纪,正在进入信息时代.信息社会的 到来,给全球带来了 信息技术飞速发展的 契机;信息技术的 应用,引起了 人们生产方式、生活方式和思想观念的 巨大变化,极大的 推动了 人类社会的 发展和人类文明的 进步,把人类带入了 崭新的 时代;信息系统的 建立已逐渐成为社会各个领域不可或缺的 基础设施;信息已成为社会发展的 重要战略资源、决策资源和控制战场的 灵魂;信息化水平已成为衡量一个国

10、家现代化程度和综合国力的 重要标志.抢占信息资源已经成为国际竞争的 重要内容.管理信息系统在强调管理,强调信息的 现代社会中变得越来越普及.管理信息系统作为一门学科已经跨越了 若干个领域,比如管理,系统,运筹,统计以及计算机科学.在这些学科的 基础上,形成信息收集和加工的 方法,从而形成一个纵横交织的 系统.经过100多年的 发展,信息管理的 过程已经历了 传统管理时期、技术管理时期、信息资源管理时期,现正逐渐向“网络信息资源管理”阶段演进.这种演进和发展对信息管理工作模式和服务模式必会造成巨大的 变化,产生新的 社会需要.医疗纠纷信息检索系统是管理信息系统的 一种.医疗纠纷管理的 工作量是非

11、常大的 ,在对医疗纠纷信息的 检索过程中需要对大量的 数据进行查找,同时还需要对数据进行必要的 统计工作.开发本系统就是为了 减少对医疗纠纷数据不必要的 大量的 人工操作,将这项工作交给计算速度更快的 计算机,使医院的 管理者能够更好的 解决医疗纠纷.设计本着方便使用者的 思想,操作界面友好、直观,能够使初次使用者以最快的 速度掌握本系统的 使用方法.系统功能完善,处处都为使用者着想.1 医疗纠纷信息检索系统的 系统分析1.1 开发医疗纠纷信息检索系统的 意义由于人们生活水平的 提高,健康问题正逐渐的 成为人们最为关注问题.随着病人的 就医行为,病人与医务人员之间就建立了 医患关系,这是不容置

12、疑的 问题. 病人希望的 是解除病痛,病人要求的 是医生用高超的 医疗技术赶走病魔.而医护人员的 责任和义务正是要千方百计的 满足病人的 希望和要求,这就是医患关系,也是医患矛盾.诸多的 原因造成目前的 医疗纠纷日益增多,医疗纠纷的 增多同时也会给医院带来相当大的 工作量,对医疗纠纷信息的 查找、统计、分析等工作需要很长的 时间,浪费了 医务人员的 时间,降低了 工作效率.这就要求有一种能够代替大量人工操作的 工具来提高对医疗纠纷信息检索、统计的 速度.随着计算机技术的 发展,通过计算机来完成对医疗纠纷的 大量操作已经成为可能.1.2 系统分析由于医疗纠纷检索系统包含比较重要的 信息,因此,在

13、系统设计时除了 注重用户的 需求,保证系统安全性和可靠性,并在保证安全性和可靠性的 前提下尽量满足系统的 高效性,而且要保证系统数据信息的 一致性.系统的 安全性.不同的 用户具有不同的 使用权限,具有最高权限的 人员(管理员)方能录入、修改、删除数据库中的 信息,具有一般权限的 人员(用户)只对数据进行检索和统计的 操作.系统的 一致性.系统的 数据要保证一致性、准确性,当某以数据库中记录改变,与之相关联的 数据库也随之变化.系统的 可靠性.由于数据量大,必须对数据及时备份和恢复.系统的 高效性.为了 方便使用者,所以在系统的 设计时,一定要考虑大系统使用的 高效性,提高系统的 使用效率.1

14、.3 开发工具选取1.3.1选择Visual Basic 6.0的 原因Visual Basic是一种通用的 程序设计语言,之所以选择用Visual Basic来开发数据库系统,主要因为以下3个原因:编程效率高;使用Visual Basic可以操作多种类型的 数据库;在Visual Basic中可以比较方便地使用API函数和操作I/O接口.笔者在编程实践中使用过不同的 计算机语言,感觉Visual Basic在编程效率上是比较高的 .在Visual Basic 6.0中有了 功能强大、使用方便的 ADO(Active Database Object)技术,ADO是微软制定的 应用程序级数据库访

15、问接口,支持所有OLD DB数据厂商.ADO包括了 现有的 ODBC,而且占用内存少,访问数度更快.同时提供的 ADO控件,可以用最少的 代码创建数据库应用程序.Visual Basic可以面向多种类型的 数据库,除开发单用户的 数据库系统外,还可以开发多用户(或称为网络数据库的 )数据库系统.1.3.2大型数据库本系统是为了 医疗纠纷信息处理开发的 医疗纠纷信息检索系统,因为医疗纠纷信息有需要定时更新、添加的 特点,所以要求系统的 数据库为大型数据库,所以在数据库的 选择上我选择了 SQL Server 2000.因为SQL Server 2000提供了 与众多高级数据库管理器相同的 运行性

16、能,但是其价格却远远低于它们;而且SQL Server 2000还与Windows NT集成,是公认的 运行在Windows NT平台上的 最佳数据库.可见是在低造价平台上显示突出性能的 数据库,所以选择它既能满足技术上的 可行性,又满足经济可行性.1.3.3支持网上运行现在正处于“信息爆炸”的 时代,如果开发的 系统能支持网上运行,它就能实现资源共享.而我们开发的 医疗纠纷信息检索系统完全可以实现网上网上信息资源的 共享.SQL Server 2000正是一种可以在Windows NT平台上运行的 数据库,这样就为本系统实现网上运行提供了 技术上的 可行性.综上所述,可以采用Visual B

17、asic 6.0和SQL Server 2000来开发医疗纠纷信息检索系统.2 医疗纠纷信息检索系统的 需求分析2.1 系统用户组成为了 数据的 安全性,系统将用户分为管理员和用户两类.用户只能对数据进行检索和统计操作;管理员则可以对数据进行录入、修改、删除等操作.这样可以大大的 增加数据的 安全性,只有管理权利的 工作人员才能对数据操作.2.2 对数据处理的 要求对数据处理的 要求如下:在设计处理上要求按住院号输入对应的 相关数据.在数据录入的 方式上,可以随时录入,以可以集中录入.在数据录入时能方便地作单位选择.要求能方便地对现存的 数据进行浏览、修改和删除.能按科室统计、按医生统计、按年

18、份统计和按等级统计,并且统计结果可以在屏幕上显示.3 医疗纠纷信息检索系统的 总体设计3.1 数据处理流程分析数据库或数据表结构确定之后,在实际的 数据处理程序设计之前需要对所处理的 数据处理流程作必要的 分析.所谓对数据处理流程作必要的 分析是指找出各数据之间的 主要关系,数据存取的 主要走向.当然,在实际的 数据处理过程中还会有些细节问题.在遇到这些细节问题时,及时处理即可.另外.有些细节问题不是在做数据处理流程分析时事先都能知道的 .在数据关系简单的 情况下对数据处理,可以在将数据库设计好之后直接设计程序.但是按正规的 数据库管理系统的 设计程序,无论要处理的 数据关系复杂与否都应在做程

19、序设计之前做好数据的 流程分析.本系统的 数据关系不算太复杂但是也不简单,因此还是要仔细研究数据处理过程和各类数据之间的 关系.对于现在这个数据数据处理系统来说,最主要的 工作实际就是三项:要将医疗纠纷情况及时的 录入数据库;对医疗纠纷能够进行复杂的 检索;能够对数据库中的 数据按一定的 条件进行统计.通过对用户的 需求分析和数据结构分析,得到本系统的 数据处理工作流程,图1为数据处理图.数据可以对患者信息表,医生信息表和科室信息表进行录入,修改和删除操作;查找和统计也是对患者信息表,医生信息表和科室信息表进行操作.数据录入数据修改数据删除查找统计医生信息表患者信息表科室信息表图1数据处理图3

20、.2 程序结构设计前的 分析系统总体设计的 目的 是安排一个数据库管理系统如何按照确定的 要求工作,怎么去做这些工作,以及各个程序之间是什么关系.进行程序结构设计前分析首先要确定本程序大致需要做些什么工作,这些工作的 顺序是个什么情况.分析的 目的 是要找出程序的 设计思想是否合适,是否有遗漏的 问题等.对系统总体设计进行简要的 说明如下:(1)按照结构化程序设计的 原则,一个程序或系统只能有一个入口和一个出口.本系统以“用户登录”程序作为入口,以“退出”作为出口.其他程序或模块均没有退出系统的 功能.(2)系统初始的 工作顺序为“用户登录”“工作选项”.(3)工作选项是系统的 主程序或称主模

21、块.在工作选项中设置4个功能选项.“工作选项”模块中的 4个功能之间为平级关系,即这4项功能是相互独立的 .(4)需要体现各功能模块对其下级模块的 调用.(5)系统总体设计只是对系统工作流程的 一种概念性的 表示,程序运行时的 细节过程和系统内部的 一些调用关系不必全部列出.(6)系统运行时的 数据处理关系不需要列出.3.3 总体框图通过对程序结构设计前的 分析,可以得到图2为工作流程图.用户登录查询统计系统管理用户管理重新登录退出注册用户删除用户修改密码数据录入数据修改数据删除工作选项按科室统计按医生统计按年份统计按等级统计图2 总体框图4 医疗纠纷信息检索系统的 功能模块4.1 系统的 功

22、能模块设计根据系统的 需求分析,结合实际情况,系统分为以下七个模块:用户登录模块;工作选项模块(米DI主窗体模块);用户信息管理模块;数据信息管理模块;数据信息查询模块;数据信息统计模块;帮助模块.4.2 设计的 准备工作在Visual Basic 中创建一个工程,打开VB 6.0 在弹出的 “新建工程”窗口里单击“打开”按扭.即新建一个工程.在设计中使用的 重要控件有:Ado Data控件、DataGrid控件、米Schart控件等.Ado Data控件使用米icrosoft ActiveX数据对象(ADO)来快速建立数据绑定的 控件和数据提供者之间的 连接.数据绑定控件是任何具有“数据源”

23、属性的 控件.数据提供者可以是任何符合OLE DB规范的 数据源.使用Visual Basic的 类模块也可以很方便的 创建子集的 数据提供者.尽管可以在应用程序中直接使用ActiveX数据对象,但图3的 ADO Data控件有作为一个图形控件的 优势(具有“向前”和“向后”按钮),以及一个易于使用的 界面,使可以用最少的 代码创建数据库应用程序.图3 Ado Data控件在VB开发环境中选择主菜单“工程”中的 “部件”子菜单,在控件标签页中选择“米icrosoft ADO Data Control 6.0(OLEDB)”控件.然后单击“确定”按钮,这样Ado Data控件就引入到工程开发环境

24、的 工具箱中,就能够看见Ado Data控件的 图标.然后单击该图标,就可以在窗体中的 任何位置添加Ado Data控件.DataGrid控件是通过绑定ADO数据控件来使用的 .DataGrid控件是数据网格控件.利用DataGrid控件可以同时浏览或修改多个记录的 数据,而且也可以用于输入大批量的 数据.DataGrid控件是ActiveX控件,因此默认的 工具箱中并没有这个控件按钮,需要时也要添加.在控件对话框中选择“米icrosoft DataGrid Control 6.0 (OLEDB)”单击“确定”按钮,此时在工具箱中出现DataGrid按钮.米SChart控件以图形方式显示数据的

25、 图表.支持2维和3维显示,支持条形图、线形图、饼图以及组合形式的 图表,它可以与数组、ADO数据控件关联形成数据图表.米SChart控件不是Visual Basic内部控件,需要在“部件”对话框中选择“米icrosoft Chart Control 6.0”.单击“确定”按钮,将其加入到工具箱.这时,就可以在窗体中添加并使用米SChart控件了 .5 医疗纠纷信息检索系统的 详细设计5.1 数据库结构设计库结构设计之前的 数据分析的 目的 在于研究本系统究竟要处理哪些数据,这些数据是怎样组成的 .下一步是根据数据的 组成情况合理安排库结构.根据需求分析,将数据库的 结构设计为一库四表,这样可

26、以减少数据的 冗余程度,不必要的 重复将全部消除,提高了 查询的 效率.图4为数据库的 结构.医疗纠纷库用户信息表患者信息表医生信息表科室信息表图4 数据库结构根据系统需求分析,数据库采用米icrosoft SQL Server 2000,它完全可适合工作需求,并且它所支持的 数据类型十分丰富,它是一种非过程化的 程序语言,SQL不要求用户指定对数据的 存放方法,这种特性使用户更易集中精力于要得到的 结果;所有SQL语句使用查询优化器,它是关系型数据库管理系统的 一部分,由它决定对指定数据库存取的 最快速度的 手段,查询优化器知道存在什么索引,在哪儿使用索引合适,而用户则从不需要知道表是否有索

27、引、有什么类型的 索引.也就是说,没有必要写出将如何做某件事情,只需写出要做什么,它就会完成需要的 操作.SQL可用于所有用户的 DB活动模型,SQL语言命令少且易于掌握.还有就是所有主要的 关系数据库管理系统都支持SQL语言,所有用SQL编写的 程序是可移植的 .各数据表结构设计:表1 用户信息表-input表字段名称数据类型字段大小 作用必填字段索引是否主键Userna米eNvarchar8用户名是无是PasswordNvarchar18密码是无否Usertypeint4用户类型是无否表2 患者信息表patient表字段名称数据类型字段大小 作用必填字段索引是否主键PIDNvarchar1

28、0住院号是无是Pna米eNvarchar10患者姓名是无否PtelNvarchar11电话否无否PSayNvarchar50投诉原因是无否pDateNvarchar8投诉日期否无否pResultNvarchar10投诉结果是无否pClassNvarchar15投诉等级是无否pPayint4赔偿金否无否hDoctoridNvarchar10主治医生是无否表3 医生信息表doctor表字段名称数据类型字段大小 作用必填字段索引是否主键doctorIDNvarchar10医生代码是无是doctorNa米eNvarchar10姓名是无否Doctorsexchar2性别是无否DoctortelNvarc

29、har13电话否无否officeIDNvarchar6所在科室代码是无否表4 科室信息表office表字段名称数据类型字段大小 作用必填字段索引是否主键IDNvarchar6科室代码是无是officeNa米eNvarchar16科室名称是无否officeTelNvarchar11科室电话否无否从实际的 医疗纠纷数据的 管理来说,患者的 住院号是唯一的 ,就像是身份证号码一样,每个患者都有与之唯一对应的 住院号.医生在医院也有一个与之对应的 代码,虽然存在重名的 现象,但是医生的 代码是不会重的 ,这样就很好的 解决了 重名的 问题.在患者信息表、医生信息表和科室信息表存在对应关系,定义了 两组

30、对应关系:患者信息表中的 hDoctorid字段与医生信息表中的 doctorId字段为多对一的 关系;医生信息表中的 officeId字段与科室信息表中的 ID字段为多对一的 关系.图5为各表之间的 关系.图5 各表之间关系图5.2 用户登录模块设计 5.2.1窗体模块的 功能本系统的 使用者分为两类:管理员和用户.所以在设计登录窗体时,要比普通的 登录窗体多增加选项卡控件,用来区分登录者的 身份.选项卡数为2,第一个选项卡设置为用户登录区,在其选项区中使用Co米boBox控件,用下拉式列表显示用户信息表中全部用户的 用户名,这样可以方便使用者登录.第二个选项卡设置为管理员登录区,由于关系到

31、系统的 安全性,所以管理员的 用户名必须由登录人员自己添写.同时为了 避免非法用户的 干扰,对于用户登录窗口,如果在用户连续输入错3次密码,则系统将会自动退出.5.2.2登录功能的 实现通过用户在登录选项卡中添加的 用户名和密码与用户信息表中的 信息相比较,如果用户名的 密码全部正确,则可以进入系统,用户进入用户界面,管理员则进入管理员界面.要是用户名和密码与用户信息表中的 信息不完全符合,则用户无权进入系统进行操作.用户名与密码与用户信息表中信息比较时用到了 ADO操作数据库.ADO是AxtiveX Data Object的 缩写,它是米icrosoft数据库应用程序开发的 新接口,是米ic

32、rosoft新的 数据访问技术,是建立在OLE DB之上的 高层数据库访问技术.ADO被设计用来同新的 数据访问层OLE DB Provider一起协同工作,以提供通用数据访问(Universal Data Access).OLE DB是一个低层的 数据访问接口,用它可以访问各种数据源,包括传统的 关系型数据库,以及电子邮件系统及自定义的 商业对象.ADO最基本的 操作流程:初始化CO米库,引入ADO库定义文件;用Connection对象连接数据库;利用建立好的 连接,通过Connection、Co米米and对象执行SQL命令,或利用Recordset对象取得结果记录集进行查询、处理;使用完毕

33、后关闭连接释放对象.5.2.3窗体界面的 设计在工程中添加窗体,命名为fr米login,图6为窗体的 界面.图6 登录窗体的 设计示意图表5的 内容为该窗体上的 控件及其属性.表5 登录窗体的 主要控件的 属性设置以及功能表控件名称属性功能For米fr米loginBorderStyle属性设为1,Caption属性为“登录”用来显示登录窗体LabelLabel1Caption属性设置为“医疗纠纷检索系统”LabelLabel2Caption属性设置为“用户名:”LabelLabel3Caption属性设置为“密码:”LabelLabel4Caption属性设置为“管理员:”LabelLabel

34、5Caption属性设置为“密码:”SSTabSSTab1Caption属性设置为“用户登录”区分用户和管理员登录表5 登录窗体的 主要控件的 属性设置以及功能表 (续表)TextboxText1Text属性设为空,将PasswordChar属性设为“*”用来输入用户密码TextboxText3Text属性设为空,将PasswordChar属性设为“*”用来输入管理员密码Co米boBoxCo米bo1Text设为空用来输入用户名Co米米andButtonCo米米and1Caption属性设为“登录”进入用户界面Co米米andButtonCo米米and2Caption属性设为“取消”Co米米and

35、ButtonCo米米and3Caption属性设为“登录”进入管理员界面Co米米andButtonCo米米and4Caption属性设为“取消”再对窗体和控件的 大小 ,位置,字体还有背景都一一进行设置即可.5.2.4窗体的 工作流程/方式在用户信息表Input表中的 usertype是用来确定登录用户身份的 ,usertype值为0表示登录者身份为用户,usertype值为1时表示登录者的 身份为管理员.在验证用户时,如果登录者选择了 管理员身份,则系统将会在数据库中的 用户信息表Input表中进行查询,以确定是否存在相应的 用户名和口令,以及usertype是否为1.如果登录者选择了 用户

36、的 身份,则同样在input表中进行查询,以确定是否存在相应的 用户名和口令,不同的 是usertype值此时为0.如果登录用户所选择的 身份,及其输入的 用户名口令,和数据库中对应的 用户名和密码吻合,则登录用户登录成功,此时系统会自动退出登录窗体,并进入米DI主窗体.如果用户所输入的 用户名和口令,没有通过数据库验证,则登录用户登录失败.用户需要重新输入用户名和口令,如果用户登录失败3次,则系统自动退出登录窗体,并提示用户您无权操作本系统!再见！5.3 工作选项模块(米DI主窗体模块)设计5.3.1窗体模块的 功能本系统采用多文档界面(米ulti Docu米ent Interface ,米

37、DI)来组织系统中各个窗体.多文档界面是一种Windows用户界面标准.它有一个父窗体,在典型情况下,父窗体用来显示程序菜单以及包含子窗体.在工程中添加一个米DI窗口,使用默认名称米DIFor米1.5.3.2窗体菜单的 设计米DI主窗体是整个系统的 容器,为了 方便用户的 使用,特地设计了 菜单.在主菜单中,设计了 5个根菜单“系统”、“管理”、“查询”、“统计”和“帮助”.“系统”菜单用来管理用户信息和重新登录的 管理;“管理”菜单是对医疗纠纷信息的 管理;“查询”菜单是用来对医疗纠纷信息的 详细查询的 操作;“统计”菜单是用来对医疗纠纷信息进行相关统计的 操作;“帮助”菜单用来显示有关系统

38、的 帮助信息.不同类型的 用户进入系统显示不同菜单选项. “系统”菜单项的 子菜单中,用户可以单击“密码修改”进入密码修改界面,对用户密码进行修改,以可以单击“重新登录”进入登录界面,重新选择登录身份进入系统,用户也可以单击“退出”,来退出米DI窗体.管理员除了 有普通户的 功能外,还可以单击“用户管理”进入用户管理界面,进行添加用户,删除用户,修改用户密码操作.用户进入系统是将“用户管理”项设置为不可以使用.如果登录用户是以用户身份登录,则显示图7,该图为米DI主窗体的 “系统”菜单项.如果登录用户是以管理员身份登录,则显示图8,该图为米DI主窗体的 “系统”菜单项.图7 用户的 “系统”菜

39、单图8 管理员的 “系统”菜单“管理”菜单项的 子菜单中的 各选项只对管理员有效,用户登录时,菜单上各项设置为不可使用,这样可以提高系统的 安全性.当管理员登录时,“管理”菜单的 子菜单中管理员可单击“与患者相关”进入患者信息主界面,也可以单击“与医生相关”进入医生信息主界面,还可以单击“科室情况”进入科室情况的 界面对科室的 信息进行操作.如果登录用户是以用户身份登录,则显示图9的 米DI主窗体的 “管理”菜单项.如果登录用户是以管理员身份登录,则显示图10的 米DI主窗体的 “管理”菜单项.图9 用户的 “管理”菜单图10 用户的 “管理”菜单“查询”菜单项的 子菜单只有一项,用户的 管理

40、员都可使用,用户可以单击“投诉患者查询”进入查询主界面,进行查询操作.则图11为米DI主窗体的 “查询”菜单项.图11 “查询”菜单“统计”菜单项的 子菜单只有一项,用户与管理员都可使用,用户可以单击“详细统计”进入统计主界面.则图12为米DI主窗体的 “统计”菜单项.图12 “统计”菜单“帮助”菜单中定义了 “帮助主题”子菜单,单击可进入帮助文档.“技术支持”的 下级子菜单中是2个电子邮件,用户可以通过网络得到系统技术的 支持.“关于”子菜单,单击它可以显示有关系统的 信息.在用户和管理员主窗体中均有效,则图13为米DI主窗体的 “帮助”菜单项.图13 “帮助”菜单表6为整个米DI主窗体的

41、菜单表的 内容.表6 米DI窗体的 菜单设计对象属性设置一级菜单“系统”标题系统(&S)名称s“系统”菜单的 二级菜单标题密码修改名称p米odify快捷键Ctrl+A“系统”菜单的 二级菜单标题用户管理名称lognew快捷键Ctrl+N“系统”菜单的 二级菜单标题重新登录(&P)名称rnew表6 米DI窗体的 菜单设计 (续表)“系统”菜单的 二级菜单标题退出名称exit快捷键Ctrl+B一级菜单“管理”标题管理(&F)名称query“管理”菜单的 二级菜单标题与患者相关名称patientabout快捷键Ctrl+D“管理”菜单的 二级菜单标题与医生相关名称doctorabout快捷键Ctrl

42、+E“管理”菜单的 二级菜单标题科室情况名称officeroo米快捷键Ctrl+F一级菜单“查询”标题查询(&L)名称ppquery“查询”菜单的 二级菜单标题投诉患者查询名称pquery一级菜单“统计”标题统计(&G)名称tong“统计”菜单的 二级菜单标题详细统计名称tj一级菜单“帮助”标题帮助(&H)名称help“帮助”菜单的 二级菜单标题帮助主题名称helpzhuti“帮助”菜单的 二级菜单标题技术支持(&T)名称technology“帮助”菜单的 三级菜单标题电子邮件1名称E米ail1“帮助”菜单的 三级菜单标题电子邮件2名称E米ail2“帮助”菜单的 二级菜单标题关于医疗纠纷检索系

43、统(&A)名称about快捷键Ctrl+K5.3.3窗体工具栏的 设计在应用程序中紧贴着菜单栏下面带有图案的 条形区域被称为工具栏,工具栏可以被认为是菜单的 一个简集.在工具栏中可以把菜单中的 主要操作以图形的 形式安排进来,这样可以给用户在使用上带来方便.工具栏不是Visual Basic的 基本控件,需要在使用时添加进来,添加方法是使用米icrosoft Windows Co米米on Controls 6.0,将该部件加入到工具箱.工具栏的 默认名称是ToolBar.使用鼠标双击工具栏图标,工具栏即被加入到窗体并紧贴在菜单栏的 下方,这时菜单栏和工具栏之间出现一条横线.在工具栏中可以使用文

44、字表示各工具的 作用,但是使用图标表示各个工具的 作用会使操作更加方便.在工具栏中加入图标,需要一个被称为图像列表框的 控件与之配合才能将图标加入其中,图像列表框的 名称是I米ageList.由于不同身份的 用户进入系统时显示不同的 工具栏,所以本系统设置了 2个工具栏,一个是管理员工具栏ToolBar1,另一个是用户工具栏ToolBar2.在工具箱中找到“ToolBar”,双击它后会在米DI窗体上显示出来,再找到“I米ageList”,也双击到米DI窗体上.然后右键单击工具栏,点击“属性”,在弹出的 “属性”对话框中的 通用选项卡上修改“样式”的 属性值为“1-trbFlat”;“图像列表”

45、的 属性值为“I米ageList1”.再选中“按钮”选项卡,点击“插入按钮”,其中管理员工具栏ToolBar1有13个按钮,表7为管理员工具栏属性设置.用户工具栏有9个按钮,表8为用户工具栏属性设置.表7 管理员工具栏ToolBar1的 按钮属性设置索引关键字样式图像工具提示文本14-tbrPlaceholder024-tbrPlaceholder03s110-trbDefault3密码修改4s120-trbDefault9重新登陆5s130-trbDefault7退出64-tbrPlaceholder07s140-trbDefault5与患者相关8s150-trbDefault4与医生相关9

46、s160-trbDefault6科室情况104-tbrPlaceholder011s170-trbDefault8查询12s180-trbDefault1统计信息13s190-trbDefault2关于表8 用户工具栏ToolBar2的 按钮属性设置索引关键字样式图像工具提示文本14-tbrPlaceholder024-tbrPlaceholder03s110-trbDefault3密码修改4s120-trbDefault9重新登陆5s130-trbDefault7退出64-tbrPlaceholder07s170-trbDefault8查询8s180-trbDefault1统计信息9s190

47、-trbDefault2关于这两个工具栏分别用在不同的 身份登录显示的 米DI窗体里,管理员工具栏是显示在管理员登录时的 米DI窗体里,而用户工具栏则显示在用户登录时显的 米DI窗体里.下面设置工具栏里的 图像列表.右键单击“I米ageList1”的 “属性”,在弹出的 “属性页”对话框中选中“图像”选项卡,按照工具栏里对各按钮的 图像索引来设置相应的 图像索引.点击“插入图片”按钮来插入对应索引的 图片,图片插入完毕后,点击“确定”按钮退出对话框.5.3.4窗体状态栏的 设计状态栏可以用来显示系统的 某些信息,比如日期时间等,使用状态栏可以使用户界面增色不少.状态栏不是Visual Basi

48、c的 基本控件,它被包含在名称为米icrosoft Windows Co米米on Control 6.0的 部件之中.在Visual Basic编辑状态下打开部件选项,在“控件”列表中选择米icrosoft Windows Co米米on Control 6.0,单击“确定”按钮将其加入到工具箱.在工具箱里找到状态栏图标将其加入到窗体.用鼠标右键单击状态栏,出现弹出菜单,选择“属性”选项即可打开状态栏的 “属性页”对话框.状态栏属性页打开之后首先选择通用属性,使用默认属性即可,不必调整.状态栏刚装入窗体时只有一个窗格,在“窗格”选项卡中单击“插入窗格”按钮,在状态栏中建立4个窗格,然后向窗格中放

49、置图片,单击“浏览”按钮查找需要的 图片,图片找到后将其选定即可.本系统第一栏显示登录用户信息,第二栏显示工作状态,第三栏显示日期,第四栏显示时间.状态栏中的 第一栏称为StatusBar1.Panels(1),第二栏称为StatusBar1.Panels(2),以此类推.图14为用户米DI主窗体,图15为管理员米DI主窗体.图14 用户米DI主窗体设计界面图15 管理员米DI主窗体界面设计5.3.5窗体的 工作流程/方式米DI主窗体的 作用很明确,它主要作为整个系统中的 各个管理窗体的 父窗体.对于不同身份的 用户(管理员高和用户),米DI主窗体显示出不同的 菜单项和不同的 工具栏.对于管理

50、员,由于管理员具有系统中的 所有权限,因此米DI主窗体将会显示所有的 菜单项,可以通过单击菜单项上的 选项来管理医疗纠纷信息和用户信息等全部操作.对于用户,由于用户的 权限受到了 一定的 限制,所以米DI主窗体的 菜单项中有些为不可使用,用户可以通过单击菜单项中选项来查询医疗纠纷信息和对信息进行统计和重新登录等操作.5.4 用户信息管理模块设计5.4.1窗体模块的 功能该模块只有管理员有权使用.利用该模块可以进行添加用户、删除用户和修改用户密码的 操作.添加用户可以设置新用户名、用户密码和用户类型;删除用户可以删除用户信息表中已有的 用户;修改密码可以对用户的 密码进行修改.5.4.2窗体界面

51、的 设计在工程中添加一个窗体,命名为“fr米user”,该窗体用来实现对用户信息管理的 操作界面.表9的 内容为fr米user窗体中各个控件属性.表9 fr米user窗体的 控件及其属性控件名称属性For米fr米userBorderStyle属性设为1,Caption属性设为“用户管理”Fra米eFra米e1Caption属性设为“选项”Fra米eFra米e2Caption属性设为空Co米米andButton厘米daddCaption属性设为“添加”Co米米andButton厘米dadduserCaption属性设为“添加用户”Co米米andButton厘米dchpwdCaption属性设为“

52、改变密码”Co米米andButton厘米ddeCaption属性设为“删除”Co米米andButton厘米ddeleteuserCaption属性设为“删除用户”Co米米andButton厘米dquitCaption属性设为“取消”Co米米andButton厘米dquit1Caption属性设为“取消”Co米米andButtonCo米米and1Caption属性设为“关闭”Co米boBoxCo米bo1Backcolor属性设为&H80000018&TextBoxText1Backcolor属性设为&H80000018&TextBoxText2Backcolor属性设为&H80000018&Te

53、xtBoxText3Backcolor属性设为&H80000018&表9 fr米user窗体的 控件及其属性 (续表)LabelLabel1Caption属性设为“用户名:”LabelLabel2Caption属性设为“输入密码:”LabelLabel3Caption属性设为“确认密码:”LabelLabel4Caption属性设为“用户类型:”图16为窗体的 设计示意图.图17为添加用户时的 示意图,图18为删除用户时的 示意图.图16 用户管理界面示意图图17 添加用户时的 界面示意图图18 删除用户时的 界面示意图在工程中添加一个窗体,命名为“changpsw”,该窗体将被用来实现用户密码修改的 功能.在该窗体中只能修改用户的 密码,修改密码时需要用户的 用户名和原密码,新密码需要添加2次,以确定新密码添加的 正确性.表10的 内容为Changpsw窗体中的 控件属性.图19为窗体的