医院信息管理系统

1、医院管理信息系统设计设计主要内容：一、开发平台： VB+SQL SERVER 2000二、功能要求：1 、设计内容设计一个医院管理信息系统，该系统的用户由一般用户和管理员组成，然后不同的用户拥有不同的权限， 各自完成各自的管理功能， 首先是欢迎界面， 然后选择登陆， 登录的时候首先要判断用户的身份，合法的用户然后进入到系统的主界面中，不同的用户看到不同的系统功能。用 sql sever2000 创建后台数据库，然后利用程序设计语言（ VB ）编写程序实现对数据库的操作，按照要求完成所有的功能和模块。2、医院管理信息系统主要功能（ 1 ）用户管理：用户登录界面，用户注册界面，病人资料登记界面（添

2、加，打印等） ，职工资料查询界面（一定条件） ，门诊挂号登记界面（添加，打印等） ，病人资料查询界面（一定条件） ，病院病床查询界面 （一定条件） ， 药剂信息查询界面 （添加， 打印等） ， 药剂信息选购界面 （选购） ， 科室界面 （查询） ，本用户密码的修改界面（ 2 ）管理员管理：管理员登录界面，管理员注册界面，职工资料管理界面（添加，修改，删除） ，病人资料管理界面（增加，修改，删除） ，用户信息管理界面（添加，删除） ，病院病床管理界面（修改，删除） ，病院病床管理界面（添加，修改，删除） ，药剂管理界面（修改，删除） ，科室管理（修改，删 除） 。3、医院管理信息系统数据库表单（

3、 1 ）用户信息表单：用户名，密码，用户身份（管理员和普通用户）（ 2 ）职工信息表单：员工号，所属科室，员工姓名，性别，现任职务，出身年月，开始工作时间，年龄，工资，科室编号，备注（ 3 ）病人信息表单：病人编号，病人姓名，病人性别， ，病人年龄，职业，登记日期，证件号码，过敏史，体重，血型，联系电话，家庭住址，婚姻状况。（ 4 ）科室表单：科室名称，地点，员工号，科室主任，病房数，是否显示（ 5 ）病院病床表单：病床代号，所属科室，是否空闲（ 6 ）药品信息表单：药品编号，药品名称，规格名称，计量单位，单价，主治症状（ 7 ）医疗仪器管理表单：仪器代号，仪器名称，仪器价格，仪器数量（ 8

4、）门诊挂号表：编号，病人编号，姓名，性别，挂号科室，费用类型，挂号费用，是否已划价三、课程设计报告主要内容：1 医院管理信息系统需求分析（给出系统的功能模块图，对各个功能作出详细介绍）2 医院管理信息系统界面设计（给出界面截图及其主要控件的属性设置表格）3 医院管理信息系统数据库设计（给出数据库各个表单中数据的字段名，数据类型 及其相应的说明）4 医院管理信息系统程序设计（按照功能模块给出详细的程序代码，并给出重点语句注释）1 .轿车销售管理信息系统需求分析添更删加新除门诊挂号登记医院管理信息系统图1.1医院管理信息系统1.1 欢迎登陆界面1.1.1 选中管理员登录后便进入管理员登陆界面1.1

5、.2 选中用户登陆后便进入用户登陆界面1.1.3 选中新用户注册后便进入用户注册界面，管理员注册1.2 管理员界面可以进行职工资料管理，病人资料管理，病院病床管理，药剂资料管理,科室信息管理，医疗仪器管理，用户信息管理。1.2.1 职工资料管理利用VB界面，管理员可以查询职工资料信息，添加信息，更新信息，删除记录，从而改变了数据库中的信息。1.2.2 病人资料管理管理员可以查询，修改，删除，添加病人资料，在VB界面中修改了数据库中的信息。1.2.3 病院病床信息管理管理员可以根据需要对病床使用的情况进行查询， 添加， 删除和更新， 从而改变数据库中的信息。1.2.4 药剂资料管理管理管理员可以

6、根据需要对药剂的情况进行添加，删除和更新，从而改变数据库中的信息。1.2.5 2.5 科室信息管理管理员可以根据需要对科室信息的情况进行删除和更新，从而改变数据库中的信息。1.2.6 医疗仪器管理管理员可以根据各种库存的医疗仪器进行添加，查询，更新，删除，从而改变数据库中的信息。1.2.7 用户信息管理管理员可以添加，删除，更新，查询各用户的信息，从而改变数据库中的信息。1.3 用户界面用户可以查看病院病床信息、药剂信息查询， ，药剂选购，科室信息查询，门诊挂号登记，职工信息查询，病人信息登记，用户密码修改1.3.1 医疗信息查询用户进入界面后可看到病院病床信息，药剂信息， ，药剂选购，科室信

7、息。1.3.2 门诊挂号登记进入界面后用户挂号登记。1.3.3 人员信息查询用户进入界面后可看到所有工作人员的信息和可以查询，并且科根据病人的证件号码查询病人信息。1.3.4 本用户密码修改用户通过输入和确认新密码来更改自己的密码。2 .医院信息管理系统界面设计图2.1欢迎登陆界面图2.2用户登陆界面图2.3管理员登陆界面图2.4新用户注册界面图2.5管理员注册界面图2.6管理员服务界面图2.7用户服务界面图2.8用户密码修改界面表2.1 用户对象属性设置值密他修改界面Labellcaption修改密码属性表Label2caption旧密码Label3caption新密码2.9笏RJ选购Lab

8、el4caption新密码确认界囿2.2 药剂选对象属性设置值Adodc1captionAdodc1commandtype2-adcmdtablerecordsourceyaojixinxivisiblefalseLabel1Caption选择Label1Caption购买数量Label1Caption您的总金额Label1Caption商品选购及结算购界面属性表LabellCaptionRMB2.10 科室信息查询界面对象属性设置值2.2 科室信dadagriddatasourceAdodc1息查询界面属AdodclcaptionAdodc1性表commandtype2-adcmdtable

9、recordsourcekeshixinxi2.11 病人资visiblefalse料登记界面Option1Caption员工号2.3病人资料Option2Caption主任Label1Caption查询条件界面属性表frameCaption科室信息查询2.12 职工信息查询界面对象属性设置值dadagriddatasourceAdodc12 4 职工信息Adodc1captionAdodc1界面属性表对象commandtype2-adcmdtableArloddrecordsource paniinnAngdcnziliaoAAUOUC 1captionAAUoucvisiblefalsec

10、ommandtype2-adcmdtableLabel1Captionrorrirncm isa幽立信自ycoiusouLabel2Caption此别folopVISTKzTi aiseObOl31CptonnJ=L 海角而upuon itapuonXLL，臼.W2CaptionCaption1-fcLabe 5caption阳§冬件aue icaption耳7jq 1 十Label6Caption血型Label7Caption证件号码Label8Caption职业Label9Caption婚姻状况Label10Caption联系电话Label11Caption联系地址Label12

11、Caption登记日期Label13Caption过敏史frameCaption病人信息登记Label2caption姓名Label3caption性别Label4caption员工号Label5caption科至编Label6caption科室Label7caption年龄Label8Caption职务1Label9Caption备注Label。Caption工资LabellCaption入职时间Label2caption请输入查询条件2.13 病人信息查询界面表2.5 病人信息查询界面属性表2.14 门诊挂号登记界面表2.6 门诊挂号登记界面属性表象屋件设置4'百武W1/lil l

12、-Ar雇科2->/ * J/lAl 1 工AdodcicaptionAdodciAdodcicaptionAdodci cl-commanowpe2-adcmdtableQ nncmntnnlo313ypj-auciiiuiauie一- i-recordsourceguahao1lecoidsouice iAl ；hlc5ngpenziiiaovisiblefalsevisiblefalse、心心曰LabellI nhnHcaptionCn nf icn中心LabeiiCaption7F3y、11 也,LaCbe2capitoon怀J 2 V/ JvapnonL-14-abe3cappi

13、onn始森一V 9be4caaponn斗至JLUIS!5cappionn，匕&-Labe66cappionn如日期Label7cappionnLabel8caption职业Label9caption联系电话Label10caption婚姻状况Labelllcaption血型Label12captionLabel13caption过敏史Label8caption；挂号费用Label9caption医生LabellOcaption是否划价2.15科室信息管理界面2.7科室信息对象属性设置值dadagriddatasourceAdodc1AdodclcaptionAdodc1commandt

14、ype2-adcmdtablerecordsourcekeshixinxivisiblefalseLabel1caption科室信息管理Label2caption科室名称Label3caption科至编pLabel4caption员工号Label5caption病房数Label6caption科室地点Label7caption系主任管理界面属性 表2.16用户信息管理界面2.8用户信息 管理界面属性 表图2.17病人资料管理界面Mt飕性04_AaddcriddatasourceAdddc11Adodc1camoandtypeAadcmdtable图2.18药品cocmaouype2Badgmd

15、zaiiao资料管埋界面resibdsourceUser1Label1Vsiptionfase信息中心2.10药品资Label2cappitonnWgg料管理界面属Label3cappitonnWB性表Label4caapoon蠲胃值型LadegriddaOOsioOrceAdodc1Adodc1capptonnABd眉期Label7commandtype2-adcmdtableLabel8rcaptronourceYaojixinxiLabel9caption联系电话Label10caption婚姻状况Label11caption血型Label12captionLabel13caption过

16、敏史2.9 病人资料 管理界面属性表visibleTrueLabellcaption:药品编号Label2Caption药品规格Label3captioncaption药品名称Label4Caption药品数量Label5Caption主治症状Label6Caption单价Label7caption所属药房2.19管理员密码修改界面2.11 管理员密码修改界面 属性表对象属性设置值Label1caption管理员修改密码中心Label2caption旧密码Label3caption新密码Label4caption新密码确认3.医院管理信息系统数据库设计医院管理信息管理系统总共涉及 8张表，分别

17、是用户信息表，病床信息表，病人资料表, 挂号登记表，科室信息表，药剂信息表，仪器管理信息表和员工信息表。字段名称标始名称数据类型是否允许为空字段说明用户名用户名Char否主码密码密码nvarChar否身份身份Char是3.1用户信息表3.2病床信息表字段名称标始名称数据类型是否允许为空字段说明病床代号病床代号Int否主码所属科室所属科室Char是是否空闲是否空闲Char是3.3病人 资料信息 表字段名称标始名称数据类型是否允许为空字段说明姓名姓名Int否年龄年龄samllint是性别性别chai是加杯号M口正七和pa士查七刃、datetime数据变型nvarCharnvarCharinf居否允

18、许为空 字段说明也点住址吊工后爰够住址吊工后int nvarChar1nvarChar'-4ntChqr目假言是上1叱 3舌千、“白三口.八、'三口.CiiaiChr i-S壬力出p =i-r出p =iChai拿十忸J人 千i lvalx.7llalCl，c一1=1主:壬土 JL二：壬土' JLCharqHU J /HU J /&:耳羯21K耳羯21KnvarChar婚姻状况婚姻状况个Char是血型血型Char是char是3.4挂号登记表3.5科室信息表字段名称标始名称数据类型是否允许为空字段说明编R编RInt否主码病人编号病人编号Char是姓名姓名Char是性

19、别性别Char是挂号科室挂号科室nvarChar是费用类型费用类型Char是挂号费用挂号费用Float是医生医生Char是时间时间datetime是是否划价是否划价Char是病房数病房数int是3.6药剂信息表字段名称标始名称数据类型是否允许为空字段说明药品编号药品编号Int否主码药品名称药品名称nvarchar否规格名称规格名称Char是单价单价Char是主治症状主治症状nvarchar是所属药房所属药房Char是药品数量药品数量flaot是3.7仪器信息表3.8员工信息表字段名称标始名称数据类型是否允许为空字段说明仪器代号仪器代号Int否主码仪器名称仪器名称nvarChar是仪器价格仪器价

20、格Char是仪器数量仪器数量int是所属科室所属科室nvarChar是字段名称标始名称数据类型是否允许为空字段说明员工号员工号int否主码姓名姓名Char是性别性别Char是年龄年龄Smallint是所属科室所属科室nvarChar是现任职务现任职务nvarChar是开始工作时间开始工作时间datetime是工资工资float是科至编R科至编Rint否外码备注备注nvarChar是4医院管理信息系统程序设计(部分代码)4.1 欢迎界面欢迎界面是整个系统的首页，用户可通过它进入到登陆系统。4.2 登陆界面进入此界面后，使用者可根据自己的身份选择登陆方式。普通用户选择用户登陆，管理 员选择管理员登

21、陆。4.3 用户登陆和新用户注册界面程序设计普通用户在此界面输入自己的姓名和密码通过验证后方可进入下一个界面。部分重要代码如下Private Sub Command1_Click()Dim strselectname As StringDim str As StringDim strselectpassword As Stringstr = Trim(Text1.Text)strselectname = "select 用户名 from user1 where 用户名 = " & "'" & str & "

22、9;"Adodc1.ConnectionString = "Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security Info=False;Initial Catalog=chenyan;Data Source=(local)"Adodc1.CommandType = adCmdTextAdodc1.RecordSource = strselectname ' 从用户信息表中查询所有的用户姓名Adodc1.Refreshret = MsgBox(" 姓名错误！ ", 48

23、, "warming!") ' 如果用户输入的姓名与用户信息表中姓名 不一致，就会出现该对话框提醒用户重新输入Text1.Text = ""Text2.Text = ""Exit SubEnd Ifstrselectpassword = "select 密码 from user1 where 用户名 = " & "'" & Trim(Text1.Text) & " '"Adodc1.ConnectionString = &quo

24、t;Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security Info=False;Initial Catalog=chenyan;Data Source=(local)"Adodc1.CommandType = adCmdTextAdodc1.RecordSource = strselectpasswordAdodc1.Refreshret = MsgBox("密码错误！ ", 48, "warming!") ' 如果用户输入的密码与用户信息表中的密码不一致就会出现该对

25、话框Text2.Text = ""Text2.SetFocusExit SubElse'Text1.Text = ""'Text2.Text = ""form2.Hideform1.ShowEnd IfEnd SubPrivate Sub Command2_Click()Text1.Text = ""Text2.Text = ""End SubPrivate Sub Command3_Click()Text1.Text = ""Text2.Text = &qu

26、ot;"form2.HideForm20.ShowEnd SubPrivate Sub Form_Load()Text1.Text = ""Text2.Text = ""End Sub新用户还可以通过此界面进行注册， 新用户只要输入自己的姓名， 注册密码并确认注册便可以成功注册，同时该用户的信息也被写入到了用户信息表中(部分代码如下)Private Sub Command1_Click()Adodc1.ConnectionString = "Provider=SQLOLEDB.1;Integrated Security=SSPI;Pe

27、rsist SecurityInfo=False;Initial Catalog=chenyan;Data Source=(local)"Adodc1.CommandType = adCmdTableAdodc1.RecordSource = "select 用户名 from user1 where 用户名 = '" & Trim(Text1.Text) & "'"Adodc1.RefreshMsgBox " 用户名已经存在！请重新输入 ", 0, " 提示 "Text1.

28、Text = ""Text1.SetFocusExit SubEnd IfIf Text1.Text = "" Or Text2.Text = "" Or Text3.Text = "" ThenMsgBox " 请输入用户名或密码", 0, " 提示 "ElseIf Text2.Text <> Text3.Text ThenMsgBox " 确认密码错误，请重新输入 ", 0, " 提示 "Text1.Text = &qu

29、ot;"Text2.Text = ""Text3.Text = ""ElseMsgBox "恭喜你注册成功"Adodc1.ConnectionString = "Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist SecurityInfo=False;Initial Catalog=chenyan;Data Source=(local)"Adodc1.CommandType = adCmdTableAdodc1.RecordSource = "

30、;user1"Adodc1.RefreshText1.Text = ""Text2.Text = ""Text3.Text = ""End IfExit SubEnd SubPrivate Sub Command2_Click（）Text1.Text = ""Text2.Text = ""Text3.Text = ""End SubPrivate Sub Command3_Click（）Form16.Hideform1.ShowEnd SubPrivate Sub

31、Form_Load（）Text1.Text = ""Text2.Text = ""Text3.Text = ""End Sub4.4 管理员登陆界面管理员需要输入自己的姓名和密码，经过系统验证无误后就可以进入下一个界面了。它的代码与管理员登陆代码类似，输入的姓名和密码必须是管理员表中相应的信息，否则就无法成功登陆。4.5 用户服务表界面用户登陆进去后，可以到用户服务界面选择自己所需的服务，该界面为用户提供了 5 种服务， 分别是 “医疗信息模块 （病院病床查询， 药剂信息查询， 科室信息查询） ” ，“人员信息模块（病人资料登记，职工

32、信息查询） ”， “门诊挂号登记” ， “用户留言板”和“本用户的密码修改” ， 。4.6 用户密码修改界面程序设计用户如需修改自己的密码可在此界面进行，用户通过登陆界面登陆到此，然后在此界面中输入原始密码和新密码并验证新密码，确认后如果无误就会提示用户修改成功，并且其密码在用户信息表中也会有相应的修改。 （代码如下）4.7 管理员服务界面管理员登陆进去后，可以到管理员服务界面选择自己所需的服务，该界面为用户提供了 5 种服务，分别是“医疗信息模块（病院病床管理，仪器信息管理，科室信息管理） ”， “人员信息模块（病人资料管理，职工信息管理） ”， “用户信息管理” ， “药剂信息管理” ，

33、“用户留言板”和“管理员的密码修改” ， 。4.8 病人资料登记界面用户可通过此界面所提供的内容登记自己的内容。所有的信息通过Adodc控件和相应的数据库连接起来，设置相应的属性后所有信息便可存入数据库中。4.9 职工信息的查询界面该界面所用的控件Adodc控件与数据库联系在一起，用户根据提供的查询条件选择查询的 职工。4.10 病人信息的查询界面该界面所用的控件Adodc控件与数据库联系在一起，用户通过输入证件号码查询相应的病 人信息。4.11 病院病床的查询界面该界面所用的控件Adodc控件与数据库联系在一起，用户想要查看的信息也会显示各文本 框中。4.12 科室信息查询界面该界面所用的控

34、件datagrid ,Adodc 控件与数据库联系在一起， 用户想要查看的信息也会显示在 datagrid 中。4.13 药剂信息查询及选购界面该界面所用的控件datagrid ,Adodc 控件与数据库联系在一起， 用户想要查看的信息也会显示在 datagrid 中。4.14 门诊挂号登记界面用户可通过此界面所提供的内容登记自己的内容。所有的信息通过Adodc控件和相应的数据库连接起来，设置相应的属性后所有信息便可存入数据库中。4.15 药剂管理界面程序设计管理员在此界面可查看药剂存放的情况，而且能根据需要进行添加，删除和修改。 （代码如略）4.16 职工管理界面程序设计管理员在此界面可查看工作人员的情况，而且能根据需要进行增加，删除和修改。 （代码如略）4.17 用户管理界面程序设计管理员在此界面可查看用户的情况，而且能根据需要进行增加，删除和修改。 （代码如略）4.18