医院信息管理系统.docx
《医院信息管理系统.docx》由会员分享,可在线阅读,更多相关《医院信息管理系统.docx(24页珍藏版)》请在冰点文库上搜索。
医院信息管理系统
医院管理信息系统设计
设计主要内容:
一、开发平台:
VB+SQLSERVER2000
二、功能要求:
1、设计内容
设计一个医院管理信息系统,该系统的用户由一般用户和管理员组成,然后不同的用户拥有不同的权限,各自完成各自的管理功能,首先是欢迎界面,然后选择登陆,登录的时候首先要判断用户的身份,合法的用户然后进入到系统的主界面中,不同的用户看到不同的系统功能。
用sqlsever2000创建后台数据库,然后利用程序设计语言(VB)编写程序实现对数据库的操作,按照要求完成所有的功能和模块。
2、医院管理信息系统主要功能
(1)用户管理:
用户登录界面,用户注册界面,病人资料登记界面(添加,打印等),职工资料查询界面(一定条件),门诊挂号登记界面(添加,打印等),病人资料查询界面(一定条件),病院病床查询界面(一定条件),药剂信息查询界面(添加,打印等),药剂信息选购界面(选购),科室界面(查询),本用户密码的修改界面
(2)管理员管理:
管理员登录界面,管理员注册界面,职工资料管理界面(添加,修改,删除),病人资料管理界面(增加,修改,删除),用户信息管理界面(添加,删除),病院病床管理界面(修改,删除),病院病床管理界面(添加,修改,删除),药剂管理界面(修改,删除),科室管理(修改,删除)。
3、医院管理信息系统数据库表单
(1)用户信息表单:
用户名,密码,用户身份(管理员和普通用户)
(2)职工信息表单:
员工号,所属科室,员工姓名,性别,现任职务,出身年月,开始工作时间,年龄,工资,科室编号,备注
(3)病人信息表单:
病人编号,病人姓名,病人性别,,病人年龄,职业,登记日期,证件号码,过敏史,体重,血型,联系电话,家庭住址,婚姻状况。
(4)科室表单:
科室名称,地点,员工号,科室主任,病房数,是否显示
(5)病院病床表单:
病床代号,所属科室,是否空闲
(6)药品信息表单:
药品编号,药品名称,规格名称,计量单位,单价,主治症状
(7)医疗仪器管理表单:
仪器代号,仪器名称,仪器价格,仪器数量
(8)门诊挂号表:
编号,病人编号,姓名,性别,挂号科室,费用类型,挂号费用,是否已划价
三、课程设计报告主要内容:
1医院管理信息系统需求分析(给出系统的功能模块图,对各个功能作出详细介绍)
2医院管理信息系统界面设计(给出界面截图及其主要控件的属性设置表格)
3医院管理信息系统数据库设计(给出数据库各个表单中数据的字段名,数据类型
及其相应的说明)
4医院管理信息系统程序设计(按照功能模块给出详细的程序代码,并给出重点语句
注释)
1.轿车销售管理信息系统需求分析
图医院管理信息系统
欢迎登陆界面
1.1.1选中管理员登录后便进入管理员登陆界面
1.1.2选中用户登陆后便进入用户登陆界面
1.1.3选中新用户注册后便进入用户注册界面,管理员注册
管理员界面
可以进行职工资料管理,病人资料管理,病院病床管理,药剂资料管理,科室信息管理,医疗仪器管理,用户信息管理。
1.2.1职工资料管理
利用VB界面,管理员可以查询职工资料信息,添加信息,更新信息,删除
记录,从而改变了数据库中的信息。
1.2.2病人资料管理
管理员可以查询,修改,删除,添加病人资料,在VB界面中修改了数据库中的信息。
1.2.3病院病床信息管理
管理员可以根据需要对病床使用的情况进行查询,添加,删除和更新,从而改变数据库中的信息。
1.2.4药剂资料管理管理
管理员可以根据需要对药剂的情况进行添加,删除和更新,从而改变数
据库中的信息。
1.2.5科室信息管理
管理员可以根据需要对科室信息的情况进行删除和更新,从而改变数
据库中的信息。
1.2.6医疗仪器管理
管理员可以根据各种库存的医疗仪器进行添加,查询,更新,删除,从而改变数据库中的信息。
1.2.7用户信息管理
管理员可以添加,删除,更新,查询各用户的信息,从而改变数据库中的信息。
用户界面
用户可以查看病院病床信息、药剂信息查询,,药剂选购,科室信息查询,门诊挂号登记,职工信息查询,病人信息登记,用户密码修改
1.3.1医疗信息查询
用户进入界面后可看到病院病床信息,药剂信息,,药剂选购,科室信息。
1.3.2门诊挂号登记
进入界面后用户挂号登记。
1.3.3人员信息查询
用户进入界面后可看到所有工作人员的信息和可以查询,并且科根据病人的证件号码查询病人信息。
1.3.4本用户密码修改
用户通过输入和确认新密码来更改自己的密码。
2.医院信息管理系统界面设计
图欢迎登陆界面
图用户登陆界面
图管理员登陆界面
、
图新用户注册界面
图管理员注册界面
图管理员服务界面
图用户服务界面
图用户密码修改界面
表用户密码修改界面属性表
对象
属性
设置值
Label1
caption
修改密码
Label2
caption
旧密码
Label3
caption
新密码
Label4
caption
新密码确认
图药剂选购界面
表药剂选购界面属性表
对象
属性
设置值
Adodc1
caption
Adodc1
commandtype
2-adcmdtable
recordsource
yaojixinxi
visible
false
Label1
Caption
类型选择
Label1
Caption
购买数量
Label1
Caption
您的总金额
Label1
Caption
商品选购及结算
Label1
Caption
RMB
图科室信息查询界面
表科室信息查询界面属性表
对象
属性
设置值
dadagrid
datasource
Adodc1
Adodc1
caption
Adodc1
commandtype
2-adcmdtable
recordsource
keshixinxi
visible
false
Option1
Caption
员工号
Option2
Caption
主任
Label1
Caption
查询条件
frame
Caption
科室信息查询
图病人资料登记界面
表病人资料界面属性表
对象
属性
设置值
dadagrid
datasource
Adodc1
Adodc1
caption
Adodc1
commandtype
2-adcmdtable
recordsource
bingrenziliao
visible
false
Label1
Caption
姓名
Label2
Caption
性别
Label3
caption
患者编号
Label4
Caption
年龄
Label5
caption
体重
Label6
Caption
血型
Label7
Caption
证件号码
Label8
Caption
职业
Label9
Caption
婚姻状况
Label10
Caption
联系电话
Label11
Caption
联系地址
Label12
Caption
登记日期
Label13
Caption
过敏史
frame
Caption
病人信息登记
图职工信息查询界面
表职工信息界面属性表
对象
属性
设置值
Adodc1
caption
Adodc1
commandtype
2-adcmdtable
recordsource
职工信息
visible
false
Option1
Caption
姓名
Option2
Caption
员工表
Label1
caption
查询条件
Label2
caption
姓名
Label3
caption
性别
Label4
caption
员工号
Label5
caption
科室编号
Label6
caption
科室
Label7
caption
年龄
Label8
Caption
职务
Label9
Caption
备注
Label0
Caption
工资
Label1
Caption
入职时间
Label2
caption
请输入查询条件
图病人信息查询界面
表病人信息查询界面属性表
对象
属性
设置值
Adodc1
caption
Adodc1
commandtype
2-adcmdtable
recordsource
Bingrenziliao
visible
false
Label1
Caption
病人信息中心
Label2
Caption
姓名
Label3
Caption
年龄
Label4
Caption
性别
Label5
Caption
病号
Label6
Caption
登记日期
Label7
caption
家庭住址
Label8
caption
职业
Label9
caption
联系电话
Label10
caption
婚姻状况
Label11
caption
血型
Label12
caption
体重
Label13
caption
过敏史
图门诊挂号登记界面
表门诊挂号登记界面属性表
对象
属性
设置值
Adodc1
caption
Adodc1
commandtype
2-adcmdtable
recordsource
guahao
visible
false
Label1
caption
病人编号
Label2
caption
编号
Label3
caption
姓名
Label4
caption
挂号科室
Label5
caption
性别
Label6
caption
时间
Label7
caption
费用类型
Label8
caption
挂号费用
Label9
caption
医生
Label10
caption
是否划价
图科室信息管理界面
表科室信息管理界面属性表
对象
属性
设置值
dadagrid
datasource
Adodc1
Adodc1
caption
Adodc1
commandtype
2-adcmdtable
recordsource
keshixinxi
visible
false
Label1
caption
科室信息管理
Label2
caption
科室名称
Label3
caption
科室编号
Label4
caption
员工号
Label5
caption
病房数
Label6
caption
科室地点
Label7
caption
系主任
图用户信息管理界面
表用户信息管理界面属性表
对象
属性
设置值
dadagrid
datasource
Adodc1
Adodc1
caption
Adodc1
commandtype
2-adcmdtable
recordsource
User1
visible
false
Label1
caption
用户名
Label2
caption
密码
Label3
caption
用户类型
图病人资料管理界面
表病人资料管理界面属性表
对象
属性
设置值
Adodc1
caption
Adodc1
commandtype
2-adcmdtable
recordsource
Bingrenziliao
visible
false
Label1
Caption
病人信息中心
Label2
Caption
姓名
Label3
Caption
年龄
Label4
Caption
性别
Label5
Caption
病号
Label6
Caption
登记日期
Label7
caption
家庭住址
Label8
caption
职业
Label9
caption
联系电话
Label10
caption
婚姻状况
Label11
caption
血型
Label12
caption
体重
Label13
caption
过敏史
图药品资料管理界面
表药品资料管理界面属性表
对象
属性
设置值
dadagrid
datasource
Adodc1
Adodc1
caption
Adodc1
commandtype
2-adcmdtable
recordsource
Yaojixinxi
visible
True
Label1
caption
药品编号
Label2
Caption
药品规格
Label3
caption
caption药品名称
Label4
Caption
药品数量
Label5
Caption
主治症状
Label6
Caption
单价
Label7
caption
所属药房
图管理员密码修改界面
表管理员密码修改界面属性表
对象
属性
设置值
Label1
caption
管理员修改密码中心
Label2
caption
旧密码
Label3
caption
新密码
Label4
caption
新密码确认
3.医院管理信息系统数据库设计
医院管理信息管理系统总共涉及8张表,分别是用户信息表,病床信息表,病人资料表,挂号登记表,科室信息表,药剂信息表,仪器管理信息表和员工信息表。
表用户信息表
字段名称
标始名称
数据类型
是否允许为空
字段说明
用户名
用户名
Char
否
主码
密码
密码
nvarChar
否
身份
身份
Char
是
表病床信息表
字段名称
标始名称
数据类型
是否允许为空
字段说明
病床代号
病床代号
Int
否
主码
所属科室
所属科室
Char
是
是否空闲
是否空闲
Char
是
表病人资料信息表
字段名称
标始名称
数据类型
是否允许为空
字段说明
姓名
姓名
Int
否
年龄
年龄
samllint
是
性别
性别
chai
是
登记日期
登记日期
datetime
是
证件号码
证件号码
nvarChar
是
病号
病号
int
否
主码
家庭住址
家庭住址
nvarChar
是
联系电话
联系电话
Char
是
过敏史
过敏史
nvarChar
是
职业
职业
nvarChar
是
婚姻状况
婚姻状况个
Char
是
血型
血型
Char
是
体重
体重
char
是
表挂号登记表
字段名称
标始名称
数据类型
是否允许为空
字段说明
编号
编号
Int
否
主码
病人编号
病人编号
Char
是
姓名
姓名
Char
是
性别
性别
Char
是
挂号科室
挂号科室
nvarChar
是
费用类型
费用类型
Char
是
挂号费用
挂号费用
Float
是
医生
医生
Char
是
时间
时间
datetime
是
是否划价
是否划价
Char
是
表科室信息表
字段名称
标始名称
数据类型
是否允许为空
字段说明
科室名称
科室名称
nvarChar
否
地点
地点
nvarChar
是
员工号
员工号
Int
是
外码
科室编号
科室编号
Char
是
主码
科室主任
科室主任
Char
是
病房数
病房数
int
是
表药剂信息表
字段名称
标始名称
数据类型
是否允许为空
字段说明
药品编号
药品编号
Int
否
主码
药品名称
药品名称
nvarchar
否
规格名称
规格名称
Char
是
单价
单价
Char
是
主治症状
主治症状
nvarchar
是
所属药房
所属药房
Char
是
药品数量
药品数量
flaot
是
表仪器信息表
字段名称
标始名称
数据类型
是否允许为空
字段说明
仪器代号
仪器代号
Int
否
主码
仪器名称
仪器名称
nvarChar
是
仪器价格
仪器价格
Char
是
仪器数量
仪器数量
int
是
所属科室
所属科室
nvarChar
是
表员工信息表
字段名称
标始名称
数据类型
是否允许为空
字段说明
员工号
员工号
int
否
主码
姓名
姓名
Char
是
性别
性别
Char
是
年龄
年龄
Smallint
是
所属科室
所属科室
nvarChar
是
现任职务
现任职务
nvarChar
是
开始工作时间
开始工作时间
datetime
是
工资
工资
float
是
科室编号
科室编号
int
否
外码
备注
备注
nvarChar
是
4.医院管理信息系统程序设计(部分代码)
欢迎界面
欢迎界面是整个系统的首页,用户可通过它进入到登陆系统。
登陆界面
进入此界面后,使用者可根据自己的身份选择登陆方式。
普通用户选择用户登陆,管理员选择管理员登陆。
用户登陆和新用户注册界面程序设计
普通用户在此界面输入自己的姓名和密码通过验证后方可进入下一个界面。
部分重要代码如下
PrivateSubCommand1_Click()
DimstrselectnameAsString
DimstrAsString
DimstrselectpasswordAsString
str=Trim
strselectname="select用户名fromuser1where用户名="&"'"&str&"'"
="Provider=;IntegratedSecurity=SSPI;PersistSecurityInfo=False;InitialCatalog=chenyan;DataSource=(local)"
=adCmdText
=strselectname'从用户信息表中查询所有的用户姓名
ret=MsgBox("姓名错误!
",48,"warming!
")'如果用户输入的姓名与用户信息表中姓名不一致,就会出现该对话框提醒用户重新输入
=""
=""
ExitSub
EndIf
strselectpassword="select密码fromuser1where用户名="&"'"&Trim&"'"
="Provider=;IntegratedSecurity=SSPI;PersistSecurityInfo=False;InitialCatalog=chenyan;DataSource=(local)"
=adCmdText
=strselectpassword
ret=MsgBox("密码错误!
",48,"warming!
")'如果用户输入的密码与用户信息表中的密码不一致就会出现该对话框
=""
ExitSub
Else
'=""
'=""
EndIf
EndSub
PrivateSubCommand2_Click()
=""
=""
EndSub
PrivateSubCommand3_Click()
=""
=""
EndSub
PrivateSubForm_Load()
=""
=""
EndSub
新用户还可以通过此界面进行注册,新用户只要输入自己的姓名,注册密码并确认注册便可以成功注册,同时该用户的信息也被写入到了用户信息表中(部分代码如下)
PrivateSubCommand1_Click()
="Provider=;IntegratedSecurity=SSPI;PersistSecurityInfo=False;InitialCatalog=chenyan;DataSource=(local)"
=adCmdTable
="select用户名fromuser1where用户名='"&Trim&"'"
MsgBox"用户名已经存在!
请重新输入",0,"提示"
=""
ExitSub
EndIf
If=""Or=""Or=""Then
MsgBox"请输入用户名或密码",0,"提示"
ElseIf<>Then
MsgBox"确认密码错误,请重新输入",0,"提示"
=""
=""
=""
Else
MsgBox"恭喜你注册成功"
="Provider=;IntegratedSecurity=SSPI;PersistSecurityInfo=False;InitialCatalog=chenyan;DataSource=(local)"
=adCmdTable
="user1"
=""
=""
=""
EndIf
ExitSub
EndSub
PrivateSubCommand2_Click()
=""
=""
=""
EndSub
PrivateSubCommand3_Click()
EndSub
PrivateSubForm_Load()
=""
=""
=""
EndSub
管理员登陆界面
管理员需要输入自己的姓名和密码,经过系统验证无误后就可以进入下一个界面了。
它的代码与管理员登陆代码类似,输入的姓名和密码必须是管理员表中相应的信息,否则就无法成功登陆。
用户服务表界面
用户登陆进去后,可以到用户服务界面选择自己所需的服务,该界面为用户提供了5种服务,分别是“医疗信息模块(病院病床查询,药剂信息查询,科室信息查询)”,“人员信息模块(病人资料登记,职工信息查询)”,“门诊挂号登记”,“用户留言板”和“本