小型医疗机构诊疗管理系统.pptVIP

小型医疗机构诊疗管理系统 一、系统设计的背景和意义 1.系统背景 2.实现意义 二、系统的制作环境和工具 三、系统的模块结构和功能介绍 1.系统的模块结构 2.系统功能 四、主要实现代码 一、系统设计的背景和意义 1.系统背景 现在发达国家，小型医疗机构的管理系统已经十分的完善。各种管理机制已经十分的健全，病人就医方便快捷。对于诊疗的管理十分的科学。我国小型的医疗系统十分的不健全。存在三大问题：药品的管理混乱、诊疗的流程繁琐费时、对于病人的信息管理不能方便快捷的查询。我国人口众多，各种小型医疗机构遍布全国。需要有一个科学合理的管理系统来对其进行管理。 二、系统的制作环境和工具 三、系统的模块结构和功能介绍 2.系统功能 该系统的功能主要有：查询、添加、修改、打印、计费 管理员主要是：医生信息（查询、添加、修改）和药品信息（查询、添加）。 医生主要是 ：患者信息（查询、添加）和诊疗信息（查询、添加）。 计费员主要是：患者相关计费信息（查询、计费、打印）。 下面详细介绍由结构模块衍生出来的三个界面：管理员界面、医生界面、计费界面。 I.管理员界面 该界面是诊疗系统中，管理员用来管理医生和药品信息的一个界面。该界面是实现管理员模块的功能。只可以查询当前已添加的信息记录，信息由管理员添加。管理员可以直接输入所要查找的id号来查找相关的医生信息。界面如下： II.医生界面 医生模块是整个诊疗系统的关键，系统的设计既要符合医疗机构的诊疗流程，又要保证数据的准确性和实用性，医生模块的功能也依赖于管理员模块提供的数据，有独立管理患者信息。这些要求是通过医生界面来实现的，界面如下图所示： III.计费界面 计费员的主要职责是为患者进行医疗费用的查询和计算汇总，并将结果打印出来。该模块完全依赖于前面的管理员模块和医生模块，它不能独立的存在。只有依靠前两个模块提供的数据，才能够进行计费的查询和计算，并打印。计费界面如下图所示： 主要的实现代码有： Dim Rs1 As New ADODB.Recordset Dim chaxun As String //查询 Dim xiugai As String //修改 Dim tianjia As String //添加 Set Rs1 = New Recordset chaxun = “ select * from 相关信息的表 where id = Text1(1).Text //xiugai =“update 相关信息的表 set 要修改的变量=**** where id = //Text1(1).Text ///tianjia = “ select * from 相关信息的表 where id = Text1(1).Text Rs1.Open (chaxun/xiugai/tianjia), Str, adOpenKeyset, adLockOptimistic, adCmdTex Text3(0).Text = Rs1(3) Combo1.Text = Rs1(4) Text4(0).Text = Rs1(5) ///Rs1.AddNew ///With Rs1 ///…… ///End with * * 2.系统设计目的及意义： 小型医疗机构诊疗管理系统，集病人信息和药品管理于一身。建立机制健全的小型医疗机构对于我国社会的和谐发展有重大意义。我国正在努力建设一个健康、文明、和谐的现代化社会。一个健康科学的医疗体系，是这个过程中必不可少的一部分。 返回目录 该系统主要采用的是 VisualBasic6.0和SQL Server 2000。 VisualBasic6.0是Microsoft公司推出的必威体育精装版的Windows应用程序开发环境，它功能强大，受到广大编程人员的青睐，是世界上最畅销的编程语言之一。具有：编码简单、便于快速掌握、易于实现、操作简单等特点，同时，提供了很多实用的控件组件，良好的界面操作工能，给用户提供了一个很好的编辑环境。 SQL Server是微软公司开发的一个关系数据库管理系统统，可以在不同的操作平台上运行，具有很好的兼容性。同时， SQL Server对数据的管理十分的方便。对数据的查询、添加、修改、删除、更新等都可以很容易快的掌握操作方法。VB可以很容易的与其连接上，对数