医院管理系统课程设计方案

1、 HYPERLINK 一、系统需需求与功功能分析 1系统需需求分析析医院信息化化是医院院应用信信息技术术及其产产品的过过程，是是信息技技术由局局部到全全局、由由战术层层次到战战略层次次向医院院的全面面渗透，运运用于流流程管理理、支持持医院经经营管理理的过程程。信息息化的实实施从自自上而下下的角度度说，必必须与医医院的制制度创新新、组织织创新和和管理创创新结合合；从自自上而下下的角度度说，必必须以作作为医院院主体的的业务人人员直接接受益及及其使用用水平的的逐步提提高为基基础。调查用户需需求：本系统的最最终用户户为医院院，我们们根据从从医院方方面取得得的图表表资料、文文字资料料以及其其他细节节方面

2、的的信息，根根据我们们日常生生活中的的经验，根根据我们们所做的的其他询询问和调调查，得得出用户户的下列列实际要要求：用户对系统统的要求求：信息要求：由于系统的的使用主主体是医医院的管管理人员员，因此此对系统统的信息息要求可可分为以以下方面面：（1）病人人信息：首先是是病人的的基本信信息，主主要包括括病人的的姓名，性性别，出出生年月月，年龄龄，家庭庭住址，联联系方式式等；：对于住住院病人人，还需需要入院院时间，所所在病区区，所在在医科，床床位等。（2）处理理要求：系统应当完完成以下下的信息息处理：存储病病人信息息，供相相应的人人员查询询；：对病人人信息进进行及时时的更新新和统计计；（3）安全全性

3、要求求：系统应设置置访问用用户的标标识以鉴鉴别是否否是合法法用户，并并要求合合法用户户设置其其密码，保保证用户户身份不不被盗用用。2. 功能能分析（1）信信息录入入处理：住院病病人信息息录入、住住院病人人治疗费费用录入入、住院院病人药药品费用用录入。 住院病病人信息息录入就就是将源源数据库库中没有有的病人人信息重重新录入入进去，并并且可以以录入病病人姓名名。住院院病人费费用录入入和住院院病人药药品录入入功能相相近，都都是将 病人在在住院期期间的所所花的费费用进行行录入保保存，方方便以后后进行查查询。（2）信信息查询询处理：住院病病人信息息查询和和住院病病人费用用查询。 住院病病人信息息查询和和

4、住院病病人费用用查询功功能相似似，从数数据库中中将病人人信息和和费用显显示到前前台，让让病人及及时了解解自己的的个人信信息和消消费情况况。（3）信信息统计计处理：住院病病人总费费用统计计按大类科、专专科、病病区及指指定的病病人进行行查询统统计（4）信息息打印处处理：住住院病人人信息打打印住院病人信信息报表表打印用用于显示示病人的的住院号号、床位位号、床床位费、病病人姓名名、性别别编码出出生日期期、民族族、籍贯贯和病症症等详细细信息。（5）系系统维护护处理：病人信信息维护护、大类类科编码码维护、专专科编码码维护、病病区编码码维护、治治疗项目目编码维维护、药药品编码码维护医医生编码码维护和和用户编

5、编码维护护。系统编码维维护时分分别对病病人信息息、大类类科、专专科、病病区、治治疗项目目、药品品信息、医医生信息息和用户户信息进进行录入入、查询询与修改改等操作作，数据据编码表表维护是是对各类类数据编编码表中中的记录录进行录录入、查查询与修修改等操操作。3.系统功功能菜单单由此方案设设计的系系统功能能菜单如如下表所示示。信息录入信息查询信息统计数据打印系统维护信息复制病人信息录录入病人信息查查询病人总费用用统计病人信息打打印系统维护批量复制病人治疗费费用录入入病人费用查查询大类科编码码维护病人药品费费用录入入专科编码维维护病区编码维维护治疗项目维维护药品编码维维护医生编码维维护用户编码维维护

6、表 学生生成绩管管理功能能菜单二、数据库库设计设计系统的的数据库库结构、数数据表结结构包含含序号、数数据项名名、含义义、数据据项类型型、长度度、非空空、索引引、主键键、外键键、引用用字段、数数据来源源等。1.大类科科编码表表Cattegoory表1 大大类科编编码表ttblCCateegorry序号字段名含义类型宽度小数主/外键1Cate_Id 大类科编码码Varchhar10PK2Cate_Namme大类科名称称Varchhar203Cate_Deaan大类科主任任Varchhar102.专科编编码表SSpecc表2 专专科编码码表tbblSppec序号字段名含义类型宽度小数 主/外键键关联

7、表/字字段1Spec_Id专科编码Varchhar10PK2Spec_Namme专科名称Varchhar303Spec_Catte所属大类科科编码Varchhar10FKtblCaateggoryy / Catte_IID3.病区编编码表WWardd表3 病区编编码表ttblWWardd序号字段名含义类型宽度小数 主/外键键关联表/字字段1Ward_Id病区编码Varchhar10PK2Ward _Naame病区名称Varchhar203Ward_Poss病区位置Varchhar204Ward_Bedds总床位数Int5Ward_Useed已用床位数数Int6Ward_Resst剩余床位数数f

8、laott7Ward_Heaad病区主任Varchhar108Ward_Speec所属专科编编码Varchhar 2FKtblSppec / SSpecc_IDD4.病人信信息表PPatiientt表4 病病人信息息表tbblPaatieent序号字段名含义类型宽度小数 主/外键键关联表/字字段1Pat_IId住院号Varchhar10PK2Pat_BBed 床位号Varchhar503Pat_BBedFFee床位费moneyy24Pat_NNamee病人姓名Varchhar85Pat_SSex性别编码Varchhar1tblSeex / Seex_IID6Pat_BBirtth出生日期Dat

9、ettimee7Pat_NNatiion民族Varchhar2tblNaatioon / Naatioon_IID8Pat_NNtvPPlc籍贯Varchhar6tblNttvPllc / NttvPllc_IID9Pat_SSympptonn病症Varchhar2010Pat_WWorkk工作单位Varchhar2011Pat_CCharrId身份证号Varchhar4012Pat_WWardd病区编码Varchhar10tblWaard / WWardd_IDD13Pat_ZZipCCodee住宅邮编Varchhar614Pat_PPhonne住宅电话Varchhar2015Pat_AAd

10、drr户口地址Varchhar5016Pat_AAdmiit入院日期Datettimee17Pat_LLeavve出院日期Datettimee18Pat_PPayAAd预交费moneyy219Pat_PPaySSum费用总额moneyy220Pat_PPayRRestt费用结余moneyy221Pat_IImagge病人照片Imagee5.性别编编码表Sexx表5 性性别编码码表tbblSeex序号字段名含义类型宽度小数主/外键1Sex_IId性别编码Varchhar1PK2Sex_NNamee性别Varchhar106.民族编编码表Nattionn表6 民民族编码码表tbblNaatioon

11、序号字段名含义类型宽度小数主外键1Natioon_IId民族编码Varchhar2PK2Natioon_NNamee民族名称Varchhar207.籍贯编编码表NtvvPlcc表7 籍籍贯编码码表tbblNttvPllc序号字段名含义类型宽度小数主/外键1NtvPllc_IId籍贯编码Varchhar6PK2NtvPllc_NNamee籍贯名称Varchhar208.治疗项项目编码码表Iteem表8 治疗项项目编码码表tbblIttem序号字段名含义类型宽度小数 主/外键键关联表/字字段1Item_Id项目编码Varchhar10PK2Item_Namme项目名称Varchhar63Item_

12、Typpe项目类别Varchhar64Item_Wbmm五笔码Varchhar305Item_Pymm拼音码Varchhar106Item_PerrPriice项目单价floatt27Item_Marrk备注Varchhar209.病人治治疗项目目费用表表MeddIteem表9 病人治治疗项目目费用表表tblMMedIItemm序号字段名含义类型宽度小数 主/外键键关联表/字字段1Mi_PaatIdd住院号Varchhar10PKtblPaatieent / PPat_Id2Mi_IttemIId项目编码Varchhar10tblIttem / IItemm_IDD3Mi_Quuanttity

13、y数量floatt4Mi_Ammounnt金额int5Mi_Daate使用日期Varchhar106Mi_Tiime使用时间Varchhar507Mi_DoocIdd医生编码Varchhar10tblDooctoor / Dooct_Id8Mi_Addvicce医嘱号Varchhar1010.药品品编码表表Meddiciine表10 药品品编码表表tbllMeddiciine序号字段名含义类型宽度小数 主/外键键关联表/字字段1Med_IId药品编码Varchhar17PK2Med_WWbm五笔编码Varchhar63Med_PPym拼音编码Varchhar64Med_NNamee药品名称Va

14、rchhar305Med_SSpecc药品规格Varchhar166Med_UUnitt计量单位Varchhar67Med_PPerPPricce药品单价floatt28Med_EExpiiryddatee药品有效期期Varchhar11.病人人药品费费用表MeddFeee表11 病人人药品费费用表ttblMMedFFee序号字段名含义类型宽度小数 主/外键键关联表/字字段1Mf_PaatIdd住院号Varchhar10PKtblPaatieent / PPat_Id2Mf_IttemIId药品编码Varchhar17tblMeediccinee / Medd_Idd3Mf_Unnit药品单位

15、Varchhar44Mf_ QQuanntitty数量floatt5Mf_Ammounnt金额floatt6Mf_Daate使用日期Varchhar107Mf_Tiime使用时间Varchhar58Mf_DoocIdd医生编码Varchhar5tblDooctoor / Dooct_Id9Mf_Addvicce医嘱号Varchhar1012.医生生编码表表Docctorr序号字段名含义类型宽度小数主键表12 医生编编码表ttblDDocttor序号字段名含义类型宽度小数 主/外键键关联表/字字段1Doct_ID医生编码Varchhar5PK2Doct_Namme医生名称Varchhar83Do

16、ct_Speec所属专科编编码Varchhar8tblSppec / SSpecc_Idd4Doct_Warrd所属病区编编码Varchhar10tblWaard / WWardd_Idd13.用户户表Useer表13 用户表表tbllUseer序号字段名含义类型宽度小数 主/外键键关联表/字字段1User_ID用户名Varchhar10PK2User_Psww用户密码Varchhar203User_Flaag用户权限标标志Varchhar1三、程序设设计1.系统登登录（主主）图1 用用户登录录界面在登录界面面的设计计中，我我采用的的是有连连接访问问数据库库，这样样数据并并发性问问题更容容易控

17、制制，数据据也是当当前的和和及时更更新的；此外还还设有用用户权限限，权限限不同登登录成功功后呈现现出的主主界面也也不同；并且使使用DattaReeadeer组件来来以只读读和仅转转发的方方式从数数据源检检索数据据；核心心代码如如下：/有连接接访问statiic strringg sttr = DDataa Soourcce=AASUSS-PCCSSQLEEXPRRESSS;Innitiial Cattaloog=HHosppitaal;UUserr Idd=saa;Paasswwordd=saa; SqllConnnecctioon ccon = nnew SqllConnnecctioon(

18、sttr);privaate voiid bbtn_Loggin_Cliick(objjectt seendeer, EveentAArgss e)strinng ccmdSStr = Sellectt * Froom ttblLLogiin WWherre UUserr_Naame=a andd Usser_Pwdd=bb; SqqlCoommaand cmdd = neww SqllCommmannd(ccmdSStr, coon); SqqlPaarammeteer ss1, s2; s11 = cmdd.Paarammeteers.Addd(aa, SqllDbTTypee.VaarC

19、hhar, 200); s22 = cmdd.Paarammeteers.Addd(b, SqqlDbbTyppe.VVarCCharr, 220); s11.Vaaluee = txtt_UsserNNamee.Teext; s22.Vaaluee = txtt_UsserPPwd.Texxt;/打开连连接 coon.OOpenn();/定义SSqlDDataaReaaderr对象 SqqlDaataRReadder dr = ccmd.ExeecutteReeadeer(); /只读读的方式式从数据据源检索索数据 iff (ddr.RReadd() /用户权权限登录录 CCommmon.U

20、seer_FFlagg = drUsser_Flaag.TooStrringg(); /显示主主窗体 Formm_Maain frmm = neww Forrm_MMainn(); ffrm.Shoow(); elsse MMesssageeBoxx.Shhow(用户名名或密码码错误！); /关闭连连接 coon.CClosse();2.主界面面（主）图2 医医院住院院信息管管理系统统在主界面设设计，为为了将所所有界面面以整体体的方式式全部实实现出来来，即执执行一次次就能看看到全部部效果，我我在主界界面添加加了MenuuStrrip控控件并且且在MenuuStrrip控控件上添添加了Meaau

21、Ittem控件，双双击MeaauIttem控件添添加代码码实现主主/子窗体体连接；而且把把界面设设计的漂漂亮、规规范，我我把Forrm窗体的IsMMdiCConttainner属性设设置为Truue，BacckgrrounndImmage属性导导入一张张图片，加加入一个个timmer控件在staatussStrrip显示时时间；此此外涉及及到用户户权限问问题，我我在Forrm_LLoadd事件中中添加代代码，用用户权限限不同登登录后访访问的主主界面也也不同。核核心代码码如下：/单击主主界面上上住院病人人药品费费用录入入时，将将显示出出住院病病人药品品费用录录入的Forrm子窗体体privaat

22、e voiid ttsmiiMfIInpuut_CClicck(oobjeect sennderr, EEvenntArrgs e) Foorm_MeddFeee frrm = neew Forrm_MMedFFee(); frrm.MMdiPPareent = tthiss; frrm.SShoww(); sllbl_winndoww.Teext = 当前窗窗体: + frrm.TTextt;/用户权权限设置置privaate voiid FFormm_Maain_Loaad(oobjeect sennderr, EEvenntArrgs e) /调用Commmonn类的静静态变量量Usee

23、r_FFlagg，当用用户权限限为0时，系系统维护护界面失失效，但但可见 if (Commmonn.Usser_Flaag = 0) /系统维护护界面失失效 MeenuMMainntaiin.EEnabbledd = fallse; /timmer控件显显示时间间privaate voiid ttimeer1_Ticck(oobjeect sennderr, EEvenntArrgs e) sslbll_tiime.Texxt = 日期：时间： + Connverrt.TToSttrinng(DDateeTimme.NNow); /单击主主界面上上住院病病人总费费用录入入时，将将显示出出住院病

24、病人总费费用录入入的Forrm子窗体体privaate voiid 住院病人人总费用用统计TooolSttrippMennuIttem_Cliick(objjectt seendeer, EveentAArgss e) Forrm_FFeeSStatt frrm = neew Forrm_FFeeSStatt(); ffrm.MdiiParrentt = thiis; ffrm.Shoow(); sslbll_wiindoow.TTextt = 当前窗窗体: + frrm.TTextt; /单击主主界面上上批量复复制时，将将显示出出批量复复制的Forrm子窗体体privaate voiid t

25、toollStrripBButtton11_Cllickk(obbjecct ssendder, EvventtArggs ee) FFormm_Coopy frmm = neww Forrm_CCopyy(); ffrm.MdiiParrentt = thiis; ffrm.Shoow(); sslbll_wiindoow.TTextt = 当前窗窗体: + frrm.TTextt; /单击主主界面上上住院病人人信息打打印时，将将显示出出住院病病人信息息打印的的Forrm子窗体体privaate voiid ttsmiiPattPinnt_CClicck(obbjecct ssendder,

26、 EvventtArggs ee) FFormm_PaatBbb frrm = neew Forrm_PPatBBb(); ffrm.MdiiParrentt = thiis; ffrm.Shoow(); sslbll_wiindoow.TTextt = 当前窗窗体: + frrm.TTextt;3.病人信信息录入入（次）图3 病病人信息息录入病人信息息用于对对病人信信息的录录入、查查询和显显示等操操作，并并且可以以插入病病人照片片。主要要代码如如下：whilee (mmyReeadeer.RReadd() fiile = nnew (saaveddImaageNNamee, .OpeenOr

27、rCreeatee, .Wriite); bww = neww BinnaryyWriiterr(fiile); sttarttInddex = 00;/读取的的起点位位置 reetvaal = myyReaaderr.GeetByytess(0, sttarttInddex, ouutbyyte, 0, buuffeerSiize);/返回实实际读取取的字节节数 /当图片片大小大大于或等等于数组组大小时时，需分分块写入入到文件件中 whiile (reetvaal = bbuffferSSizee) bww.Wrritee(ouutbyyte); bww.Fllushh(); sttartt

28、Inddex += buffferrSizze;/重置读读取的起起点位置置 reetvaal = myyReaaderr.GeetByytess(0, sttarttInddex, ouutbyyte, 0, buuffeerSiize); bww.Wrritee(ouutbyyte, 0, (iint)rettvall - 1); bww.Fllushh(); bww.Cllosee(); ();4.住院病病人信息息查询（次次）图4 住住院病人人信息查查询从数据库中中将病人人信息和和费用显显示到前前台，让让病人及及时了解解自己的的个人信信息。代代码：privaate voiid ccbo_C

29、atte_SSeleecteedInndexxChaangeed(oobjeect sennderr, EEvenntArrgs e) /无连接接访问实实现专科科表和大大类科表表的绑定定 sttrinng ccmdSStr = Sellectt * Froom ttblSSpecc whheree Sppec_Catte=a; SqqlCoommaand cmdd = neww SqllCommmannd(ccmdSStr, coon); SqqlPaarammeteer ss1; s11 = cmdd.Paarammeteers.Addd(a, SqqlDbbTyppe.VVarCCharr

30、, 22); s11.Vaaluee = cboo_Caate.SellecttedVValuue.TToSttrinng(); SqqlDaataAAdappterr dpp = neww SqllDattaAddaptter(); dpp.SeelecctCoommaand = ccmd; DaataSSet ds = nnew DattaSeet(); dpp.Fiill(ds, SSpecc); cbbo_SSpecc.DaataSSourrce = dds.TTabllesSppec; iff (dds.TTabllesSppec.RRowss.Coountt = 0) cbbo_S

31、Specc.DiispllayMMembber = ; cbbo_SSpecc.VaalueeMemmberr = ; elsse cbbo_SSpecc.DiispllayMMembber = Speec_NNamee; cbbo_SSpecc.VaalueeMemmberr = Sppec_Id; 5.住院病病人总费费用统计计（次）图5 住住院病人人总费用用统计住院病人人总费用用统计时时用于统统计病人人住院治治疗等项项目的总总费用，及及其消费费药品名名称、数数量、金金额、使使用时间间等，都都会相信信的显示示出来，一一目了然然。主要要代码如如下：whilee (rrd_CCatee.Reea

32、d() /定义树树结点 TreeeNoode nodde_CCatee = neww TreeeNoode(rd_Catte.GGetVValuue(00).TToSttrinng(); if (rd_Catte.GGetVValuue(11).TToSttrinng() != sttrinng.EEmptty) strringg sttrSppec = sellectt Sppec_Namme,SSpecc_Idd frrom tbllSpeec wwherre Speec_CCatee=; strrSpeec += rrd_CCatee.GeetVaaluee(1).TooStrringg

33、(); strrSpeec += ; SqllCommmannd ccmd_Speec = neew SqllCommmannd(sstrSSpecc, ccon); SqllDattaReeadeer rrd_SSpecc = cmdd_Sppec.ExeecutteReeadeer(); whiile (rdd_Sppec.Reaad() TTreeeNodde nnodee_Sppec = nnew TreeeNoode(rd_Speec.GGetVValuue(00).TToSttrinng(); if (rd_Speec.GGetVValuue(11).TToSttrinng() !

34、= sttrinng.EEmptty) strringg sttrWaard = sellectt Waard_Namme,WWardd_Idd frrom tbllWarrd wwherreWaard_Speec=; sttrWaard += rd_Speec.GGetVValuue(11).TToSttrinng(); sttrWaard += ; SqllCommmannd ccmd_Warrd = neew SqllCommmannd(sstrWWardd, ccon); SqqlDaataRReadder rd_Warrd = cmmd_WWardd.ExxecuuteRReadde

35、r(); whhilee (rrd_WWardd.Reead() TTreeeNodde nnodee_Waard = nnew TreeeNoode(rd_Warrd.GGetVValuue(00).TToSttrinng(); iif (rd_Warrd.GGetVValuue(11).TToSttrinng() != sttrinng.EEmptty) strringg sttrPaat = sseleect Patt_Naame froom ttblPPatiientt whheree PPat_Warrd=; strrPatt += rdd_Waard.GettVallue(1).T

36、oSStriing(); strrPatt += ; SqllCommmannd ccmd_Patt = neww SqllCommmannd(sstrPPat, coon); SqllDattaReeadeer rrd_PPat = ccmd_Patt.ExxecuuteRReadder(); whiile (rdd_Paat.RReadd() TrreeNNodee noode_Patt =nnew TreeeNoode(rd_Patt.GeetVaaluee(0).TooStrringg(); noode_Warrd.NNodees.AAdd(nodde_PPat); rd_Patt.C

37、llosee(); nodde_SSpecc.Noodess.Addd(nnodee_Waard); rdd_Waard.Cloose(); noode_Catte.NNodees.AAdd(nodde_SSpecc); rd_Speec.CClosse(); trreeVVieww_Paatieent.Noddes.Addd(noode_Catte);6.住院病病人报表表打印（主主）图6 病病人信息息报表打打印 病人信信息报表表打印是是我们组组的重头头戏，在在HISSDattaSeet内存数数据集中中添加一一个内存存表，相相比其他他内存数数据表，这这个内存存数据表表不是建建立连接接从外存存数

38、据库库中拉入入的，而而是我用用Sellectt语句编编写的即即Pattiennt；在解解决方案案资源管管理器中中新建CCrysstall报表并并且从HISSDattaSeet内存数据据集中导导入用Pattiennt内存表表的数据据信息；另外在在Forrm窗体上上添加ccrysstallRepporttVieewerr窗体，作作用是在在运行时时，使Froom窗体上上查询的的信息显显示在ccrysstallRepporttVieewerr窗体上，形形成报表表的格式式；此外外在代码码上也有有做修改改，当具具体不知知道病人人的姓名名时可采采用模糊糊查询，当当点击显显示和预预览两个个按钮时时出现的的界面

39、，这这些都是是通过代代码实现现的，具具体代码码如下：/预览按按钮privaate voiid tsBBtn_Prevvieww_Cllickk(obbjecct ssendder, EvventtArggs ee) /显示crrysttalRRepoortVViewwercrysttalRRepoortVViewwer11.Viisibble = ttruee;/定义一一个CryystaalReeporrt_PPatiientt对象cr CryystaalReeporrt_PPatiientt crr = neww CryystaalReeporrt_PPatiientt(); ccr.SSe

40、tDDataaSouurcee(dss.TaableesPattiennt); ccrysstallRepporttVieewerr1.RRepoortSSourrce = ccr;/显示按按钮privaate voiid tsBBtn_Dissplaay_CClicck(oobjeect sennderr, EEvenntArrgs e)/不显示示cryystaalReeporrtViieweer控件件 ccrysstallRepporttVieewerr1.VVisiiblee = fallse;privaate voiid FFormm_PaatBbb_Looad(objjectt se

41、endeer, EveentAArgss e) ccmd.CommmanndTyype = CCommmanddTyppe.TTextt; ccmd.Connnecctioon = coon; ccmd.CommmanndTiimeoout = 115;/不显示示cryystaalReeporrtViieweer控件件 ccrysstallRepporttVieewerr1.VVisiiblee = fallse; /写一个个私有的的BinndinngPaatieent()方法法privaate voiid BBinddinggPattiennt()/打开连连接 ccon.Opeen();/使

42、用SSeleect语句从从内存数数据集HISSDattaSeet中的Pattiennt数据表表中选择择信息 sstriing cmddStrr = Seelecct PPat_Id,Patt_Beed,PPat_BeddFeee, ; ccmdSStr += PPat_Namme,PPat_Sexx,Paat_BBirtth,PPat_Nattionn,Paat_NNtvPPlc,Patt_Syymptton ; ccmdSStr += ffromm Paatieent ;/模糊查查询 ccmdSStr += Patt_Naame likke + teextBBox11.Teext + %;

43、ccmd.CommmanndTeext = ccmdSStr; dda.SSeleectCCommmandd = cmdd;/关闭连连接 ccon.Cloose(); dda.FFilll(dss, Pattiennt);/定义一一个临时时保存数数据的网网格虚拟拟表的对对象tabble_Pattiennt DattaTaablee taablee_Paatieent = nnew DattaTaablee(); ttablle_PPatiientt = ds.TabblessPPatiientt; ddataaGriidViiew11.DaataSSourrce = dds.TTabllesP

44、aatieent; ttxt_Id.DattaBiindiingss.Cllearr(); ttxt_Id.DattaBiindiingss.Addd(Texxt, taablee_Paatieent, PPat_Id); txtt_Beed.DDataaBinndinngs.Cleear(); ttxt_Bedd.DaataBBinddinggs.AAdd(Teext, ttablle_PPatiientt, Patt_Beed); ttxt_BeddFeee.DaataBBinddinggs.CCleaar(); txxt_BBedFFee.DattaBiindiingss.Addd(Te

45、xxt, taablee_Paatieent, PPat_BeddFeee); ttxt_Namme.DDataaBinndinngs.Cleear(); ttxt_Namme.DDataaBinndinngs.Addd(TTextt, ttablle_PPatiientt, Patt_Naame); ttxt_Sexx.DaataBBinddinggs.CCleaar(); ttxt_Sexx.DaataBBinddinggs.AAdd(Teext, ttablle_PPatiientt, Patt_Seex); ttxt_Birrth.DattaBiindiingss.Cllearr();

46、 ttxt_Birrth.DattaBiindiingss.Addd(Texxt, taablee_Paatieent, PPat_Birrth); ttxt_Nattionn.DaataBBinddinggs.CCleaar(); ttxt_Nattionn.DaataBBinddinggs.AAdd(Teext, ttablle_PPatiientt, Patt_Naatioon); ttxt_NtvvPlcc.DaataBBinddinggs.CCleaar(); ttxt_NtvvPlcc.DaataBBinddinggs.AAdd(Teext, ttablle_PPatiientt,

47、 Patt_NttvPllc); ttxt_Svmmptoon.DDataaBinndinngs.Cleear(); ttxt_Svmmptoon.DDataaBinndinngs.Addd(TTextt, tabble_Pattiennt, Paat_SSympptonn);/查询按按钮privaate voiid Btnn_Fiind_Cliick(objjectt seendeer, EveentAArgss e)con.OOpenn();/打开连连接/使用SSeleect语句从从内存数数据集HISSDattaSeet中的Pattiennt数据表表中选择择信息 strringg cmmd

48、Sttr = SSeleect Patt_Idd,Paat_BBed,Patt_BeedFeee,PPat_Namme,SSex_Namme,PPat_Birrth,Nattionn_Naame,NtvvPlcc_Naame,Patt_Syymptton ; ccmdSStr += ffromm Paatieent ; ccmdSStr += wheere Paat_NNamee liike + ttexttBoxx1.TTextt + %; ccmd.CommmanndTeext = ccmdSStr; dda.SSeleectCCommmandd = cmdd;con.CClosse();

49、/关闭连连接/再次查查询时原原来显示示信息将将被清除除 if (ds.Tabbless.Coontaainss(PPatiientt) dss.TaableesPattiennt.Cllearr(); /调用FFilll方法将将外存数数据库中中的信息息填充到到内存数数据集中中 dda.FFilll(dss, Pattiennt);/定义一一个临时时保存数数据的网网格虚拟拟表的对对象tabble_Pattiennt DDataaTabble tabble_Pattiennt = neew DattaTaablee(); ttablle_PPatiientt = ds.TabblessPPatii

50、entt; ddataaGriidViiew11.DaataSSourrce = dds.TTabllesPaatieent; ttxt_Id.DattaBiindiingss.Cllearr(); ttxt_Id.DattaBiindiingss.Addd(Texxt, taablee_Paatieent, PPat_Id); ttxt_Bedd.DaataBBinddinggs.CCleaar(); ttxt_Bedd.DaataBBinddinggs.AAdd(Teext, ttablle_PPatiientt, Patt_Beed); ttxt_BeddFeee.DaataBBindd

51、inggs.CCleaar(); ttxt_BeddFeee.DaataBBinddinggs.AAdd(Teext, ttablle_PPatiientt, Patt_BeedFeee); ttxt_Namme.DDataaBinndinngs.Cleear(); ttxt_Namme.DDataaBinndinngs.Addd(TTextt, tabble_Pattiennt, Paat_NNamee); ttxt_Sexx.DaataBBinddinggs.CCleaar(); ttxt_Sexx.DaataBBinddinggs.AAdd(Teext, ttablle_PPatiien

52、tt, Sexx_Naame); ttxt_Birrth.DattaBiindiingss.Cllearr(); ttxt_Birrth.DattaBiindiingss.Addd(Texxt, taablee_Paatieent, PPat_Birrth); ttxt_Nattionn.DaataBBinddinggs.CCleaar(); ttxt_Nattionn.DaataBBinddinggs.AAdd(Teext, ttablle_PPatiientt, Nattionn_Naame); ttxt_NtvvPlcc.DaataBBinddinggs.CCleaar(); ttxt_

53、NtvvPlcc.DaataBBinddinggs.AAdd(Teext, ttablle_PPatiientt, NtvvPlcc_Naame); ttxt_Svmmptoon.DDataaBinndinngs.Cleear(); ttxt_Svmmptoon.DDataaBinndinngs.Addd(TTextt, tabble_Pattiennt, Paat_SSympptonn);7.病人编编码维护护（主）图7 病病人编码码维护 病人编编码维护护窗体是是通过控控件绑定定实现起起功能的的；其功功能有：保存病病人的住住院号、病病人姓名名、性别别和出生生日期等等信息，还还设有查查询病人人信

54、息功功能；首首先在Forrm窗体添添加BinndinngSoourcce窗体体，重命命名为BinndinngSoourcce_PPat，将BinndinngSoourcce的DattaSoourcce属性与与内存数数据集HISSDattaSeet绑定、DattaMeembeer属性与与内存数数据表tbllPattiennt绑定；其次因因为TexxtBoox绑定属属于简单单数据绑绑定，所所以只要要将基本本信息（GrooupBBox）中的TexxtBoox控件的的（DattaBiindiingss）-TTextt属性分分别与BinndinngSoourcce_PPat对应绑绑定即可可，例子子：【t

55、xttPatt_Idd（住院院号）的的（DattaBiindiingss）-Teext属性与BinndinngSoourcce_PPat-Patt_Idd绑定】；此外将将病人编编码维护护的Froom窗体上上的DattaGrridVVieww控件的DattaSoourcce属性与BinndinngSoourcce_PPat进行绑绑定、collumnn属性改改为对应应的中文文汉字；最后保保存、退退出和查查询是由由代码实实现的，代代码如下下：/保存按按钮privaate voiid tsBBtn_Savve_CClicck(oobjeect sennderr, EEvenntArrgs e) thi

56、is.ttblPPatiienttTabbleAAdappterr.Uppdatte(tthiss.hIISDaataSSet.tbllPattiennt);/退出按按钮privaate voiid tsBBtn_Exiit_Cliick(objjectt seendeer, EveentAArgss e) tthiss.Cllosee();/查询按按钮privaate voiid Btnn_Chheckk_Cllickk(obbjecct ssendder, EvventtArggs ee) bbinddinggSouurcee_Paat.FFiltter = Patt_naame likk

57、e + txxt_PPat.Texxt + %;8.大类科科编码维维护（主主）图8 大大类科编编码维护护 大类科科编码维维护的实实现功能能也是通通过编码码绑定实实现的，同同样在大大类科编编码维护护Forrm窗体上上添加BinndinngSoourcce窗体namme属性改改为BinndinngSoourcce_CCatee、DattaSoourcce属性与与内存数数据集HISSDattaSeet绑定和DattaMeembeer属性与与内存数数据表tbllCattegoory绑定；我还添添加了bbinddinggNavvigaatorr控件namme属性命名名为biindiingNNaviigattor_Catte，目目的是为为了用户户一目了了然，并并且将其其的BinndinngSoourcce属性与BinndinngSoourcce_CCatee绑定，这这样运行行时就直直接点击击bindiingNNaviigattor的的关键帧帧就可以以查看信信息，方方便；另另外窗体体上还添添加lisstBoox控件，其其数据绑绑定是属属于复杂杂数据绑绑定，因因此其DattaSoourcce属性与BinndinngSoourcce_CCatee绑定、DissplaayMeembeer属性与Catte_NNamee绑定和VallueM