医院管理系统课程设计

1、课程设计题 目： 医院管理系统学生姓名： 学 号：学 院：班 级： 指导教师：二一四年一月八日医院门诊管理系统2一系统理论基础及开发工具简介21 Visual Basic的介绍22 SQL Server2000简介4二系统需求分析与方案设计41.需求分析42概念结构设计43物理结构设计10三系统的实现101数据库实现102.系统登录模块15四 .小结17五 .参考文献17医院门诊管理系统摘要：自从人类进入21世纪,也就进入了一个高速发展的信息时代，高新技术飞速发展的同时,也使得计算机的使用范围大大扩展，它已经涉及到人类生活的方方面面。计算机使用的方便快捷,使它在越来越多的方面显示出比传统人工制

2、作更迅速和准确的优点,尤其是在信息记录,检索和查询方面,更是使我们人类避免了不必要的麻烦。开发和使用医院管理系统对于医院来说是非常必要的，它能加快医院的信息化步伐，提高医院的管理水平和医疗水平，增强在同行业中的竞争实力，是现代医院管理与计算机信息技术的必要结合。医院管理系统能加强医院内部管理、提高医疗服务水平，最大限度地提高医院运行的效率和医院管理水平，给医院带来了显著的经济效益和社会效益，也能使医院在未来竞争中处于领先地位。本课题设计一个医院管理系统,通过这个系统管理员可以简捷、方便的对病人、医生的记录进行查阅、增加、删除等功能，而用户也可以通过这个系统对进医生和病人的信息查询、账户增删等功

3、能。系统采用VisualBasic作开发工具，SQLServer2000作数据库管理系统。关键字：医院 信息管理 数据库 VisualBasicSQLServer2000一 系统理论基础及开发工具简介1 Visual Basic的介绍Visual Basic（VB）是一种由微软公司开发的包含协助开发环境的事件驱动编程语言。从任何标准来说，VB都是世界上使用人数最多的语言不仅是盛赞VB的开发者还是抱怨VB的开发者的数量。它源自于BASIC编程语言。VB拥有图形用户界面（GUI）和快速应用程序开发（RAD）系统，可以轻易的使用DAO、RDO、ADO连接数据库，或者轻松的创建ActiveX控件。程序

4、员可以轻松的使用VB提供的组件快速建立一个应用程序。一个典型的VB进程VB的中心思想就是要便于程序员使用，无论是新手或者专家。VB使用了可以简单建立应用程序的GUI系统，但是又可以开发相当复杂的程序。VB的程序是一种基于窗体的可视化组件安排的联合，并且增加代码来指定组建的属性和方法。因为默认的属性和方法已经有一部分定义在了组件内，所以程序员不用写多少代码就可以完成一个简单的程序。过去的版本里面VB程序的性能问题一直被放在了桌面上，但是随着计算机速度的飞速增加，关于性能的争论已经越来越少。窗体控件的增加和改变可以用拖放技术实现。一个排列满控件的工具箱用来显示可用控件（比如文本框或者按钮）。每个控

5、件都有自己的属性和事件。默认的属性值会在控件创建的时候提供，但是程序员也可以进行更改。很多的属性值可以在运行时候随着用户的动作和修改进行改动，这样就形成了一个动态的程序。举个例子来说：窗体的大小改变事件中加入了可以改变控件位置的代码，在运行时候每当用户更改窗口大小，控件也会随之改变位置。在文本框中的文字改变事件中加入相应的代码，程序就能够在文字输入的时候自动翻译或者阻止某些字符的输入。VB的程序可以包含一个或多个窗体，或者是一个主窗体和多个子窗体，类似于操作系统的样子。有很少功能的对话框窗口（比如没有最大化和最小化按钮的窗体）可以用来提供弹出功能VB的组件既可以拥有用户界面，也可以没有。这样一

6、来服务器端程序就可以处理增加的模块。VB使用参数计算的方法来进行垃圾收集，这个方法中包含有大量的对象，提供基本的面向对象支持。因为越来越多组建的出现，程序员可以选用自己需要的扩展库。和有些语言不一样，VB对大小写不敏感，但是能自动转换关键词到标准的大小写状态，以及强制使得符号表入口的实体的变量名称遵循书写规则。默认情况下字符串的比较是对大小写敏感的，但是可以关闭这个功能。一些术语：控件简单的说，控件就是构成或者说建造Visual Basic应用程序的图形化工具，包括窗体、按钮、复选框、列表框、数据控件、表格控件和图片控件等等；事件由用户或操作系统引发的动作。事件的示例有击键、单击鼠标(Clic

7、k)、双击鼠标(DblClick)、一段时间的限制，或从端口接收数据；方法嵌入在对象定义中的程序代码，它定义对象怎样处理信息并响应某事件。例如，数据库对象有打开纪录集并从一个记录移动到另一个记录的方法程序的基本元素，它含有定义其特征的属性，定义其任务和识别它可以响应的事件的方法。控件和窗体是Visual Basic中所有对象的示例；对象一个控件、窗体等都可被看作一个对象；过程为完成某些特定的任务而编写的代码段，过程通常用于响应特定的事件，也可以当作应用程序的用户自定义函数来使用；属性属性是组成用户界面的各对象的性质的具体描述。例如上述“对象”中所提到的尺寸、位置、颜色、宽度、高度等等都称为控件

8、的 属性。属性决定对象的外观，有时也决定对象的行为。对象的属性绝大部分是VB中已经事先定义好的，但也有的属性是需要在应用 过程中才去定义的。属性即可为对象提供数据，也能从对象取回信息。2 SQL Server2000简介SQL Server是一个关系数据库管理系统，是Microsoft推出新一代数据管理与分析软件。SQL Server 是一个全面的、集成的、端到端的数据解决方案，它为企业中的用户提供了一个安全、可靠和高效的平台用于企业数据管理和商业智能应用。SQL Server 2000是一个全面的、集成的、端到端的数据解决方案，它为企业中的用户提供了一个安全、可靠和高效的平台用于企业数据管理

9、和商业智能应用。SQL Server 2000为IT专家和信息工作者带来了强大的、熟悉的工具，同时减少了在从移动设备到企业数据系统的多平台上创建、部署、管理及使用企业数据和分析应用程序的复杂度。通过全面的功能集、和现有系统的集成性、以及对日常任务的自动化管理能力，SQL Server 2000为不同规模的企业提供了一个完整的数据解决方案。SQL Server 2000数据平台包括如下工具：关系型数据库、复制服务、通知服务、集成服务、分析服务、报表服务、管理工具、开发工具。SQL Server 2000数据平台为不同规模的组织提供了如下好处：充分利用数据资产、提高生产力、减少IT复杂度、更低的总

10、体拥有成本(TCO)。二 系统需求分析与方案设计1.需求分析医院管理系统是针对医院要求用计算机对医生和病人的各种信息进行汇总和记录的一种现代化管理软件，主要包括对病人的注册、就诊、住院登记、治疗结果、出院情况等档案信息的添加、记录、修改和查询等。通过对用户需求的分析，要求本系统具有以下功能:(1) 由于一项新的软件在被使用之前，对于使用者来说是陌生和崭新的，所以要求系统具有良好的人机界面；(2)在系统的使用过程中支持病人信息，药品信息，医生信息查询。（3）支持对原始数据的修改，可以添加、删除病人信息，修改医生和药品信息。(4) 数据计算自动完成,数据的稳定性和可靠性好，尽量减少人工干预。2概念

11、结构设计在数据库设计中，先要对系统分析所得的数据字典中的数据存储进行分析，然后得出系统的关系模式，可以采用实体联系图（简称ER图）的方法进行数据结构的描述。ER图由实体、属性、联系三部分组成。ER图的有关符号说明如下：实体属性联系散件实体编号名称日期其它来源散件编号帐号密码用户 用户E-R图编号单位名称备注合同单位 药品单位E-R图编号名称 折扣发票项目 药品类型E-R图编号科室名称 备注科室 科室E-R图编号药品名称 备注 收费项目 医师E-R图编号药品编码药品名称有效期型号规格药品 药品E-R图合同单位折扣编号费用类别编号合作单位编号折扣合同单位折扣E-R图药品名称入库表编号供应商编号入库

12、日期药品编号入库表E-R图出库表出库编号出库日期药品编号药品名称出库表E-R图盘点表盘点单号盘点日期药品编号盘点表E-R图诊疗卡编号医疗卡号姓名状态诊 疗 卡 E-R图处方编号名称日期药品编号药品名称处方E-R图实体间主要关系如下:病人医师挂号药品划价药品属于门诊收费实体间主要关系图 3物理结构设计物理结构设计的原则如下：（1）尽可能的减少数据冗余和重复。（2）结构设计与操作设计相结合。（3）数据结构具有相对的稳定性。三系统的实现1 数据库实现（1）数据库建立建立数据库：HospitalDB2USE masterGOCREATEDATABASE HospitalDB2 ONPRIMARY(NA

13、ME= NHospitalDB2,FILENAME= NE:Program FilesMicrosoft SQL ServerMSSQL.1MSSQLDATAHospitalDB2.mdf,SIZE= 2240KB ,MAXSIZE= UNLIMITED,FILEGROWTH= 1024KB )LOGON(NAME= NHospitalDB2_log,FILENAME= NE:Program FilesMicrosoft SQL ServerMSSQL.1MSSQLDATAHospitalDB2_log.LDF,SIZE= 560KB ,MAXSIZE= 2048GB ,FILEGROWTH=

14、 10%)COLLATE Chinese_PRC_CI_ASGOEXEC dbo.sp_dbcmptlevel dbname=NHospitalDB2, new_cmptlevel=90GOIF(1 =FULLTEXTSERVICEPROPERTY(IsFullTextInstalled)beginEXEC HospitalDB2.dbo.sp_fulltext_database action =enableendGOALTERDATABASE HospitalDB2 SET ANSI_NULL_DEFAULT OFFGOALTERDATABASE HospitalDB2 SETANSI_NU

15、LLSOFFGOALTERDATABASE HospitalDB2 SETANSI_PADDINGOFFGOALTERDATABASE HospitalDB2 SETANSI_WARNINGSOFFGOALTERDATABASE HospitalDB2 SETARITHABORTOFFGOALTERDATABASE HospitalDB2 SET AUTO_CLOSE OFFGOALTERDATABASE HospitalDB2 SET AUTO_CREATE_STATISTICS ONGOALTERDATABASE HospitalDB2 SET AUTO_SHRINK OFFGOALTER

16、DATABASE HospitalDB2 SET AUTO_UPDATE_STATISTICS ONGOALTERDATABASE HospitalDB2 SETCURSOR_CLOSE_ON_COMMITOFFGOALTERDATABASE HospitalDB2 SET CURSOR_DEFAULT GLOBAL GOALTERDATABASE HospitalDB2 SETCONCAT_NULL_YIELDS_NULLOFFGOALTERDATABASE HospitalDB2 SETNUMERIC_ROUNDABORTOFFGOALTERDATABASE HospitalDB2 SET

17、QUOTED_IDENTIFIEROFFGOALTERDATABASE HospitalDB2 SET RECURSIVE_TRIGGERS OFFGOALTERDATABASE HospitalDB2 SET ENABLE_BROKER GOALTERDATABASE HospitalDB2 SET AUTO_UPDATE_STATISTICS_ASYNC OFFGOALTERDATABASE HospitalDB2 SET DATE_CORRELATION_OPTIMIZATION OFFGOALTERDATABASE HospitalDB2 SET TRUSTWORTHY OFFGOAL

18、TERDATABASE HospitalDB2 SET ALLOW_SNAPSHOT_ISOLATION OFFGO（2）建立表建立基本信息表（如药品、医师、科室等）及几个实体联系建模后的表（如划价信息表、收费信息表等）。为了加快系统访问的速度把这些表放在一个数据库中。本系统中相关数据库表结构设计举例如下：科室表（sectionOffice）名称英文名类型是否为空备注编号iAutointNot null primarykey科室名称sectionNamevarchar(20)Not null 备注marksvarchar(200)Null 合同单位表（pactUnit）名称英文名类型是否为空备

19、注编号iAutointNot null primarykey合同单位名称pactUnitvarchar(50)Not null 备注marksvarchar(200Null 发票项目表（invoiceItem）名称英文名类型是否为空编号iCodevarchar(20)Not null 名称namevarchar(50)Not null 折扣stateintNot Null 收费项目表（chargeItem）名称英文名类型是否为空备注编号iCodevarchar(20)Not null 主键药品名称dLeechdomNamevarchar(20)notnull,代号codeNamevarchar

20、(20)notnull单价unitPricemoneynotnull,费用类别moneTypevarchar(20)notnull,折扣stateintnotnull,助记符mnemonicvarchar(20)notnull,进价jPricemoneynotnull,单位unitvarchar(20)notnull,规格specvarchar(50)notnull,统计类别statisticalvarchar(50)notnull,最低库存neapStockintnotnull,合同单位折扣表（pactUnitDiscount）名称英文名类型是否为空备注编号iAutointnotnullpr

21、imarykey合作单位编号pactUnitCodeintnotnull外键依赖合同单位表合同编号费用类别编号fareTypeCodevarchar(20)notnull折扣stateintnull药品供应商表（medicamentProvider）名称英文名类型是否为空备注供应商编号IDintnotnull,primarykey药品供应商简称shortNamevarchar(100)notnull,药品供应商名称realNamevarchar(50)notnull,联系人contatorvarchar(20)notnull,电话telephonevarchar(11)notnull,传真fa

22、xvarchar(20)null,详细地址addressvarchar(50)notnull,邮编zipvarchar(6)null,开户银行bankvarchar(50)null,银行卡号bankIdvarchar(20)null,状态（是否可用）stateintnull,电子邮件emailvarchar(100)null,网址urlvarchar(100)null,税号areaIdvarchar(100)null,诊疗卡信息表（diagnosisCard）名称英文名类型是否为空备注编号IDintnotnullprimarykey医疗卡号diagnosisCardIdvarchar(20)n

23、otnull姓名namevarchar(50)notnull出生日期birthdatetimenull状态（是否可以使用）stateintnotnull身份证号cardIdvarchar(18)notnull发卡日期giveDatedatetimenull下发金额giveIntiMoneymoneynotnull联系电话telephonevarchar(21)null联系地址addressvarchar(50)null备注remarkvarchar(200)null性别sexintnotnull门诊人员表（clinicPeople）名称英文名类型是否为空备注编号iCodevarchar(20)

24、notnull,primarykey姓名peopleNamevarchar(20)notnull,职位jobvarchar(50)notnull,密码passwordvarchar(20)notnull,权限描述popedomvarchar(200)null,处方模板表（prescriptionTemplet）名称英文名类型是否为空备注编号IdIntnotnull,primarykey处方模板名称recipeNamevarchar(50)notnull,处方模板生成日期createTimedatetimenotnull,药品编号leechdomIdIntnotnull,药品名称leechdom

25、Namevarchar(100)Notnull,规格specvarchar(100)notnull处方数量numIntNotnull,处方详细信息表（prescriptionInfo）名称英文名类型是否为空备注编号IDintnotnull,primarykey处方号CFIDIntnotnull,收费号SFIDvarchar(20)notnull,处方中药品编码physicCodephysicvarchar(20)notnull,药品数量physicCountIntnotnull,药品单价physicUnitPricemoneyNot null,药品总价physicTotalPricemoney

26、notnull,处方医生编号doctorIDvarchar(20)Not null,处方类别编号prjIDIntNot null,诊疗卡编号cardIDIntNot null,病人姓名sickNamevarchar(20)Not null,处方状态stateIntNot null,药品原单价physicOriginalUnitPricemoneyNot null,备注remarkvarchar(200)null,药品表（leechdom）名称英文名类型是否为空备注编号iCodeintnotnull,primarykey药品名称statItemNamevarchar(100)notnull,代号

27、codeNamevarchar(50)notnull,单价unitPriceMoneynotnull,费用类别moneTypevarchar(20)notnull,折扣stateIntnull,助记符mnemonicvarchar(100)notnull,进价jPricemoneyNot null,单位unitvarchar(100)Not null,规格specvarchar(100)Not null,统计类别statisticalvarchar(100)Not null,最低库存neapStock Intnull,处方药品中间表（prescriptionMedicament）名称英文名类型

28、是否为空备注编号IdintNot null primarykey处方模板编号recipeNameIntNot null 药品编号goodsIDIntNot Null 自定义统计项目表（customStatItem）名称英文名类型是否为空备注编号iCodevarchar(20)Not null primarykey统计项目名称statItemNamevarchar(100)Not null 折扣stateIntNull 入库表（inputDepot）名称英文名类型是否为空备注入库编号inputIdvarchar(20)notnull,primarykey供应商IDmedicamentProvid

29、erIdIntnotnull,入库日期inputTimedatetimenotnull,备注remarkvarchar(200)null,药品编号leechdomiCodeIntnotnull,药品名称statItemNamevarchar(100)Not null,进价jPricemoneynotnull,单价unitPricemoneyNot null,单位unitvarchar(100)Not null,规格specvarchar(100)Not null,最低库存neapStockIntNot null,出库表（outputDepot）名称英文名类型是否为空备注出库编号outputIdvarchar(20)notnull,primarykey出