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

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

2、对系统的信息要求可分为以下方面：(1)病人信息：首先是病人的基本信息，主要包括病人的姓名，性别，出生年月，年龄，家庭住址，联系方式等；：对于住院病人，还需要入院时间，所在病区，所在医科，床位等。(2)处理要求：系统应当完成以下的信息处理：存储病人信息，供相应的人员查询；：对病人信息进行及时的更新和统计；(3)安全性要求：系统应设置访问用户的标识以鉴别是否是合法用户，并要求合法用户设置其密码，保证用户身份不被盗用。2.功能分析(1)信息录入处理：住院病人信息录入、住院病人治疗费用录入、住院病人药品费用录入。住院病人信息录入就是将源数据库中没有的病人信息重新录入进去，并且可以录入病人姓名。住院病人

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

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

5、号、数据项名、含义、数据项类型、长度、非空、索引、主键、外键、引用字段、数据来源等。1 .大类科编码表Category表1大类科编码表tblCategory序号字段名含义类型宽度小数主/外键1Cate_Id大类科编码Varchar10PK2Cate_Name大类科名称Varchar203Cate_Dean大类科主任Varchar102 .专科编码表Spec表2专科编码表tblSpec序号字段名含义类型宽度小数主/外键关联表/字段1Spec_Id专科编码Varchar10PK2Spec_Name专科名称Varchar303Spec_Cate所属大类科编码Varchar10FKtblCategor

6、y/Cate_ID3 .病区编码表Ward表3病区编码表tblWard序号字段名含义类型宽度小数主/外键关联表/字段1Ward_Id病区编码Varchar10PK2Ward_Name病区名称Varchar203Ward_Pos病区位置Varchar204Ward_Beds总床位数Int5Ward_Used已用床位数Int6Ward_Rest剩余床位数flaot7Ward_Head病区主任Varchar108Ward_Spec所属专科编码Varchar2FKtblSpec/Spec_ID4 .病人信息表Patient表4病人信息表tblPatient序号字段名含义类型宽度小数主/外键关联表/字段

7、1Pat_Id住院号Varchar10PK2Pat_Bed床位号Varchar503Pat_BedFee床位费money24Pat_Name病人姓名Varchar85Pat_Sex性别编码Varchar1tblSex/Sex_ID6Pat_Birth出生日期Datetime7Pat_Nation民族Varchar2tblNation/Nation_ID8Pat_NtvPlc籍贯Varchar6tblNtvPlc/NtvPlc_ID9Pat_Sympton病症Varchar2010Pat_Work工作单位Varchar2011Pat_CharId身份证号Varchar4012Pat_Ward病区

8、编码Varchar10tblWard/Ward_ID13Pat_ZipCode住宅邮编Varchar614Pat_Phone住宅电话Varchar2015Pat_Addr户口地址Varchar5016Pat_Admit入院日期Datetime17Pat_Leave出院日期Datetime18Pat_PayAd预交费money219Pat_PaySum费用总额money220Pat_PayRest费用结余money221Pat_Image病人照片Image5 .性别编码表Sex表5性别编码表tblSex序号字段名含义类型宽度小数主/外键1Sex_Id性别编码Varchar1PK2Sex_Name

9、性别Varchar106 .民族编码表Nation表6民族编码表tblNation序号字段名含义类型宽度小数主外键1Nation_Id民族编码Varchar2PK2Nation_Name民族名称Varchar207 .籍贯编码表NtvPlc表7籍贯编码表tblNtvPlc序号字段名含义类型宽度小数主/外键1NtvPlc_Id籍贯编码Varchar6PK2NtvPlc_Name籍贯名称Varchar208 .治疗项目编码表Item表8治疗项目编码表tblItem序号字段名含义类型宽度小数主/外键关联表/字段1Item_Id项目编码Varchar10PK2Item_Name项目名称Varchar6

10、3Item_Type项目类别Varchar64Item_Wbm五笔码Varchar305Item_Pym拼音码Varchar106Item_PerPrice项目单价float27Item_Mark备注Varchar209 .病人治疗项目费用表MedItem表9病人治疗项目费用表tblMedItem序号字段名含义类型宽度小数主/外键关联表/字段1Mi_PatId住院号Varchar10PKtblPatient/Pat_Id2Mi_ItemId项目编码Varchar10tblItem/Item_ID3Mi_Quantity数量float4Mi_Amount金额int5Mi_Date使用日期Varc

11、har106Mi_Time使用时间Varchar507Mi_DocId医生编码Varchar10tblDoctor/Doct_Id8Mi_Advice医嘱号Varchar1010 .药品编码表Medicine表10药品编码表tblMedicine序号字段名含义类型宽度小数主/外键关联表/字段1Med_Id药品编码Varchar17PK2Med_Wbm五笔编码Varchar63Med_Pym拼音编码Varchar64Med_Name药品名称Varchar305Med_Spec药品规格Varchar166Med_Unit计量单位Varchar67Med_PerPrice药品单价float28Med

12、_Expirydate药品有效期Varchar11 .病人药品费用表MedFee表11病人药品费用表tblMedFee序号字段名含义类型宽度小数主/外键关联表/字段1Mf_PatId住院号Varchar10PKtblPatient/Pat_Id2Mf_ItemId药品编码Varchar17tblMedicine/Med_Id3Mf_Unit药品单位Varchar44Mf_Quantity数量float5Mf_Amount金额float6Mf_Date使用日期Varchar107Mf_Time使用时间Varchar58Mf_DocId医生编码Varchar5tblDoctor/Doct_Id9M

13、f_Advice医嘱号Varchar1012 .医生编码表Doctor表12医生编码表tblDoctor序号字段名含义类型宽度小数主/外关联表/字段键1Doct_ID医生编码Varchar5PK2Doct_Name医生名称Varchar83Doct_Spec所属专科编码Varchar8tblSpec/Spec_Id4Doct_Ward所属病区编码Varchar10tblWard/Ward_Id13 .用户表User表13用户表tblUser序号字段名含义类型宽度小数主/外键关联表/字段1User_ID用户名Varchar10PK2User_Psw用户密码Varchar203User_Flag用

14、户权限标志Varchar1三、程序设计1.系统登录(主)图1用户登录界面在登录界面的设计中，我采用的是有连接访问数据库，这样数据并发性问题更容易控制,数据也是当前的和及时更新的；此外还设有用户权限，权限不同登录成功后呈现出的主界面也不同；并且使用DataReader组件来以只读和仅转发的方式从数据源检索数据；核心代码如下：/有连接访问staticstringstr="DataSource=ASUS-PCSQLEXPRESS;InitialCatalog=Hospital;UserId=sa;Password=sa"SqlConnectioncon=newSqlConnect

15、ion(str);privatevoidbtn_Login_Click(objectsender,EventArgse)stringcmdStr="Select*FromtblLoginWhereUser_Name=aandUser_Pwd=b"SqlCommandcmd=newSqlCommand(cmdStr,con);SqlParameters1,s2;si=cmd.Parameters.Add("a",SqlDbType.VarChar,20);s2=cmd.Parameters.Add("b",SqlDbType.VarCh

16、ar,20);51 .Value=txt_UserName.Text;52 .Value=txt_UserPwd.Text;/打开连接con.Open();/定义SqlDataReader对象SqlDataReaderdr=cmd.ExecuteReader();/只读的方式从数据源检索数据if(dr.Read()(/用户权限登录Common.User_Flag=dr"User_Flag".ToString();/显示主窗体Form_Mainfrm=newForm_Main();frm.Show();)else(MessageBox.Show("用户名或密码错误！

17、");)/关闭连接con.Close();2 .主界面(主)图2医院住院信息管理系统在主界面设计，为了将所有界面以整体的方式全部实现出来，即执行一次就能看到全部效果，我在主界面添加了MenuStrip控件并且在MenuStrip控件上添加了MeauItem控件，双击MeauItem控件添加代码实现主/子窗体连接；而且把界面设计的漂亮、规范，我把Form窗体的IsMdiContainer属性设置为True,Backgroundimage属性导入一张图片，加入一个timer控件在statusStrip显示时间；此外涉及到用户权限问题，我在Form_Load事件中添加代码，用户权限不同登录

18、后访问的主界面也不同。核心代码如下：/单击主界面上住院病人药品费用录入时，将显示出住院病人药品费用录入的Form子窗体privatevoidtsmiMfInput_Click(objectsender,EventArgse)(Form_MedFeefrm=newForm_MedFee();frm.MdiParent=this;frm.Show();slbl_window.Text="当前窗体："+frm.Text;)/用户权限设置privatevoidForm_Main_Load(objectsender,EventArgse)(/调用Common类的静态变量User_Fl

19、ag,当用户权限为0时，系统维护界面失效，但可见if(Common.User_Flag="0")(/系统维护界面失效MenuMaintain.Enabled=false;)/timer控件显示时间privatevoidtimer1_Tick(objectsender,EventArgse)(slbl_time.Text="日期：时间："+Convert.ToString(DateTime.Now);)/单击主界面上住院病人总费用录入时，将显示出住院病人总费用录入的Form子窗体privatevoid住院病人总费用统计ToolStripMenuItem_C

20、lick(objectsender,EventArgse)(Form_FeeStatfrm=newForm_FeeStat();frm.MdiParent=this;frm.Show();slbl_window.Text="当前窗体："+frm.Text;)/单击主界面上批量复制时，将显示出批量复制的Form子窗体privatevoidtoolStripButton1_Click(objectsender,EventArgse)(Form_Copyfrm=newForm_Copy();frm.MdiParent=this;frm.Show();slbl_window.Tex

21、t="当前窗体："+frm.Text;)/单击主界面上住院病人信息打印时，将显示出住院病人信息打印的Form子窗体privatevoidtsmiPatPint_Click(objectsender,EventArgse)(Form_PatBbfrm=newForm_PatBb();frm.MdiParent=this;frm.Show();slbl_window.Text="当前窗体："+frm.Text;)3 .病人信息录入(次)图3病人信息录入病人信息用于对病人信息的录入、查询和显示等操作，并且可以插入病人照片。主要代码如下：while(myRead

22、er.Read()(file=newFileStream(savedImageName,FileMode.OpenOrCreate,FileAccess.Write);bw=newBinaryWriter(file);startIndex=0;/读取的起点位置retval=myReader.GetBytes(0,startIndex,outbyte,0,bufferSize);/返回实际读取的字节数/当图片大小大于或等于数组大小时，需分块写入到文件中while(retval=bufferSize)(bw.Write(outbyte);bw.Flush();startIndex+=bufferS

23、ize;/重置读取的起点位置retval=myReader.GetBytes(0,startindex,outbyte,0,bufferSize);)bw.Write(outbyte,0,(int)retval-1);bw.Flush();bw.Close();file.Close();)4 .住院病人信息查询(次)图4住院病人信息查询从数据库中将病人信息和费用显示到前台，让病人及时了解自己的个人信息。代码:privatevoidcbo_Cate_SelectedindexChanged(objectsender,EventArgse)/无连接访问实现专科表和大类科表的绑定stringcmdS

24、tr="Select*FromtblSpecwhereSpec_Cate=a"SqlCommandcmd=newSqlCommand(cmdStr,con);SqlParameters1;si=cmd.Parameters.Add("a",SqlDbType.VarChar,2);sl.Value=cbo_Cate.SelectedValue.ToString();SqlDataAdapterdp=newSqlDataAdapter();dp.SelectCommand=cmd;DataSetds=newDataSet();"Spec"

25、;dp.Fill(ds,"Spec");cbo_Spec.DataSource=ds.Tablesif(ds.Tables"Spec".Rows.Count=0)(cbo_Spec.DisplayMember=cbo_Spec.ValueMember=elsecbo_Spec.DisplayMember=cbo_Spec.ValueMember=5.住院病人总费用统计（次）-崛Tmspr国柠寺.索王-J:.土卡M苏L59¥-或由里电lls=i»Is"Spec_Name""Spec_Id"kVl.

26、rJ-*1里五立即利L划ftWbl住王右粘*.阳闰11ICOjoift-ce-oc01Ll注用iFHS.-j二SIPCC-OLQt:LQ问雕曲9*JOlKf-OB0寸Ll小k®1酣"4931>mPlQiL9HBE妙Iflf正如宜H114.2OU0喻*Ll<eri物节访指T陋fDID-S-OEOtLBKMTr15?eoiKf-ot峙Llftftf眼#097酬2DIDCC-OLQIL9140".?(''II例SOlh-ffi-OtgLl触建0眼E20H3QOLl住西冷二初MXFEQ1LI电酱明*9WetEKJfQItLO社网I即能”-C&#

27、163;PLQ»LQE母皿胃硼白SCUMCOtASLl也特匚班仙tosplQiLQT押11rxifLi日陆为ns!(可«,*4II1,JL不力，Fl为用钿-,L*F.%15前品总费用1H62.15U:四诲空不.酎4MMwl半/眄23UIs二I也屋口题出1*330MMAIM*kCJttTUJ*L0LUaJOHllHSLULU厩国工1慝+IKK虫2a)iHi-oiHlLOm宙3最>UPL19LU赵国工斤酶酬u雷4MIMI-01IOLD寸国*D5闵5的叫ElWLO©wK?近豺卜d卜.力KN1ITIIJLOrtA礴健在TX4eflw-oi-oiIOLG力沿H2HKI

28、-DIHQL10LDg崎1SfllO-Ol-Ol巾LOuW.fin»-ai-CL19LU些国耳耻铲1eaMIMi-OI1.0LD由舞胃片二|ttbq»-qi-cl19LU晚谢城5as,割Khnifi1.0LD中工小$*印叩'4ka)»-oi-oiHILO第H赤配聃鼻5匍1.0LO骷打倒I6的®Htt-dl-otidid并蜘彳LlHi.7Mfr司婚QJPLLQl>iifi.*.1图5住院病人总费用统计住院病人总费用统计时用于统计病人住院治疗等项目的总费用，及其消费药品名称、数量、金额、使用时间等，都会相信的显示出来，一目了然。主要代码如下：w

29、hile(rd_Cate.Read()(/定义树结点TreeNodenode_Cate=newTreeNode(rd_Cate.GetValue(0).ToString();if(rd_Cate.GetValue(1).ToString()!=string.Empty)(Spec_Cate='"stringstrSpec="selectSpec_Name,Spec_IdfromtblSpecwherestrSpec+=rd_Cate.GetValue(1).ToString();strSpec+=""'SqlCommandcmd_Spec

30、=newSqlCommand(strSpec,con);SqlDataReaderrd_Spec=cmd_Spec.ExecuteReader();while(rd_Spec.Read()(TreeNodenode_Spec=newTreeNode(rd_Spec.GetValue(0).ToString();if(rd_Spec.GetValue(1).ToString()!=string.Empty)(stringstrWard="selectWard_Name,Ward_IdfromtblWardwhereWard_Spec='"strWard+=rd_Spe

31、c.GetValue(1).ToString();strWard+=""'SqlCommandcmd_Ward=newSqlCommand(strWard,con);SqlDataReaderrd_Ward=cmd_Ward.ExecuteReader();while(rd_Ward.Read()TreeNodenode_Ward=newTreeNode(rd_Ward.GetValue(0).ToString();if(rd_Ward.GetValue(1).ToString()!=string.Empty)stringstrPat="selectPat

32、_NamefromtblPatientwherePat_Ward='"strPat+=rd_Ward.GetValue(1).ToString();strPat+="'"SqlCommandcmd_Pat=newSqlCommand(strPat,con);SqlDataReaderrd_Pat=cmd_Pat.ExecuteReader();while(rd_Pat.Read()TreeNodenode_Pat=newTreeNode(rd_Pat.GetValue(0).ToString();node_Ward.Nodes.Add(node_P

33、at);rd_Pat.Close();node_Spec.Nodes.Add(node_Ward);rd_Ward.Close();node_Cate.Nodes.Add(node_Spec);rd_Spec.Close();treeView_Patient.Nodes.Add(node_Cate);6 .住院病人报表打印(主)-中人等转吵一色汉日判史打团学与卬旬，用向胖酎，EI2口2/1用反戛匕C8OOCOOC.20:OOTOOT1BOCCWQ8二000000180CMOOOX&i-ODOiXiiiSb。凶亍偿cmuiiaOG30WS1ZOOOU-»hlSWJL.'

34、.：'=ID!JTNW5-笺Q1253=1053-1Q73-1061-7224-3014-3014-IQE华君K华0JmHJ_hjH日H月王王干王00800UJ_HJmSJIS*-djuB-HBn-B-+王王工：工已生u盘皿现臼他康I而弓由JM肾脏住总观分苜脑应扃1335/30观用管脏际1SB5/9/3O现超叶胆疾掩辿出孤耳肝胆觊痣3"1”器观衽有屈忌/issa/ioAi哪酎卜科就5也曾由/产现在:！西卜阱反病】阳-/现臼取外事容病侬3打”3州在T梁用碟隔里禺中A里女史手T里的LSLESS：1+UM%图6病人信息报表打印病人信息报表打印是我们组的重头戏，在HISDataSet

35、内存数据集中添加一个内存表，相比其他内存数据表，这个内存数据表不是建立连接从外存数据库中拉入的，而是我用Select语句编写的即Patient;在解决方案资源管理器中新建Crystal报表并且从HISDataSet内存数据集中导入用Patient内存表的数据信息；另外在Form窗体上添加crystalReportViewer窗体，作用是在运行时，使From窗体上查询的信息显示在crystalReportViewer窗体上，形成报表的格式；此外在代码上也有做修改，当具体不知道病人的姓名时可采用模糊查询，当点击显示和预览两个按钮时出现的界面，这些都是通过代码实现的，具体代码如下：/预览按钮priv

36、atevoidtsBtn_Preview_Click(objectsender,EventArgse)(/显示crystalReportViewercrystalReportViewer1.Visible=true;/定义一个CrystalReport_Patient对象crCrystalReport_Patientcr=newCrystalReport_Patient();cr.SetDataSource(ds.Tables"Patient");crystalReportViewer1.ReportSource=cr;/显小按钮privatevoidtsBtn_Displ

37、ay_Click(objectsender,EventArgse)(/不显示crystalReportViewer控件crystalReportViewer1.Visible=false;privatevoidForm_PatBb_Load(objectsender,EventArgse)(cmd.CommandType=CommandType.Text;cmd.Connection=con;cmd.CommandTimeout=15;/不显示crystalReportViewer控件crystalReportViewer1.Visible=false;/写一个私有的BindingPatien

38、t()方法privatevoidBindingPatient()(/打开连接con.Open();使用Select语句从内存数据集HISDataSet中的Patient数据表中选择信息stringcmdStr="SelectPat_Id,Pat_Bed,Pat_BedFee,"cmdStr+="Pat_Name,Pat_Sex,Pat_Birth,Pat_Nation,Pat_NtvPlc,Pat_SymptoncmdStr+="fromPatient"/模糊查询cmdStr+="Pat_Namelike'"+tex

39、tBox1.Text+"%'"cmd.CommandText=cmdStr;da.SelectCommand=cmd;/关闭连接con.Close();da.Fill(ds,"Patient");/定义一个临时保存数据的网格虚拟表的对象table_PatientDataTabletable_Patient=newDataTable();table_Patient=ds.Tables"Patient"dataGridView1.DataSource=ds.Tables"Patient"txt_Id.DataB

40、indings.Clear();txt_Id.DataBindings.Add("Text",table_Patient,"Pat_Id");txt_Bed.DataBindings.Clear();txt_Bed.DataBindings.Add("Text",table_Patient,"Pat_Bed");txt_BedFee.DataBindings.Clear();txt_BedFee.DataBindings.Add("Text",table_Patient,"Pat_Be

41、dFee");txt_Name.DataBindings.Clear();txt_Name.DataBindings.Add("Text",table_Patient,"Pat_Name");txt_Sex.DataBindings.Clear();txt_Sex.DataBindings.Add("Text",table_Patient,"Pat_Sex");txt_Birth.DataBindings.Clear();txt_Birth.DataBindings.Add("Text"

42、;,table_Patient,"Pat_Birth");txt_Nation.DataBindings.Clear();txt_Nation.DataBindings.Add("Text",table_Patient,"Pat_Nation");txt_NtvPlc.DataBindings.Clear();txt_NtvPlc.DataBindings.Add("Text",table_Patient,"Pat_NtvPlc");txt_Svmpton.DataBindings.Clear(

43、);txt_Svmpton.DataBindings.Add("Text",table_Patient,"Pat_Sympton");/查询按钮privatevoidBtn_Find_Click(objectsender,EventArgse)con.Open();/打开连接使用Select语句从内存数据集HISDataSet中的Patient数据表中选择信息stringcmdStr="SelectPat_Id,Pat_Bed,Pat_BedFee,Pat_Name,Sex_Name,Pat_Birth,Nation_Name,NtvPlc_N

44、ame,Pat_Sympton"cmdStr+="fromPatient"cmdStr+="wherePat_Namelike'"+textBox1.Text+"%'"cmd.CommandText=cmdStr;da.SelectCommand=cmd;con.Close();/关闭连接/再次查询时原来显示信息将被清除if(ds.Tables.Contains("Patient")ds.Tables"Patient".Clear();/调用Fill方法将外存数据库中的

45、信息填充到内存数据集中da.Fill(ds,"Patient");/定义一个临时保存数据的网格虚拟表的对象table_PatientDataTabletable_Patient=newDataTable();table_Patient=ds.Tables"Patient"dataGridView1.DataSource=ds.Tables"Patient"txt_Id.DataBindings.Clear();txt_Id.DataBindings.Add("Text",table_Patient,"Pa

46、t_Id");txt_Bed.DataBindings.Clear();txt_Bed.DataBindings.Add("Text",table_Patient,"Pat_Bed");txt_BedFee.DataBindings.Clear();txt_BedFee.DataBindings.Add("Text",table_Patient,"Pat_BedFee");txt_Name.DataBindings.Clear();txt_Name.DataBindings.Add("Text&

47、quot;,table_Patient,"Pat_Name");txt_Sex.DataBindings.Clear();txt_Sex.DataBindings.Add("Text",table_Patient,"Sex_Name");txt_Birth.DataBindings.Clear();txt_Birth.DataBindings.Add("Text",table_Patient,"Pat_Birth");txt_Nation.DataBindings.Clear();txt_Nat

48、ion.DataBindings.Add("Text",table_Patient,"Nation_Name");txt_NtvPlc.DataBindings.Clear();txt_NtvPlc.DataBindings.Add("Text",table_Patient,"NtvPlc_Name");txt_Svmpton.DataBindings.Clear();txt_Svmpton.DataBindings.Add("Text",table_Patient,"Pat_Symp

49、ton");7 .病人编码维护(主)图7病人编码维护病人编码维护窗体是通过控件绑定实现起功能的；其功能有：保存病人的住院号、病人姓名、性别和出生日期等信息，还设有查询病人信息功能；首先在Form窗体添加BindingSource窗体，重命名为BindingSource_Pat，将BindingSource的DataSource属性与内存数据集HISDataSet绑定、DataMember属性与内存数据表tblPatient绑定；其次因为TextBox绑定属于简单数据绑定，所以只要将基本信息(GroupBox)中的TextBox控件的(DataBindings)-Text属性分别与Bi

50、ndingSource_Pat对应绑定即可，例子：【txtPat_Id(住院号)的(DataBindings)-Text属性与BindingSource_Pat-Pat_Id绑定】；此外将病人编码维护的From窗体上的DataGridView控件的DataSource属性与BindingSource_Pat进行绑定、column属性改为对应的中文汉字；最后保存、退出和查询是由代码实现的，代码如下：/保存按钮privatevoidtsBtn_Save_Click(objectsender,EventArgse)(this.tblPatientTableAdapter.Update(this.hI

51、SDataSet.tblPatient);/退出按钮privatevoidtsBtn_Exit_Click(objectsender,EventArgse)(this.Close();/查询按钮privatevoidBtn_Check_Click(objectsender,EventArgse)(bindingSource_Pat.Filter="Pat_namelike'"+txt_Pat.Text+"%'"8 .大类科编码维护(主)图8大类科编码维护大类科编码维护的实现功能也是通过编码绑定实现的，同样在大类科编码维护Form窗体上添加BindingSource窗体name属性改为BindingSource_Cate、DataSource属性与内存数据集HISDataSet绑定和DataMember属性与内存数据表tblCategory绑定；我还添加了bindingNavigator控件name属性命名为bindingNavigator_Cate,目的是为了用户一目了然，并且将其的BindingSource属性与BindingSource_Cate绑定，这样运行时就直接点击bindingNavigator的关键帧就可以查看信息，方便；另外窗体上还添加