Eenjpa医院信息系统毕业设计.doc

生活需要游戏，但不能游戏人生；生活需要歌舞，但不需醉生梦死；生活需要艺术，但不能投机取巧；生活需要勇气，但不能鲁莽蛮干；生活需要重复，但不能重蹈覆辙。 -无名高度集成医院信息系统设计1、绪论1.1选题的目的和意义 开发医院信息管理系统的目标就是立足医院应用实际，着眼于未来发展，以强化医院管理，提高医疗质量，方便患者就医和查询，提高医院的服务效率和服务质量，设计一套符合医院功能规范要求，安全稳定，操作简便的医院信息管理信息系统，为医院信息提供了一套全方位的解决方案。医院信息管理系统是医院自动化管理系统得一个重要组成部分，它的开发大大的提高了医院信息管理的规范化能力。1.2国内外医院信息管理系统的发展与现状 国外医院信息化起步于60年代，发展于80年代，成熟于90年代，目前正在向纵深领域扩展。美国HIS软件从病房护理系统入手，逐渐扩展到财务收费系统、辅助检查系统、行政事务处理系统，90年代电子病历系统已经成熟。我国医院信息化起步于80年代，发展于90年代，2000年以后属于诸国纷争的信息时代。国内HIS软件从病案统计入手，逐渐转入“以财务为中心”的收费软件，近年来又转入“以临床为中心的”电子病历系统。国内HIS软件与国外相比，至少晚十年的时间，但由于医院的特殊性，国外公司进入国内至今成功的案例很少，这也为我国的HIS公司提供了发展的平台。2000年以后，国内HIS公司数以百计，较出名的却不出10家，以大连汇源电子系统工程有限公司为代表，公司的客户数量约为3000家，占全国县级以上医院总数量的30%。但总的来看，国内的医院信息管理系统缺乏规范，随意性强，大多存在操作复杂缺陷。目前大多的系统还需有专业知识的人进行操作和维护。由于现在人们对医疗水平的要求逐渐增高，医院也越来越注意到医疗信息化的重要性，这就为医院信息管理系统的推广及发展创造了良好的条件，在中国发展医院管理信息化，发展医院息管理信息化的条件也日趋成熟。2、 系统需求分析2.1业务及用户需求分析管理信息系统是一门新兴的、集成管理科学、信息科学、系统科学及计算机科学为一体的综合性学科，研究的是信息管理活动的全过程，以便有效的管理信息，提供各类管理决策信息，辅助企业进行现代化管理。管理信息系统它具备数据处理、计划、控制、预测和辅助决策功能，具体作用如下5点内容：（1）用统一标准处理和提供信息，排除使用前后矛盾的不完整的数据。（2）完整、及时提供在管理及决策中需要的数据。（3）利用指定的数据关系分析数据，客观预测未来。（4）向各级管理机构提供不同详细程度的报告，缩短分析和解释的时间。（5）用最低的费用最短的时间提供尽可能精确、可靠的信息，以便使决策者选择最佳的实施方案，以提高企业的经济效益。医院的医疗水平和服务质量一直是社会关注的焦点，仅靠增加基础设施投入和脱离信息化的管理方法的改进，是不能从根本上提高医院的工作效率、服务质量和管理水平的。医院信息管理系统的目的就是减轻业务劳动强度，减少了差错，科学管理药品，节省人力，提高医院的财、物管理水平，增加经济效益，改善患者的就医环境，方便患者就医和查询，提高医院的服务效率和服务质量，提高医院的医疗质量和管理水平。所以，一个现代化的适应社会发展需要的医院，除了具备一流的医疗队伍、一流的服务设施之外，还应具备一流的管理信息系统。目前很多医院信息管理仍然是人工手动计算,整理,查询，管理病房等各项工作,执行效率非常低,不方便,给医务人员带来了不少麻烦;现在已是21世纪,为了跟上时代的发展,实现信息管理自动化刻不容缓。医院信息管理系统不仅方便医院的管理，而且方便病人信息的综合管理，信息查询，床位查询，医嘱管理等等。21世纪，管理才能出效率，将先进的电脑技术和现代医院的管理完美的结合起来，完成以前需要大量人工才能完成的任务。实现了医疗、服务一体的全新概念的服务和管理方式是我们的当务之急；2.2系统功能需求分析本系统根据医院的需求以及病人的实际情况，通过作者的详细分析，此系统主要是针对实体数据信息的存储，查询，删除等处理，具体描述如下：医院管理信息系统主要用于管理病人、医师与病房之间发生的关系,同时需要对病房信息以及病人信息进行管理,如查看剩余病房、病人退房时间、病房病人费用信息；病人病历查询、病人病历更新、存储病人信息等。本系统的开发任务是实现某医院对病房的管理和病人的管理2.3数据流图数据流程图的图形符号如下：数据流图是系统的逻辑模型，根据前面对系统功能模块的分析，为了便于用户理解，可以得到以下各数据流图。它反映了作者的设计思路和设计过程。数据流程图的图形符号如下：外部实体 数据加工 数据存储 数据流 图2.1数据流程图符号2.3.1系统顶层数据流图图 2.2 系统顶层流程图在顶层数据流程图中，可以较为清楚地看到系统的主要数据加工模块以及数据存储和数据流。再对数据流程图的顶层图进行一步分解得到第一层数据流程图，由于顶层图中共有3个数据加工，所以有3个模块数据流图。出入院管理模块数据流图6.3，信息管理模块数据流图见图6.4，药房模块数据流图6.5。每个模块数据流图中有对应的数据流和数据存储的编号说明。 其中共有15个数据流，具体的编号说明如下：F1病人入院信息F2预交金信息 F3结算信息 F4费用明细 F5病人入区信息 F6医嘱信息F7项目执行单 F8发药申请单 F9发药信息F10退药申请单 F11退药信息 F12药房入库申请单 F13药库出库信息 F14药房退货申请 F15药库药房退库信息其中18个数据存储，具体的编号如下：D1病人入院信息D2预交金信息 D3结算信息 D4费用明细 D5病人入区信息 D6医嘱信息D7项目执行单 D8发药申请单 D9发药信息D10退药申请单 D11退药信息 D12药房入库申请单 D13药库出库信息 D14药房退货申请 D15药库药房退库信息2.3.2“出入院管理”模块数据流图图2.3出入院管理 模块数据流图2.3.3“药房管理”模块数据流图 图2.4 病房管理 模块数据流图2.4系统可行性分析可行性分析是系统分析阶段的重要活动，是对系统进行全面、概要的分析。它的任务是确定项目开发是否必要和可行。它的主要目标是：进一步明确系统的目标、规模和功能，对系统开发背景、必要性和意义进行调查分析，并根据需要和可能提出拟开发系统的初步方案和计划，明确问题，对所提供系统大致规模和目标的几个有关约束条件进行论证，并且提出系统的逻辑模型和各种可能的方案，从而为系统开发项目的决策提供科学依据。本节从技术的可行性，经济的可行性以及操作的可行性三个方面来论证本信息管理系统的可行性。2.5.1技术可行性技术可行性即是对现有技术进行评价，以明确能否利用现有技术进行系统开发及系统实施。1 硬件：计算机的存储量大，运算速度快，外部设备的功能好，效率高，可靠性高，通信设备的能力、质量都满足要求。2 操作系统：1) windows xp/2000接口能力强，数据库管理系统的功能足够。2.5.2经济可行性对组织的经济状况和投资能力进行分析，对系统建设、运行和维护费用进行评估，对系统建成后可能取得的社会及经济效益进行估计。目前国内应用HIS的医院管理在信息化上的软硬件投资只占其年收入的1%-3%,而应用HIS后，阻塞了管理漏洞，杜绝了药品的丢失，节省了人力，提高了医院的财、物管理水平，改善了患者的就医环境，方便了患者就医和查询，提高了医院的服务效率和服务质量。因此带来的经济回报将远远超过信息化过程中的投入。而且此系统成本低廉，其开发经费对于本单位在经济上是完全可以接受的2.5.3操作可行性本系统大概需要两个月的时间完成。前两个星期主要是以看书以及收集有关系统方面的资料为主；接下来就是对系统的分析、数据库设计、界面设计、编写代码，实现数据库与界面的连接。而这些东西对于本系统来说是可行的。3、 功能结构设计3.1系统功能结构图系统目标的实现是通过系统的各功能模块来达到的。由于每个系统功能又可以划分为若干个具体的功能模块，因此，从目标开始层层分解，知道每个子功能模块只执行一个具体的任务。子功能模块是独立的，有明显的输入与输出信息。通常我们将按功能关系画成的图成为功能结构图，功能结构图如下：系统欢迎界面系统登录界面门诊管理病房管理 药品管理病人管理 门诊挂号门诊收费门诊退费报表查询信息查询信息修改信息录入护士站药品出库药品入库药品库存信息查询信息修改信息录入信息打印医嘱管理病房使用查询病人费用查询信息打印3.2系统功能具体分析根据与医院管理信息系统发生交互的对象入手，可以分析出系统的功能：1.护士站：信息床位使用情况一览表；医嘱管理：录入、审核；长期及临时医嘱执行确认；打印、查询信息对药单（领药单）；医嘱记录查询；住院费用一日清单查询打印;查询信息欠费病人清单，打印催费通知单；打印、查询长期、临时医嘱治疗单（口服、注射、输液、辅治疗等）。2.门诊管理：包括门诊挂号、门诊收费、门诊退费、报表查询。主要是建立患者资料；根据处方收费，发票打印自定义；经药房退药后，进行门诊退费；门诊收费员日报表、门诊收费项目汇总报表、门诊收费项目科室报表等门诊收费人员相关报表。3.病人管理：病人是医院管理信息系统的服务对象，只有在系统中存在病人的信息才可以享受系统的服务。病人管理包括病人住院管理、病人费用管理、病人病情管理、病人基本信息的查询等。其中病人住院管理包括病人的入院时间、病由、主治医师、所在病房；病人费用管理包括病人缴费项目的查询、添加、修改、删除、保存数据、打印缴费项目单，支持单项查询；病人的病情管理包括入院病由、目前用药情况以及用药后病人的反应，支持保存病人的诊断过程；病人基本信息管理包括病人的相关的基本信息的查询、修改、删除、打印。4.药房管理：药房管理是医院管理信息系统的一个侧重点，包括药品入库、药品出库以及每日药品出库的清单查询，、打印，支持自动报警打印以及药品出库类别查询、打印。5.病房管理：病床是医院管理信息系统的目标对象，病床的管理包括每个信息现有的病床查询，已使用的病床信息查询、录入、修改、删除以及打印该病床病人的信息，支持模糊查询某信息的病人信息。4、概念结构设计1.医师E-R图医师姓名医师编号性别年龄职位职称密码2.病人E-R图病人姓名病人编号年龄床号入院时间病由性别主治医师3.护士E-R图4.病床E-R图5.病人管理E-R图Pnm5、逻辑结构设计5.1相关实体属性描述本系统涉及实体：病人、医师、护士、治疗、病床、药品的出入库及库存各实体属性分别描述如下，有下划线的属性为主码：病人信息表（病人编号，姓名，性别，年龄，床号，主治医师，入院时间，病由）医师信息表（医师编号，姓名，性别，年龄，职位，职称，密码）护士信息表（护士编号，姓名，性别，年龄，职位，职称，密码）治疗信息表（病人编号，医师编号，护士编号，诊断时间，医嘱）病床信息表（床位号，病人编号，入住时间，所属信息，缴费情况，当日检查记录）药品入库记录表（药品编号，药品名，入库时间，数量，采购地址，单价，总价）药品出库记录表（药品编号，药品名，出库时间，数量，接收方，单价，总价）药品库存信息表（药品编号，药品名，单价，厂商，现有数量）转换规则实体集的转换每个实体集用一个关系表示，其中实体集的属性被转换成关系的属性。实体集的主键，在满足唯一标识的无冗余等性质的条件下，将作为对应关系的主键。在实体的对应关系上，由于加入了联系，可能还要增加一些属性。联系的转换（1）1：1的联系如果实体集E1与实体集E2的联系为1：1，应根据需要把E2的主键放入关系模式E1中，或反之。（2）1：N的联系如果实体集E1与实体集E2的 联系为1：N，将E1的主键包含在E2的关系模式中。（3）M：N的联系如果实体集E1与实体集E2繁荣联系为M：N，则它们之间的联系由另一个关系模式表示，这个关系模式由每个参加的实体集的主键及这个联系的任何属性一起组成。5.2数据库的实现通过对转换后所得到关系模式的分析，结合本系统的功能及所选开发工具和数据库系统的特点，对系统数据库进行设计，建立一个具有良好的数据组织结构的数据库，应遵循的原则有：可能减少数据冗余和重复结构设计和操作设计相结合数据结构具有相对的稳定性由于数据库中所保存的数据是系统中非常重要的资源，所以在数据库设计时一定要注意数据结构的安全性、完整性，并发控制与恢复，而一般的数据库管理系统都提供了一定的数据保护功能。5.3建立数据表利用Microsoft Access 2003建立一个新的空的数据库名为医院信息管理系统.mdb；并建立表，分别用来存储病人信息、医师信息、护士信息，病床信息，药品入库信息、药品出库信息、药品库存信息、门诊信息。病人信息表字段数据类型长度是否为空备注病人编号自动编号20否主键姓名文本6否性别文本2约束“男，女”年龄数字3小于139，大于0床号数字12否外主键主治医师文本6否外主键入院时间日期自动否病由文本50病情说明医师信息表字段数据类型长度是否为空备注医师编号数字20否主键姓名文本6否性别文本2否约束“男，女”年龄数字3否小于139，大于0职位文本8否职称文本8否密码文本10否用*覆盖护士信息表字段数据类型长度是否为空备注护士编号数字20否主键姓名文本6否性别文本2否约束“男，女”年龄数字3否小于139，大于0职位文本8否职称文本8否密码文本10否用*覆盖治疗信息表字段数据类型长度是否为空备注医师编号数字20否主键护士编号数字20否主键病人编号自动编号20否主键诊断时间日期否医嘱文本50记录对病人的用药情况药品入库记录表字段数据类型长度是否为空备注药品编号数字20否主键药品名文本12否入库时间日期否厂商文本20否单价货币否数量数字10否总价货币12采购地址文本24否药品出库记录表字段数据类型长度是否为空备注药品编号数字20否主键药品名文本12否出库时间日期否接收方文本24否单价货币否数量数字10否总价货币12药品库存信息表字段数据类型长度是否为空备注药品编号数字20否主键药品名文本12否厂商文本20否单价货币否现有数量数字10否当达到警戒数量时提示采购门诊信息表字段数据类型长度是否为空备注门诊单号自动编号20否主键病人编号自动编号20否外键科别文本内科，外科，传染科缴费日期日期否缴费金额货币5.5模块设计（部分代码）登陆界面：Private Sub Combo1_Click()Set Res = New RecordsetIf Combo1.Text = 数据输入员 ThenRes.Open select count(yhzh) from login where yhlx=数据输入员, objCon, adOpenKeyset, adLockOptimistic If Res.Fields(0) = 0 Then MsgBox 当前无此类型账号, vbCritical, 提示 Text1.Enabled = False Text2.Enabled = False Exit Sub End If End IfIf Combo1.ListIndex = 1 Or Combo1.ListIndex = 2 Then Text1.Enabled = True Text2.Enabled = True Text1.Text = Text2.Text = Else Text1.Enabled = False Text2.Enabled = False Text1.Text = Guest Text2.Text = GuestEnd IfEnd SubPrivate Sub Command1_Click()Static res1 As IntegerDim strExec As StringDim bValiduser As BooleanDim iOldMousePointer As IntegerbValiduser = FalseiOldMousePointer = loginfrm.MousePointerloginfrm.MousePointer = 11loginfrm.MousePointer = iOldMouserPointerIf Text1.Text = Then MsgBox 请输入账号, vbCritical, 错误信息 Exit SubElseIf Text2.Text = Then MsgBox 请输入密码, vbCritical, 错误信息Exit SubEnd IfSet Res = New RecordsetSelect Case Combo1.Text Case 数据输入员 strExec = select * from login where yhlx= & Combo1.Text & Set Res = objCon.Execute(strExec) If Not Res.EOF Then If Trim(Res(yhzh) Trim(Text1.Text) Then MsgBox 用户账号不正确, vbCritical, 登录错误 Text1.Text = Text2.Text = Text1.SetFocus res1 = res1 + 1 ElseIf Trim(Res(yhmm) Trim(Text2.Text) Then MsgBox 用户密码不正确, vbCritical, 登录错误 Text1.Text = Text2.Text = Text1.SetFocus res1 = res1 + 1 Else bValiduser = True usertype = 2 End If End If Case 系统管理员 strExec = select * from login where yhlx= & Combo1.Text & Set Res = objCon.Execute(strExec) If Not Res.EOF Then If Trim(Res(yhzh) Trim(Text1.Text) Then MsgBox 用户账号不正确, vbCritical, 登录错误 Text1.Text = Text2.Text = Text1.SetFocus res1 = res1 + 1 ElseIf Trim(Res(yhmm) Trim(Text2.Text) Then MsgBox 用户密码不正确, vbCritical, 登录错误 Text1.Text = Text2.Text = Text1.SetFocus res1 = res1 + 1 Else bValiduser = True usertype = 1 End If End If Case 查询用户 bValiduser = True usertype = 3End SelectIf bValiduser = True Then Unload Me hyjm.Show hyjm.Timer1.Enabled = True Exit SubEnd If If res1 = 3 Then answer = MsgBox(错误次数已超过3次!系统将自动关闭, vbCritical + vbOKOnly, 错误信息) If answer = 1 Then End End If End IfEnd SubPrivate Sub Command2_Click()EndEnd SubPrivate Sub Form_Load()Combo1.Text = 查询用户Combo1.AddItem 查询用户Combo1.AddItem 系统管理员Combo1.AddItem 数据输入员If Combo1.Text = 查询用户 Then Text1.Text = Guest Text2.Text = GuestEnd IfEnd SubPrivate Sub Text2_KeyPress(KeyAscii As Integer)If KeyAscii = 13 Then Call Command1_ClickEnd IfEnd Sub主窗体：Private Sub MDIForm_QueryUnload(Cancel As Integer, UnloadMode As Integer)If UnloadMode = 0 Then EndEnd SubPrivate Sub muncx_Click()cxfrm.ShowEnd SubPrivate Sub munfile_exit_Click()Dim msg1msg1 = MsgBox(你真的要退出吗？, vbOKCancel, 退出对话框)If msg1 = 1 ThenUnload MeEndElseMDIForm1.ShowEnd IfEnd SubPrivate Sub munfile_zx_Click()Dim msg1msg1 = MsgBox(你真的要注销吗？, vbOKCancel, 退出对话框)If msg1 = 1 ThenUnload Meloginfrm.ShowElseMDIForm1.ShowEnd IfEnd SubPrivate Sub munhelp_Click()Dim word As ObjectDim documents As ObjectSet word = CreateObject(word.application)Set documents = word.documents.Open(App.Path & 帮助.doc)word.Visible = TrueEnd SubPrivate Sub munqxgl_Click()userfrm.ShowEnd SubPrivate Sub munyggl_Click()ygglfrm.ShowEnd SubPrivate Sub munzygl_bc_Click()bcglfrm.ShowEnd SubPrivate Sub munzygl_br_Click()brglfrm.ShowEnd SubPrivate Sub munzygl_yj_Click()yjglfrm.ShowEnd SubPrivate Sub munzygl_yq_Click()yqglfrm.ShowEnd SubPrivate Sub Toolbar1_ButtonClick(ByVal Button As MSComctlLib.Button)Select Case Button.KeyCase Is = ygglygglfrm.ShowCase Is = sjcxcxfrm.ShowCase Is = brglbrglfrm.ShowCase Is = bcglbcglfrm.ShowCase Is = yqglyqglfrm.ShowCase Is = yjglyjglfrm.ShowCase Is = qxgluserfrm.ShowCase Is = tcDim msg1msg1 = MsgBox(你真的要退出吗？, vbOKCancel, 退出对话框)If msg1 = 1 ThenEndElseMDIForm1.ShowEnd IfCase Is = bzDim word As ObjectDim documents As ObjectSet word = CreateObject(word.application)Set documents = word.documents.Open(App.Path & 帮助.doc)word.Visible = TrueCase Is = zxDim msg2msg2 = MsgBox(你真的要注销吗？, vbOKCancel, 注销对话框)If msg2 = 1 ThenUnload Meloginfrm.ShowElseMDIForm1.ShowEnd IfEnd SelectEnd Sub6.医院病区管理系统程序测试经过设计者的不断努力，经过调试，本系统能正常运行。现在接下来的任务是测试验证模块/系统的功能和性能。6.1测试目的与任务测试目的：发现程序的错误。测试任务：通过在计算机上执行程序，暴露程序中潜在的错误。6.2测试环境和条件 测试环境的部署和维护是一件需要详细策划的事情，部署了合理的测试环境是测试达到目标效果的前提条件。在考虑部署和维护测试环境时，需要考虑以下内容：6.2.1运行环境 硬件 CPU 2.0G 内存 1G 显示器 17英寸 分辨率 1024*768颜色 256色 支持软件 操作系统 window xp 运行平台 Visual basic6.2.2初始数据的准备在执行测试之前，我们需要准备足够支撑测试进行的初始数据，对本测试来说，初始数据包括静态数据、程序运行时必须的用户名密码等信息等，将这部分数据按照不同的数据来源分别列出形成表，还要避免在测试过程中出现数据准备不充分的情况。表6.1 初始数据序号测试环境项目来源预计完成时间是否已部署1数据库中病人信息数据测试用例2009.1.20是2数据库中用户信息数据测试用例2009.1.20是6.3测试方案采用以界面为基础的测试。以界面为基础的测试仅仅依靠软件与其运行环境之间的界面来选择和产生测试数据，而不管软件的具体需求和具体实现细节。采用测试功能的方法。6.4测试实施测试计划、测试环境都完成之后，就可以开始对测试进行实施了。测试实施在整个测试过程中并不是消耗资源最多的，有了详细的测试用例之后，其实测试实施是一件“照葫芦画瓢”的简单工作。6.4.1测试内容该测试计划主要包括对软件各个模块的测试：1.用户登陆模块的测试：该测试的目的是保证登陆信息的正确性与在错误发生时的容错性与纠错性。具体通过在登陆框中输入空用户名、或错误的用户密码来检测系统的出错运行情况。要求系统在遇到这些情况时能给出正确的错误提示。2.入院登记模块的测试：该测试的目的是保证在输入相同的住院号或者不存在的医生代码等违法的数据时，模块的容错性与纠错性。要求系统在遇到这些情况时能给出正确的错误提示。3.出院结算模块的测试：该测试主要是查看当病人已经出院，或住院不到一天时系统能给予正确的提示和相应的处理，功能相对简单，测试过程简单。4.职工管理模块的测试：该测试主要是查看在新职工注册时，如果职工类型是医生或护士，系统是否能给与正确的提示，当在此窗口中注消职工且职工类型为医生或护士时，系统能否自动从职工表，医生或护士表中删除对应的信息；测试相对比较复杂，牵涉到表之间的触发。5. 医生或护士管理模块的测试：该测试的目的是保证新录入医生或护士后，系统能自动在职工表中产生相应的记录，并且在注消的同时职工表中相对应的信息将被注消。6.用户管理模块测试该测试的目的是检测系统能否在合法与非法输入时给予正确的系统提示。6.5测试结果分析系统能够在输入正确数据时能正常运行，在输入不正确的时候给予用户正确相应得提示，这就保证了数据库的安全和完整性。要使用该系统，必须有正确的用户名和密码登陆，否则不能操作系统的任何一个功能模块，这就保证了系统的安全性。测试过程中，当用户注消后日志对其退出系统时的时间做了记录，但是当使用者直接管理系统时，日志就未对使用者退出的时间作记录。这是本系统在测试中发现的一大缺点，设计者将进一步改进，使系统更加的完善。总结经过这次毕业设计，我感到自己无论在专业知识方面，还是在动手能力方面都有了很大的收获。此次所使用的VB对我来说不是一门新的语言，但是操作起来还是有些困难，现在我对它已经有了一定的了解。特别是对ADO控件。Access以前学过，对数据库的操作有初步掌握，此次毕业设计也使用Access数据库，这无疑增长了我这方面的经验，使我对Access数据库有了更深一步的了解与认识，现在运用起来比以前熟练了很多。另外，通过此次毕业设计，本人对开发一个软件的各个阶段有了一定的了解，在实际动手的过程中，深刻体会到书写代码时良好的习惯对错误的检查和代码的维护都有很大的帮助，不像以前写代码时，只想实现要实现的功能，不管代码的书写质量，内存空间的有效利用等问题。但是由于时间仓促，加上水平有限，一开始没有做好很好的需求分析，草草的设计了数据库，现在系统完成了回过头去看一下，在数据库设计过程中，还是存在许多不合理的地方。参考文献：1赵起超，医院信息管理系统，哈尔滨工业大学出版社，20012桂思强 Access 数据库系统开发实例导航 中国铁道出版社 出版日期：2003-113郭胜Visual Basic 数据库开发入门与范例解析 机械工业出版社 出版日期：2004-114沈炜 Visual Basic编程从实例到实践 电子工业出版社 出版日期：2006-125李俊才 Visual Basic数据库系统开发完全手册 人民邮电出版社 出版日期：2006-36 致谢