毕业设计(论文)-VB民营医院门诊管理系统设计.doc

上传人:哈尼dd 文档编号:3948127 上传时间:2019-10-10 格式:DOC 页数:27 大小:4.44MB
返回 下载 相关 举报
毕业设计(论文)-VB民营医院门诊管理系统设计.doc_第1页
第1页 / 共27页
毕业设计(论文)-VB民营医院门诊管理系统设计.doc_第2页
第2页 / 共27页
毕业设计(论文)-VB民营医院门诊管理系统设计.doc_第3页
第3页 / 共27页
毕业设计(论文)-VB民营医院门诊管理系统设计.doc_第4页
第4页 / 共27页
毕业设计(论文)-VB民营医院门诊管理系统设计.doc_第5页
第5页 / 共27页
点击查看更多>>
资源描述

《毕业设计(论文)-VB民营医院门诊管理系统设计.doc》由会员分享,可在线阅读,更多相关《毕业设计(论文)-VB民营医院门诊管理系统设计.doc(27页珍藏版)》请在三一文库上搜索。

1、 设计(论文)题目: 民营医院门诊管理系统 摘要信息时代已经来临,计算机应用于医院的日常管理,为医院的现代化带来了从未有过的动力和机遇,为医疗卫生领域的发展提供了无限的潜力。采用计算机管理信息系统已成为医院管理科学化和现代化的标志,给医院带来了明显的经济效益和社会效益。本文介绍了数据库管理系统的基本设计方法,详细阐述了整个应用系统的设计思路,并对各部分设计周期进行了详尽的分析,最终达成了一个完整的设计方案;在文章的最后,还根据数据库系统的调试结果,提出了可以进一步改进的部分,以便在投入实际应用后系统可以更加稳定可靠的工作。关键词:HIS 医院系统的实现,SQL数据库系统,Visual Basi

2、cABSTRACTThe ages of the information has already come, the sharp weapon-calculator of the information processing, apply in the daily management of the hospital, brought to never have for the modernization of the hospital of the motive and opportunity, provided an infinite potential for the developme

3、nt of the medical treatment health realm.Adopt the calculator management information system has become the hospital management scientific with modern of marking, brought hospital the obvious economic performance and social performance.This text introduced the database management system of basic desi

4、gn method, elaborated the whole design way of thinking of applied system in detail, and designed period to carry on to each part detailed of analysis, end reach an integrity of design project;The end in article, return to adjust to try a result according to the database system, put forward can impro

5、ve further of part, in order to at throw in physically applied after the system can stabilize a dependable work more.KEYWORDS:the realization of the HIS hospital system, SQL database system,Visual Basic1目 录1绪论11.1 研究动机与目的11.2 研究背景11.3 HIS的简述21.4数据库系统简介21.5开发工具与及关健技术简介31.6系统简介41.7系统实现的目标42 系统分析52.1系统

6、主要模块功能进行详细的分析52.2数据库设计63 系统实现及编码113.1系统工程说明113.2界面设计113.3具体功能实现11总结14致谢15参考文献16附录17软件使用说明书182中小型医院门诊管理系统 24 1绪论医院门诊管理信息系统在HIS系统中占有重要的地位,其数据量大、信息共享度高,而且对收费、退费、收费统计和药品管理实时性要求高,从以医院管理、经济管理为主转为以病人为关注点,随着社会发展、人民生活水平不断提高,医院的一切程序都逐渐人性化服务,自动化、无纸化管理。对医院的服务要求也越来越高,作为现代化医院的门诊管理,必须以人为本,从软、硬件上,上一新的台阶,才可能最大限度地提高医

7、院对患者服务的效率,提高医院的资源利用率和能力,最大限度产生良好的社会与经济效益。现代化的医院门诊管理,应具备公平、公开、公正、文明的门诊系统,快捷的病人自助查询、收费、药品查询等人性化服务,大大改善了医生的工作条件,降低了门诊护士的工作强度,提高了各方面的效率,同时也为医院各级管理人员们科学管理提供了基本统计数据,可最大限度发挥医院的现有资源,产生良好的社会与经济效益,实现现代化医院门诊管理,将为我国医疗卫生保健事业带来质的飞跃,一举跨入发达国家医疗管理的先进行列。为此确定此课题有十分重要的意义。1.1 研究动机与目的医院管理是现代医院的核心环节之一,随着病人要求的不断提高,医院门诊管理在整

8、个社会中占有越来越重要的地位。在传统医院管理过程中,门诊与查询管理都非常的耗费人力物力,同时由于采用手工操作,不可避免造成一些的错误。现阶段医院门诊管理的特点是信息处理量特别大,所管理的药品种类繁多,而且收费单、退费单等单据的发生量特别大,关联信息多,查询和统计的方式各不相同。因此在管理上实现起来有一定的困难。在管理的过程中经常出现信息的重复传递等问题。医院门诊管理部门越来越需要一套低成本、高性能、方便使用、功能完善的综合门诊管理信息系统。而现在计算机技术、网络技术成熟与发展,为医院门诊管理自动化提供了强有力的技术支持。课题以某医院应用背景,通过研究当前医院系统的管理现状、存在问题以及现实需求

9、,设计一个针对医院门诊管理工作的管理信息系统。该系统能够提供较为完备的功能,可以全面管理医院中的各相关信息,缩短了信息流转时间,使医院的管理层次分明,井然有序,为医生诊治与病人查询提供依据,对于提高医院管理的经营效率、加快门诊管理的自动化具有重要的意义。1.2 研究背景在手工业时代,企业对医院的各项管理的运作是停留在以纸、笔为主要工具的阶段。到后来,随着信息量的快速增长,这种传统的手工操作的方法已无法迅速、准确的完成各项管理工作。当医院意识到这点之后,纷纷开始重视医院管理。此间,利用了西蒙教授开发的自动控制理论,马奇的最大、最小化问题等方法,相继开发出了许多管理方法。进入20世纪之后,随着系统

10、、信息技术、管理工具的进步以及计算机的普及,许多医院开始利用计算机进行门诊管理。从而提高了处理的速度与精度。在如今计算机飞速发展的今天,将计算机这一信息处理利器应用于医院的日常管理已是势必所然,而且这也将为医院门诊部管理带来前所未有的改变,它可以带来意想不到的效益,同时也会为医院的飞速发展提供无限潜力。采用计算机管理信息系统已成为医院门诊管理科学化和现代化的重要标志,它给医院管理带来了明显的经济效益和社会效益。主要体现在:极大提高了医院工作人员的工作效率,大大减少管理中的漏洞,可以节约不少管理开支,增加各方面的收入。1.3 HIS的简述医院信息系统(Hospital Information S

11、ystem,简称HIS)是近年来国际上刚刚兴起的计算机信息产业,按照卫生部信息化工作领导小组办公室颁发的医院信息系统基本功能规范,它的准确定位为:医院信息系统是指利用计算机软硬件技术、网络通讯技术等现代化手段,对医院及其所属各部门对人流、物流、财流进行综合管理,对在医疗活动各阶段中产生的数据进行采集、存储、处理、提取、传输、汇总、加工生成各种信息,从而为医院的整体运行提供全面的、自动化的管理及各种服务的信息系统。HIS是现代化医院建设中不可缺少的基础设施与支撑环境,属于迄今世界上现存的企业级信息系统中最为复杂的一类。它不仅要同其它管理信息系统(MIS)一样追踪、管理伴随人流、物流、财流所产生的

12、管理信息,从而提高整个系统的运行效率,而且还应该支持以病人医疗信息记录为中心的整个医疗、教学、科研活动。1.4数据库系统简介数据库系统本质上是一个用计算机存储记录的系统。系统用户可以对这些文件执行插入数据、检索数据、更改数据、删除数据等一系列操作。图1-1是一个数据库系统的简图。图1-1 数据库系统简图本人设计的是一个关于中小型民营医院的医院门诊管理的数据库系统,通过这个系统管理员可以简捷、方便的对病人、医生及药品记录查阅、增加、删除等功能,而用户也可以通过这个系统对进行医院查询、借阅等功能。该数据库应用程序按照用户权限和实现功能的不同分为两部分:外部用户对数据库的查询访问和内部管理人员对数据

13、记录的管理维护,每一部分中包含各自实现的各项功能,对每一项功能的实现,将按照窗体设计以及运行情况的顺序逐一进行设计。本系统采用SQL技术建立数据库,然后建立数据源的链接,并且生成医院门诊管理的数据库应用程序从而实现数据库的管理功能。SQL(Structured Query Language,结构查询语言)是一个功能强大的数据库语言。SQL语句通常用于完成一些数据库的操作任务,比如在数据库中更新数据,或者从数据库中检索数据。使用SQL的常见关系数据库管理系统有:Oracle、 Sybase、 Microsoft SQL Server、 Access、 Ingres等等。SQL语言有着非常突出的优

14、点,主要是:1、非过程化语言2、统一的语言3、是所有关系数据库的公共语言非过程化语言:SQL是一个非过程化的语言,因为它一次处理一个记录,对数据提供自动导航。SQL允许用户在高层的数据结构上工作,而不对单个记录进行操作,可操作记录集,所有SQL 语句接受集合作为输入,返回集合作为输出。SQL的集合特性允许一条SQL语句的结果作为另一条SQL语句的输入。SQL不要求用户指定对数据的存放方法, 这种特性使用户更易集中精力于要得到的结果;所有SQL语句使用查询优化器,它是RDBMS的一部分,由它决定对指定数据存取的最快速度的手段,查询优化器知道存在什么索引,在哪儿使用索引合适,而用户则从不需要知道表

15、是否有索引、有什么类型的索引。统一的语言:SQL可用于所有用户的活动模型,包括系统管理员、数据库管理员、 应用程序员、决策支持系统人员及许多其它类型的终端用户。SQL为许多任务提供了命令,其中包括:1 查询数据2、 在表中插入、修改和删除记录3、 建立、修改和删除数据对象4、 控制对数据和数据对象的存取5、 保证数据库一致性和完整性以前的数据库管理系统为上述各类操作提供单独的语言,而SQL 将全部任务统一在一种语言中。所有关系数据库的公共语言:由于所有主要的关系数据库管理系统都支持SQL语言,用户可将使用SQL的技能从一个RDBMS(关系数据库管理系统)转到另一个,所有用SQL编写的程序都是可

16、以移植的。1.5开发工具与及关健技术简介本系统使用SQL作为后台数据管理系统,而在前端使用ADO对象和数据环境作为数据访问接口。它选用了目前最流行、使用最广泛的可视化编程语言Visual Basic 6.0作为开发环境。在实际的系统编程中,这种系统开发方式也是很普遍的。1.5.1Visual Basic简介Visual Basic,简称VB,是Microsoft公司推出的一种Windows应用程序开发工具。是当今世界上使用最广泛的编程语言之一,它也被公认为是编程效率最高的一种编程方法。无论是开发功能强大、性能可靠的商务软件,还是编写能处理实际问题的实用小程序,VB都是最快速、最简便的方法。它是

17、由最初的Basic语言发展而来的,Basic语言是面向过程的,后来出现的vb1.0到3.0.一直到现在的6.0和,是一种可视化面向对象的编程语言,特点是编程效率高,很短时间就可以编写出功能强大的软件。1.5.2 ADO技术ADO(ActiveX Data Objects)称为ActiveX数据对象,是Microsoft公司开发数据库应用程序面向对象的新接口,ADO技术已成为ASP技术用来访问Web数据库应用程序的核心。ADO是DAO/RDO的后继产物,它扩展了DAO和RDO所使用的对象模型,具有更加简单,更加灵活的操作性能。ADO在Internet方案中使用最少的网络流量,并在前端和数据源之间

18、使用最少的层数,提供了轻量、高性能的数据访问接口,可通过ADO Data控件非编程和利用ADO对象编程来访问各种数据库。它是对当前微软所支持的数据库进行操作的最有效和最简单直接的方法,它是一种功能强大的数据访问编程模式,从而使得大部分数据源可编程的属性得以直接扩展到你的Active Server 页面上。可以使用ADO 去编写紧凑简明的脚本以便连接到 Open Database Connectivity (ODBC) 兼容的数据库和 OLE DB 兼容的数据源,这样程序员就可以访问任何与 ODBC 兼容的数据库,包括 MS SQL SERVER、Access、 Oracle 等等。1.6系统简

19、介科学技术的飞速发展,使得竞争十分激烈,有许多公司在崛起,也有许多公司在没落,优胜劣汰十分明显,这就要看谁先掌握先进的技术了,对于管理方面也是一样,效率和成效就是关键,为了提高管理的效率和操作的简单化,制作这中型医院门诊管理系统是十分必要的。该系统特别适用中小型医院,针对医院规模不大,人手不足等特点,能够直接面对病人或医生,以智能化的操作满足日常需求。我的目标就是开发一个功能实用、操作方便、简单明了且成本低的中型医院门诊管理系统。本系统采用C/S结构,服务器采用SQL Server2000数据库,客户端采用Visual Basic 6.0为开发工具。在设计时力求作到界面简洁,风格统一,操作方便

20、,上手简易等特点。本系统主要包括8大功能,即:收费管理、退费管理、医务人员管理、科室管理、收费项目管理、药品管理、报表管理和数据维护等。系统具有以下特点:极大地提高了医务人员的工作效率,加快了病人就诊的速度,有效地解决了“看病难“的问题。全面提高了医院的综合管理水平和服务质量。解决了漏收费、错收费问题,控制了药品的流失。采用公费、自费两种收费模式。强大的报表打印功能,使用户可以随时查看或打印收费、退费的统计结果。系统具有较高的安全性,每进入一个功能模块,都要验证操作员的身份和密码。1.7系统实现的目标中型医院门诊管理系统用于支持医院完成各方面的管理,有如下几个方面的目标:1.记录病人的基本档案

21、信息,提供便捷的查询功能。2.管理医生的信息,使医生与病人有很好的联系。3.有效管理病人的各方面信息,以便医生查询。4.减少医生漏收费、错收费问题,降低管理成本。5.有效地完成医院的日常管理工作。2 系统分析2.1系统主要模块功能进行详细的分析主要功能有7大块分别为计价收费、药品维护、统计查询、报表打印、系统维护、关于等,下面对每一模块进行详细的介绍:1.计价收费模块的功能A:提供“病案类型”列表供用户选择录入。如果用户选择“新患者”,那么系统自动分配给该患者一个病案号;如果选择其他病案类型,可以自动输入证号。例如,提供两种费用类型,即:自费、公费。B:通过拼音简码检索输入就诊科室、医生和诊疗

22、项目,提高了工作效率。C:通过“类型”列表选择项目类别,例如:中药费、检查费、化验费等。再通过选择的项目类型,筛选并弹出与之对应的药品或诊疗项目的详细信息列表,供用户查看和选择录入。D:对于错误的数据,可以单条删除,也可以整单作废。E:金额系统自动计算,减小了错误率。F:如果收费项目中存在药品,那么自动更新该药品的库存数量。2.药品维护模块 实现了中西药品和特殊药品的管理。将新增药品入库到相应的仓库中,对于仓库中已存在的药品,可以增加库存数量;如果药品信息输入有误可以进行修改或删除。3.统计查询模块 该模块主要以查询为主,收费查询、药品查询、疗项目查询等。4.报表打印模块 此模块有收款员日结报

23、表、结帐统计报表、就诊科室统计报表、执行科室统计报表等。 收款员日结报表主要完成当日或某日收款员收款和退款收据数和金额统计。 结帐统计报表根据用户选择的日期区间和统计方式。完成门诊收费信息的统计。当用户选择“付款方式统计”选项时,将分别统计现金、支票和计帐三种结算方式总计收据数和收费金额。当用户选择“按收费项目统计”选项时,将按收费项目统计收费金额。就诊科室统计报表完成按就诊科室和日期统计收费信息。5.系统维护模块 该模块有三大管理功能分别为科室管理、生管理、疗项目管理6.退费模块根据用户输入的单据号,显示单据的收费项目信息。在此信息中选择需要退费的收费项目。这时系统自动统计退费金额和收费剩余

24、金额。综上所述可得图2-1所示的模块结构图。执行科室统计报表就诊科室统计报表结账统计报表收款员日结报表收费查询诊疗项目管理医生管理科室管理诊疗项目查询药品查询打印删除修改增加库存新增药品退费收费统计查询计价收费医院门诊管理系统药品维护报表打印系统维护关于帮助图2-1系统模块结构图2.2数据库设计2.2.1 E-R图医生与科室之间的E-R图,医生与科室有着一定的联系,一个科室可以有若干个医生,故科室与医生是一对多的关系。图2-2医生与科室之间的E-R图门诊与医生之间的E-R图,一个门诊中可以有多个医生,每一个医生却只能有一个对应的门诊,为人看病图2-3门诊与医生之间的E-R图医生与病人之间的E-

25、R图,在一个医院中,医生与病人有着紧密的联系,往往是一对一的关系。图2-4医生与病人之间的E-R图药品与门诊收费之间的E-R图,一种药品一个进价,收费时的价格也是统一的。图2-5药品与门诊收费之间的E-R图2.2.2重要数据库表设计表2.1 医生信息表字段名称字段类型字段大小说明编号varchar2由两个数字组成,不允许为空。例如01姓名varchar10拼音码varchar10取每个汉字拼音的第一个字母,然后进行组合。例如:任艳的拼音简码为RY性别varchar2职称varchar10职务varchar10联系电话varchar20所在科室varchar20兼职科室varchar20表2.2

26、科室信息表字段名称字段类型字段大小说明科室编号varchar2由两个数字组成,不允许为空,例如:01科室名称Varchar20科室简称Varchar10科室名称的简写拼音码Varchar10取每个汉字拼音的第一个字母,然后进行组合科室电话Varchar20科室类型Varchar4主要包括临床和医技表2.3药品信息表字段名称字段类型字段大小说明药品编码varchar7由7位数字组成,不允许为空,例如0000002品名Varchar60药品的曾用名拼音码Varchar20取每个汉字拼音的第一个字母,然后进行组合。例如:去痛片的拼音码为QTP剂型Varchar10包括片剂、丸剂、针剂等规格Varch

27、ar40最小单位Varchar4包装量Varchar18,0包装单位Varchar4零售价Varchar20库存数量Varchar18,0自费类型varchar4主要有自费和公费两种类别Varchar10主要有西药、中药、中草药毒麻标志Varchar10生产企业Varchar20表2.4诊疗项目信息表字段名称字段类型字段大小说明收费项目编号Varchar4由两位数字组成,不允许为空,例如:01收费项目名称varchar30拼音码Varchar20取每个汉字拼音的第一个字母,然后进行组合类别Varchar10主要有中药费、西药费、化验费、检查治疗费等收费金额Varchar50执行科室Varcha

28、r20核算科目Varchar10自费类型varchar4主要有自费和公费两种表2.5门诊收费信息表字段名称字段类型大小说明病案类型Varchar10主要有门诊号、新患者、住院号、医疗证号、条码号病案号Varchar10根据病案类型输入患者姓名Varchar10费用类型Varchar4主要有自费和公费两种就诊科室Varchar20医生Varchar10就诊次数Int账单号Int处方号Int项目号Varchar10类别Varchar10药品或诊疗项目名称Varchar200数量numeric18,0单价money金额Money执行科室Varchar20收据号Varchar7收费单据的惟一标识日期D

29、atetime结算方式Varchar4主要有现金、支票和计帐退费标志Bit操作员Varchar10工号Varchar5窗口号varchar2表2.6收费单据信息表字段名称字段类型大小说明收据号Varchar7收费单据的惟一标识总金额Money结算方式Varchar4实收金额Money找零Money操作员Varchar10工号Varchar10窗口号Varchar2日期Datetime表2.7门诊退费信息表字段名称字段类型大小说明病案类型Varchar10病案号Varchar10患者姓名Varchar10费用类别Varchar4就诊科室Varchar20医生Varchar10就诊次数Int账单号

30、Int处方号Int项目号Varchar10类别Varchar10药品和诊疗项目名称Varchar200数量Numeric18,0单价Money金额Money执行科室Varchar20收据号Varchar7收费日期Datetime结算方式Varchar4日期Datetime操作员Varchar10工号Varchar5窗口号Varchar2表2.8退费单据信息表字段名称字段类型字段大小说明收据号Varchar7总金额Money结算方式Varchar4操作员Varchar10工号Varchar10窗口号Varchar2金额Money收据数Varchar10日期Datetime3 系统实现及编码3.1

31、系统工程说明系统的工程名定为医院医院门诊管理系统。在工程中的一些规定:1. Form取名 Frm + 标识名, 标识名一般取表名。2. 与数据库的连接用 ADOConnection,在程序主界面上。3. 数据库控件统一用ADOQuery, 取名 Query + 表名。4. 编辑字段控件用 Edit控件,取名为字段名。数据自动存储,只要置Edit字段的name属性为字段名,Tag置0,非库字段值置1。3.2界面设计1.窗体属性设置:表3.1属性名属性值picture选择相应的图画Backstyle 0-transparence Caption医院门诊管理系统2.状态栏的创建在主窗体上加入Stat

32、usBar控件,就加入了一条状态栏,此状态栏用于显示系统时间。3.主要控件的属性设置表3.2对象名称属性属性设置值MSHFlexGridMSHGrid1AllowUserResizing3-flexResizeBothAppearance0-flexFlatBackColor&H00FFFFFF&BackColorBkg&H00FFFFFF&BackColorFixed&H00FFFFFF&BorderStyle0-flexBorderNoneGridLines1-flexGridFlatGridLinesFixed2-flexGridFlatRowHeightMin1MSHGrid2Allo

33、wUserResizing3-flexResizeBothMSHFlexGridMSHGrid2Appearance0-flexFlatBackColor&H00FFFFFF&BackColorBkg&H00FFFFFF&BackColorFixed&H00FFFFFF&BorderStyle0-flexBorderNoneGridLines0-flexGridNoneGridLinesFixed0- flexGridNoneRowHeightMin13.3具体功能实现 此系统中最主要的是计价收费系统,这里就计价收费进行详细介绍。当窗体载入时,设置:病案类型、费用类型、类型,显示系统日期们星期

34、,设置MSFlexGrid表格列数,列宽及表头信息。其代码不不介绍。 就看上面的代码只是对程序的一些数据进行了初始化,函数和录入过程还不是很清楚,下面就来一一介绍说明一下所用到的函数和录入过程。1. 数据录入过程按(ENTER)键使控件自动获得焦点。在数据录入的过程中,应该考虑到用户输入的方便性和高效性。用户每录入完一个项目后,系统应该自动将焦点放到下一个控件上。由于一般用户都习惯使用(ENTER)键,所以这里设计只要用户按下(ENTER)键,下一个需要录入数据的控件便自动获得焦点。完成这一功能,只需要在每个控件的KEYDOWN事件下输入下一个控件获得焦点代码即可。例如:IfKeyCode=v

35、bKeyReturn And Index=1 Then Cbo1(1).SetFocus通过用户输入的拼音简码检索并输入科室、医生等信息以输入科室信息为例介绍通过拼音简码输入信息的方法。在“就诊科室”文本框中,当用户输入一个拼音简码或全输,按(ENTER)键后系统自动检索与其相匹配的科室信息,并显示在科室信息列表中。如果第一条记录是用户需要的,那么直接按(ENTER)键,即可在“就诊科室”文本框中显示该科室的信息;否则,可以通过键盘中的上下键进行选择,然后按(ENTER)键,即可在“就诊科室”文本框中显示该科室的信息。代码如下:If KeyCode = vbKeyReturn And Inde

36、x = 2 Then Adodc1.RecordSource = select * from 科室信息表 where 拼音码 like + + Txt1(2).Text + +% Adodc1.Refresh If Adodc1.Recordset.RecordCount 0 Then GridKS.Visible = True GridKS.SetFocus Else GridKS.Visible = False Txt1(3).SetFocus End If End If2. 将表格中的数据显示在MS1表格中药品信息或诊疗项目信息被检索出来后,将显示在DATAGRID表格中。下面以药品表格

37、(GRIDYP)为例介绍他的设计方法。在GRIDYP表格的KEYDOWN事件下,当用户按下(ENTER)键时,将GRIDYP表格中的药品信息赋给MS1的各个单元格。代码如下:If KeyCode = vbKeyReturn Then With Adodc2.Recordset 赋值给MS1表格 MS1.TextMatrix(MS1.Row, 3) = Trim(.Fields(品名) MS1.TextMatrix(MS1.Row, 5) = Format(.Fields(零售价), 0.00) End With MS1.Col = 3 Text1.Text = MS1.Text Text1.S

38、etFocus GridYP.Visible = False End If If KeyCode = vbKeyEscape Then 按ESC键GridYP不可见 GridYP.Visible = False Text1.SetFocus text1获得焦点 End If3. 自动计算收费项目金额和总金额计算收费项目金额和总金额应该在Text1_Change事件下完成的。代码如下:MS1.Text = Text1.Text 赋值给MS1表格 If MS1.Col = 4 Then MS1.TextMatrix(MS1.Row, 6) = Val(MS1.TextMatrix(MS1.Row,

39、 4) * Val(MS1.TextMatrix(MS1.Row, 5) CmdNextCF.Enabled = True CmdAddItem.Enabled = True CmdDelItem.Enabled = True CmdJS.Enabled = True CmdCancel.Enabled = True End If If MS1.Col = 5 Then MS1.TextMatrix(MS1.Row, 6) = Val(MS1.TextMatrix(MS1.Row, 4) * Val(MS1.TextMatrix(MS1.Row, 5) Dim A As Single For

40、i = 1 To MS1.Row If MS1.TextMatrix(i, 1) Then A = Val(MS1.TextMatrix(i, 6) + A 求合计金额 End If Next i LblZje.Caption = Format(A, 0.00)当“数量”单元格发生变化时,计算收费项目金额和总金额。总金额是指表格中所有数据的合计金额,计算它时应该将计算语句写在FORNEXT循环语句里。总结经过这次毕业设计,我感到自己无论在专业知识方面,还是在动手能力方面都有了很大的收获。此次所使用的VB对我来不是一门新的语言,但是操作起来还是有些困难,现在我对它已经有了一定的了解。特别是对AD

41、O控件。SQL Server 以前学过,对数据库的操作有初步掌握,此次毕业设计也使用SQL Server数据库,这无疑增长了我这方面的经验,使我数据库有了更深一步的了解与认识,现在运用起来比以前熟练了很多。另外,通过此次毕业设计,本人对开发一个软件的各个阶段有了一定的了解,在实际动手的过程中,深刻体会到书写代码时良好的习惯对错误的检查和代码的维护都有很大的帮助,不像以前写代码时,只想实现要实现的功能,不管代码的书写质量,内存空间的有效利用等问题。但是由于时间仓促,加上水平有限,一开始没有做好很好的需求分析,草草的设计了数据库,现在系统完成了回过头去看一下,在数据库设计过程中,还是存在许多不合理

42、的地方。比如:在科室信息表中,我设计了,科室名称与科室简称还有拼音码,在操作过程中,似乎觉得没有必要,有些重复现象,还有没有做到拼音码是唯一的,运行过程中,没有对已有的拼音码进行提示,在设计过程中,我也遇到了许多问题如:在做系统时,在打印报表时,一开始总出现数据错位的现象,经过反复检查代码后,仍然不能解决.最后考虑到打印数据错位,经过老师和同学的帮助,最后问题解决了,从中让我学会的如何去调试程序和解决问题。致谢三年的大学生涯即将结束,借此机会向三年来关心过我,帮助过我得老师,同学们表示深深的谢意! 特别要感谢我的导师沈卓芹老师,感谢她在系统设计和任务安排上长时间的指导,从开始设计数据库到最后的完成整体设计,以及论文的撰写完毕,都给予了极大的帮助。在我的毕业设计遇到困难的时候,是沈老师把我从误区中拉了出来,而且她还告诉我了许多解决问题得方法和技巧,这将为我今后走上工作岗位奠定基础。参考文献1 黄梯云. 管理信息系统M. 北京:高等教育出版社,20002 薛华成. 管理信息系统M.3. 北京:清华大学出版社 1999.54 张金城. 管理信息系统M. 北京:北京大学出版社 2001.85 罗超理, 李万红. 管理信息系统原理与应用M. 北京:清华大学出版社 2002.96 朱顺泉, 姜灵敏. 管理信息系统理论与实务M

展开阅读全文
相关资源
猜你喜欢
相关搜索

当前位置:首页 > 其他


经营许可证编号:宁ICP备18001539号-1