畢業(yè)設(shè)計-醫(yī)院門診管理系統(tǒng)的設(shè)計與實現(xiàn)

基于VB的橋南社區(qū)醫(yī)院門診管理系統(tǒng)的設(shè)計finformationmanagementsystemintherisingpopulatientservicemanagement,peoplegraduallybefhospitaltopromoterole.Ithroughcommunityhospithedesignofacommunityhosmainlyexpoundstheoutpatientfromrealization.Hospitaloutpatientserviceexecutesinfofurtherimprovetheworkingefficiencyofthehospital,stillcangivepatientsmorepersonalizedKeywordsInformationManagementSystemOutpatientManagementVB6.0SQL目錄1.1課題簡介12.1主要功能分析22.2系統(tǒng)可行性分析22.2.4法律可行性3時間可行性32.3系統(tǒng)的業(yè)務(wù)流程圖32.4系統(tǒng)的功能圖43.1系統(tǒng)開發(fā)環(huán)境和開發(fā)工具43.2概念設(shè)計和邏輯設(shè)計53.3系統(tǒng)數(shù)據(jù)庫分析7第四章系統(tǒng)功能詳細設(shè)計104.1系統(tǒng)設(shè)計思路104.2系統(tǒng)功能實現(xiàn)105.1系統(tǒng)測試的內(nèi)容和意義155.2系統(tǒng)測試的主要內(nèi)容15結(jié)論16引言隨著計算機、網(wǎng)絡(luò)和通訊技術(shù)的迅猛開展與融廣泛，這些應(yīng)用帶來了生產(chǎn)方式的變革、經(jīng)濟的快速增長和人類文明的進步醫(yī)院作為特殊的效勞行業(yè)，管理方式千差萬別，大批的業(yè)務(wù)，產(chǎn)生龐大的信息，因此各醫(yī)院急需一套適合本院的醫(yī)院信息系統(tǒng)(HospitalInformati計算機性能不斷地提高，價格卻在不斷地下降，因此計算機在醫(yī)院的醫(yī)等各個方面得到越來越廣泛的應(yīng)用。計算機化的醫(yī)院信息系統(tǒng)己成為現(xiàn)代的手工操作模式，為這些醫(yī)院開發(fā)一個醫(yī)院管理系統(tǒng)非常的必要。本人通與調(diào)研，門診流程的了解，決定設(shè)計一個橋南社區(qū)醫(yī)院門診管理系為市民提供了更具人性化的效勞。病人從掛號到開單單付款到藥房取藥都采用信息化的管理。該系第一章概述為此醫(yī)院設(shè)計一個門診管理系統(tǒng)非常有必要。本課題主要研究的內(nèi)容就是橋南社區(qū)醫(yī)院門診管理系統(tǒng)的設(shè)計。通過對橋南社區(qū)醫(yī)院的考察研究和醫(yī)院門診流程的了下了良好的根底。本課題為橋南社區(qū)醫(yī)院做了具體的需求分析理系統(tǒng)主要分為掛號管理、藥房管理、收費管理、員工管理、病人信息本文從橋南社區(qū)醫(yī)院門診管理系統(tǒng)的需求分析到系統(tǒng)設(shè)計再到系統(tǒng)功試都做了詳細闡述。需求分析分別了從功能和系統(tǒng)的可行性上做了分析；系設(shè)計、邏輯設(shè)計和數(shù)據(jù)庫設(shè)計；系統(tǒng)功能詳細設(shè)計那么闡述了功能實測試對本系統(tǒng)幾大主要功能模塊進行了測試。本文不僅從系統(tǒng)具體功能實現(xiàn)從而引起產(chǎn)業(yè)結(jié)構(gòu)、產(chǎn)品結(jié)構(gòu)、經(jīng)營管理和效勞方式等方面的重大變革信息化、數(shù)字化已經(jīng)進入各行各業(yè)和人們生活中的許多方面，我國的醫(yī)數(shù)字化和信息化時代，而且隨著醫(yī)院的業(yè)務(wù)不斷增長，處理越來越復(fù)雜，無法滿足醫(yī)院的需要，成為醫(yī)院開展的瓶頸，人們對醫(yī)療效勞的要求也越效勞于病人、醫(yī)護人員、行政辦公人員，并提高醫(yī)院的科研、技為了進一步提高醫(yī)療效率，加強醫(yī)院管理，提高醫(yī)院各項工作的效管理系統(tǒng)。該系統(tǒng)采用面向?qū)ο蟪绦蛟O(shè)計語言VB6.0,針對Windows操作系統(tǒng)來第二章需求分析1.掛號管理：對未注冊的新病人進行登記添加，錄入病人所要掛號的的費用。對已經(jīng)注冊過的病人直接進行掛號。增設(shè)一欄專家查詢，可以查詢到醫(yī)院專2.藥房管理：對藥房各種藥品的信息，包括加，刪除，修改，查詢工作。醫(yī)生可以分為普通醫(yī)生，專家兩類，可以通過5.病人信息管理：對病人進行添加刪除修改操作，可以查詢病人2.2系統(tǒng)可行性分析技術(shù)可行性復(fù)雜的系統(tǒng)工程。為了保證系統(tǒng)開發(fā)成功，必須采用經(jīng)濟可行性程進行周密的調(diào)查，其中包括對開發(fā)的硬件(計算機、打印機等)和軟件的開發(fā)進行評估，由于硬運行可行性隨著市場經(jīng)濟的高速開展，近些年來互聯(lián)網(wǎng)的化傳遞的必要條件，計算機應(yīng)用技術(shù)的普及以及電腦知識的普及，醫(yī)院門法律可行性時間可行性法律的角度，時間開發(fā)上來說都是可行的。2.3系統(tǒng)的業(yè)務(wù)流程圖用戶名不存在，用戶名輸入錯誤，密碼錯誤都不能進入系統(tǒng)，具體系統(tǒng)圖2-1系統(tǒng)登錄流程圖業(yè)務(wù)流程圖主要反映了系統(tǒng)管理員對醫(yī)院門診系統(tǒng)的維護工作，包括了掛號管理(掛號信息的工信息管理〔員工的增刪查改〕、檢查工程的維護(對檢查工程的增刪查改)、科室管理的維護(對科室的增刪查改)、用戶的管理(密碼修改、新用戶的添加),具體業(yè)務(wù)流程圖如圖2-2業(yè)務(wù)流程圖圖2-2業(yè)務(wù)流程圖2.4系統(tǒng)的功能圖系統(tǒng)管理六大功能模塊，具體如圖2-3系統(tǒng)功能結(jié)構(gòu)圖所示。鵬算管理檢查項目圖2-3系統(tǒng)功能結(jié)構(gòu)圖第三章系統(tǒng)設(shè)計系統(tǒng)的開發(fā)環(huán)境Ashton-Tate三家公司共同開發(fā)的，在1988年推出了第一個版本。SQLServer2000是Microsoft公司推出的SQLServer數(shù)據(jù)庫管理系統(tǒng)的一個版本。它具有SQLServer7.0的優(yōu)點的同時又增加了許多98到2000的大型多處理器的效勞器等多種平臺使用。2.可伸縮性和可用性。同一個數(shù)據(jù)庫引擎可以在不同平臺上使用，支持聯(lián)合效勞器、索引視圖4.易于安裝、部署和使用。SQLServer2000中包括一系列管理和開發(fā)工具，這些工具可改良在多個站點上安裝、部署、管理和使用SQLServer的過程。SQLServer2000還支持基于標準的、與WindowsDNA集成的程序設(shè)計模型，使SQLServer數(shù)據(jù)庫和數(shù)據(jù)倉庫的使用成為生成強大的可伸縮系統(tǒng)的無縫局部。這些功能使您得以快速交付SQLServer應(yīng)用程序，使客戶只需最少的安裝和管理開銷即可實現(xiàn)這些應(yīng)用程序。3.1.2系統(tǒng)開發(fā)工具簡介VisualBasic簡介：是由美國微軟公司開發(fā)的包含協(xié)助開發(fā)環(huán)境的事件驅(qū)動編程語言。從任何圖形用戶界面(GUI)和快速應(yīng)用程序開發(fā)(RAD)系統(tǒng)，可以請與的使用DAO、RDO、ADO連接數(shù)據(jù)庫，還可以輕松的創(chuàng)立Activex控件。編程人員可以輕松的使用VB快速建立一個應(yīng)用程序。VB的程序可以包含一個活多個窗體，或者是一個主窗體和多個子窗體，類似操作系統(tǒng)。VB的組件既可以擁有用戶界面，也可以沒有，這樣的話可以處理效勞器端程序增加的模塊。從1991Basic快速創(chuàng)立Windows程序，現(xiàn)在還可以編寫企業(yè)的程序及強大的數(shù)據(jù)庫應(yīng)用程序5。序設(shè)計、可視化的變成工具、事件驅(qū)動的編程方式、結(jié)構(gòu)化的程序設(shè)計方法。3.2概念設(shè)計和邏輯設(shè)計系統(tǒng)概念設(shè)計〔E-R圖〕圖3-1費用管理E-R圖圖3-2掛號管理E-R圖圖3-3檢查管理E-R圖圖3-4結(jié)算管理E-R圖圖3-5員工管理E-R圖藥品管理E-R圖主要用來描述藥品管理所包含的字段，如產(chǎn)品類型圖3-6藥品管理E-R圖專家信息E-R圖主要用來描述專家信息所包含的字段，如專家科室圖3-7專家管理E-R圖圖3-8科室管理E-R圖圖3-9用戶管理E-R圖系統(tǒng)功能分析2.員工管理：醫(yī)院(管理員)對于員工的根本信息(姓名、年齡、性別、專業(yè))等信息進行增3.藥品管理：管理員對藥品的(名稱、批號、價格)等信息進行添加、修改、查詢等功能的操4.掛號管理：根據(jù)病人的(姓名、性別、掛號科室、日期)等根本信息進行掛號管理。系統(tǒng)的邏輯設(shè)計總計金額、收費員、收費日期)如下表3-1所示。掛號信息表(就診卡號、性別、姓名、年齡、籍貫、婚姻、職業(yè)、掛號科室、掛號費用、掛號日期、操作人員〕如下表3-2所示。檢查信息表(檢查編號、檢查工程、檢查名稱、檢查費用、錄入日期、錄入人)如下表3-3所結(jié)算信息表(就診卡號、收費單號、姓名、應(yīng)付金額、實收金額、找零、操作員、操作日期、開單醫(yī)生)如下表3-4所示?？剖倚畔⒈怼部剖揖幪?、科室名稱〕如下表3-5所示。員工信息表〔姓名、性別、年齡、專業(yè)、職稱、所屬科用戶信息表(用戶名、用戶密碼)如下表3-7所示。藥品信息表(藥品批文號、藥品本位碼、生產(chǎn)單位、生產(chǎn)地址、規(guī)格、劑量、產(chǎn)品類型、產(chǎn)品數(shù)量、價格、錄入日期、錄入人)如下表3-8所示。專家信息表〔專家科室、專家姓名、專家介紹、專家特長、門診時間、3.3系統(tǒng)數(shù)據(jù)庫分析系統(tǒng)數(shù)據(jù)庫表表3-1費用表(fyb)數(shù)據(jù)類型寬度是收費單號是病人姓名是是4是4是是4是4是收費員是收費日期8是是掛號表用來記錄病人掛號的信息記錄，包括病人的就診卡號、姓名、表3-2掛號表(ghb)數(shù)據(jù)類型寬度是姓名是性別是8是籍貫是是是是掛號費用4是8是操作員是檢查信息表用來描述檢查工程的一些屬性，包括檢查編號、檢查工程表3-3檢查信息表(jcb)數(shù)據(jù)類型寬度是是是檢查費用4是8是是姓名、操作員等等，如表3-4結(jié)算信息表所示。表3-4結(jié)算信息表(jsb)數(shù)據(jù)類型寬度是收費單號是姓名是4是4是4是操作員是結(jié)算日期8是是科室表是用來記錄社區(qū)醫(yī)院有哪些科室，包括了可是編號和科室名兩個字段，如表3-5科室表表3-5科室表(ksb)數(shù)據(jù)類型寬度是科室名是員工信息表表是用來描述社區(qū)員工的一些屬性，包括等，如表3-6員工信息表所示。表3-6員工信息表(ygb)數(shù)據(jù)類型寬度姓名是性別是4是是是是是是8是用戶信息表記錄了登陸該系統(tǒng)的所有操作員，包括了用戶名、用戶密碼兩個字段，如圖3-7用表3-7用戶信息表(yhb)數(shù)據(jù)類型寬度用戶名是是如表3-8藥品信息表所示。表3-8藥品信息表(ypb)寬度是是是是是是是是8是4是8是是專家信息表記錄了專家的信息表，正因為該表，病人可以在掛號的時候病人就診，該表包括了專家科室、專家姓名、專家特長、門診時間等等，如表3-9專家信息表(zjb)數(shù)據(jù)類型寬度是專家姓名是專家介紹是是門診時間是門診地點是建立數(shù)據(jù)庫連接ADO連接：本系統(tǒng)使用的數(shù)據(jù)庫連接工具是ADO,ADO是對當前微軟所支持的數(shù)據(jù)庫進行操作的最有效和最簡單直接的方法，它是一種功能強大的數(shù)據(jù)訪問編程模式返回一個數(shù)據(jù)庫連接Cnn.Open"Driver=SQLServer;Server=(locacnStr="Provider=SQLOLEDB.1;UserlD=sa;password=yanxiaolin;InitialCatalog=yymzglxt"作為VB的模塊被添加在醫(yī)院門診管理系統(tǒng)中，這樣可以讓每個窗體在進行數(shù)據(jù)庫連接操作時更加第四章系統(tǒng)功能詳細設(shè)計通過了解醫(yī)院門診的的工作流程，把這些流程通過門診管理系統(tǒng)得以實病人可根據(jù)自身的需求對掛號進行選擇。通過掛號之后看病最后病人進入費用除了可以對病人進行掛號收費等功能進行維護，4.2系統(tǒng)功能實現(xiàn)圖4-1系統(tǒng)登錄界面登錄界面看似簡單，但是不然。首先必須連接到后臺的數(shù)據(jù)庫，這里使用的是用ADO的連接Dimrs2AsNewADODB.Recordset用來申明記錄集。然后再從數(shù)據(jù)庫查詢相關(guān)字段是否匹配，包括用戶名和密碼，rs1.Open"yhb",Cnn,adOpenKeyset,=""+Text1.Text+""",Cnn,adOpenStatic,,adCmdTable。在用戶登錄界面實現(xiàn)的時候你還必須考慮很多種情況：1.用戶名存在，但是密碼錯誤。2.用戶名不存在。3.用戶名為空。4.用戶名存在，密碼為空。5用戶名密碼都為空。6用戶名，密碼輸入正確。所以要實現(xiàn)一個登錄界面，你必須考慮周全，具體登錄頁面的實現(xiàn)代碼如下：IfText1.Text=""ThenEndIfrs2.Open"yhbwhere用戶名="+Text1.Text+"",Cnn,adOpenStatic,,adCmdTableIfrs2.RecordCount>0ThenIfText2.Text=""ThenMsgBox”請輸入密碼!",,"警告"EndIfpwd=rs2.Fields("用戶密碼")IfText2.Text=pwdThenyhm=rs2.Fields("用戶名")IfintMyTimes>MaxTimesThenMsgBox”您無權(quán)使用該軟件!",,"警告"MsgBox"密碼錯誤，請重新輸入!",,"警告"intMyTimes=intMyTimes+1EndIfEndIfMsgBox“無此用戶，請重新輸入!”,,"警告”EndIfEndIf2.專家查詢：對專家科室、專家姓名、專家介紹、專家特長和專家的出診時間和地點進行維護管理。專家門診查詢界面如下列圖4-2專家門診信息操作界面所示。專家門診查詢主要通過下拉列表的形式讓用戶選擇相關(guān)字段進行查詢，第一個下拉列表的字段的字段并顯示出來。其中運算符有l(wèi)ike〔類似〕、>、=>、=<、<=、

。關(guān)鍵字用來給用要查詢的內(nèi)容。當查詢結(jié)束后，查詢接過通過datagrid現(xiàn)實出來。這里也是使用ADODC控件來連接數(shù)據(jù)庫，通過SQL查詢語句找出并顯示操作員想要Adodcl.ConnectionStriIfCombo2.Text="like"ThenAdodc1.RecordSource="select*fromzjbwhere"&Combol&"like'%"+Text1+"%""Adodc1.RecordSource="selectEndIfLabel4.Caption="記錄條數(shù)："&Adodc1.Recordset.RecordCount&"條"EndIfAdode1.ConnectionStriAdodc1.RecordSource="select*fromzjb"Label4.Caption="記錄條數(shù)："&Adodc1.Recordset.RecordCount&"條"結(jié)算管理界面如下列圖4-3所示。費用結(jié)算管理的具體實現(xiàn)：費用結(jié)算管理對前里面病人的信息進行連接，通過輸入門診號能反映出對應(yīng)病人的相關(guān)信數(shù)據(jù)進行鏈接，通過輸入藥品的名字能夠讀出藥品的單價以方便結(jié)算；還據(jù)庫進行鏈接，通過輸入檢查工程能夠知道不同的檢查工程需要的不同金額。用當前的日期來表示，既方便有保證了收費單號的唯一性。費用結(jié)算管理的打印，用Printer.Print實現(xiàn)對相關(guān)DimBColWidthAsInteger,ColWidth(5)AsIntAdodc1.ConnectionString=cnStrAdodc1.RecordSource="select*fromfybwhere收費單號like'%"+dhzzz+"%"打印主要代碼：IfmyLines>0ThenPrinter.Print"就診卡號“&”Printer.Print"收費單號"&"Printer.Print"病人姓名"&'Printer.Print"費用金額"&'Printer.Print"開單醫(yī)生"&"Printer.Print"打印時間"&"Printer.CurrentX=ColPositioPrinter.CurrentX=ColPrinter.CurrentX=ColPrinter.CurrentX=ColPrinter.CurrentX=ColPrinter.CurrentX=ColPrinter.Print"總計金額"For1=myPages*Rows+1To.Printer.FontName="宋體"Printer.CurrentX=ColPrinter.Print.TextMatriPrinter.CurrentX=ColPrinter.Print.TextMatriPrinter.CurrentX=ColPrinter.Print.TextMatriPrinter.CurrentX=ColPrinter.Print.TextPrinter.CurrentX=ColPrinter.Print.TextMatriPrinter.CurrentX=ColPrinter.Print.TextNextlEndIf4.密碼修改：對用戶密碼修改看似很簡單，但是你必須考慮好每一種情況。首先必須保證原密碼的正確性，其次必須保證兩次輸入的新密碼一致。文本框不得不輸入內(nèi)容，否那么將彈出警告提醒用戶輸入。修改密碼中的修改密碼按鈕主要代碼：PrivateSubCommand1_CIfLen(Text1(0))=0ThenEndIfIfLen(Text1(1))=0ThenMsgBox”請輸入新密碼!”,,”警告”EndIfIfLen(Text1(2))=0ThenMsgBox”請確認新密碼!”,,“警告”EndIfrs1.Open"yhbwhere用戶名=""+yhm+""",Cnn,adOpenStaticIfrs1.RecordCount>0ThenIfText1(0)>rs1.Fields("用戶密碼")ThenMsgBox"原密碼不正確!",,"警告"IfText1(1).Text=Text1(2).TextThCnn.Execute("updateyhbset用戶密碼="+Text1(2)+"where用戶名="+yhm+"")MsgBox"密碼修改成功!",,"警告"MsgBox“2次密碼輸入不一致!”,,"警告"EndIfEndIfEndIf第五章系統(tǒng)測試系統(tǒng)測試是管理系統(tǒng)開發(fā)周期中一個十分重要的階段，是為了靠性的最后關(guān)口，是對整個系統(tǒng)開發(fā)過程包括系統(tǒng)分析、系統(tǒng)設(shè)計和系統(tǒng)實將軟件看做一個透明的白盒子，按照程序的內(nèi)部結(jié)構(gòu)和處理邏輯來選定測試用例徑及過程測試，檢查系統(tǒng)與設(shè)計是否相符合，白盒測試是通過程序源代碼進面。這種類型的測試需要發(fā)泄內(nèi)部代碼算法，條件，路徑等的缺點或者錯那么是著眼于程序外部結(jié)構(gòu)、不考慮內(nèi)部邏輯結(jié)構(gòu)、針對軟件界面和軟件功定測試用例設(shè)計方法的根底上，可以設(shè)計出比擬全面、合理的測試操作步驟：輸入密碼提示錯誤，返回重新輸入；經(jīng)過對系統(tǒng)的測試，發(fā)現(xiàn)了各種類型的錯誤，其中黑盒測試中發(fā)現(xiàn)的5.2系統(tǒng)測試的主要內(nèi)容登錄測試當系統(tǒng)登錄界面運行時，系統(tǒng)會連接到數(shù)據(jù)庫如果用戶名錯誤，密碼正確，那么會彈出警告窗口顯示：無此用如圖5-1所示。如果用戶名正確，密碼輸入錯誤，那么會彈出警告窗口顯示：密碼錯5.2.2藥品添加測試當給藥房添加新藥品時，輸入信息必須完整，否那么會彈出提示窗口如圖5-3所示。本系統(tǒng)可以在病人結(jié)算付賬的時候打印單據(jù)，憑借此單據(jù)病人可以去置了藥品生三七散，數(shù)量1,做了血壓測試，那么打印單據(jù)如圖5-4所示。科室添加測試科室添加用來添加新的科室，不得與現(xiàn)有的科室重復(fù)，科室添加測試如圖5-5所示。第六章系統(tǒng)的總結(jié)與展望經(jīng)過對該系統(tǒng)的運行測試和使用，發(fā)現(xiàn)該系統(tǒng)能夠比擬好地完成各個也較為完善，方便用戶的使用，人機界面也比擬友好。該系統(tǒng)在現(xiàn)病歷這一功能，這樣醫(yī)生可以通過電腦給病人錄入看病的相關(guān)信息并且為病人將保存在數(shù)據(jù)庫中，當病人結(jié)賬取藥時，相關(guān)操作員可