1住院處信息管理系統(tǒng)住院處信息管理系統(tǒng)目目 錄錄第一章第一章 緒緒 論論 .311 課題簡介 .312 開發(fā)的意義 .313 團(tuán)隊(duì)構(gòu)成 .4第二章第二章 開發(fā)環(huán)境及實(shí)現(xiàn)技術(shù)開發(fā)環(huán)境及實(shí)現(xiàn)技術(shù) .521 開發(fā)環(huán)境 .522 開發(fā)工具簡介 .5第三章第三章 系統(tǒng)設(shè)計(jì)系統(tǒng)設(shè)計(jì) .831 概要設(shè)計(jì) .8311概要設(shè)計(jì)階段的主要任務(wù).8312概要設(shè)計(jì)的過程.8313概要設(shè)計(jì)的原則.8314系統(tǒng)功能分析.832 詳細(xì)設(shè)計(jì) .10321詳細(xì)設(shè)計(jì)的任務(wù).10322詳細(xì)設(shè)計(jì)的方法.10第四章第四章 數(shù)據(jù)庫設(shè)計(jì)數(shù)據(jù)庫設(shè)計(jì) .1241 數(shù)據(jù)庫 ACCESS簡介.1242 數(shù)據(jù)庫需求分析 .1343 測試用例 .15第五章第五章 系統(tǒng)的實(shí)現(xiàn)系統(tǒng)的實(shí)現(xiàn) .1751 系統(tǒng)登錄模塊的實(shí)現(xiàn) .1752 主界面的實(shí)現(xiàn) .2153 住院手續(xù)模塊的實(shí)現(xiàn) .23531入院登記模塊的實(shí)現(xiàn)：.23532收取押金模塊的實(shí)現(xiàn).26534出院打票模塊的實(shí)現(xiàn).29535費(fèi)用查詢/明細(xì)模塊的實(shí)現(xiàn).3254 住院報(bào)表模塊的實(shí)現(xiàn) .32541在院名冊的實(shí)現(xiàn).32542住院/出院查詢模塊的實(shí)現(xiàn).33543清單查詢模塊的實(shí)現(xiàn)方法.3555 病區(qū)管理模塊的實(shí)現(xiàn) .3556 職工人事管理模塊的實(shí)現(xiàn) .37257 版本信息模塊的實(shí)現(xiàn) .3858 用戶管理模塊的實(shí)現(xiàn) .39第六章第六章 系統(tǒng)使用說明系統(tǒng)使用說明 .4061 使用說明 .4062 運(yùn)行環(huán)境 .40第七章第七章 設(shè)計(jì)心得設(shè)計(jì)心得 .41參考文獻(xiàn)參考文獻(xiàn) .42 3第一章第一章 緒緒 論論11 課題簡介課題簡介住院處信息管理系統(tǒng)是每一所醫(yī)院管理住院病人、病區(qū)和職工收入和支出的不可缺少的一個(gè)管理信息系統(tǒng)，它的內(nèi)容對于醫(yī)院的管理者來說是至關(guān)重要的，所以住院處信息管理系統(tǒng)應(yīng)該能夠?yàn)槊恳粋€(gè)醫(yī)院的管理者提供充足的信息和快捷的查詢手段，大大的方便醫(yī)院的管理者的合理管理。隨著科學(xué)技術(shù)的不斷提高，計(jì)算機(jī)科學(xué)日漸成熟，其強(qiáng)大的功能已為人們深刻認(rèn)識，它已進(jìn)入人類社會的各個(gè)領(lǐng)域并發(fā)揮著越來越重要的作用。作為計(jì)算機(jī)應(yīng)用的一部分，使用計(jì)算機(jī)對住院病人、病區(qū)和職工進(jìn)行管理，具有著手工管理所無法比擬的優(yōu)點(diǎn)，如:檢索迅速、查找方便、可靠性高、存儲量大、保密性好、壽命長、成本低等。這些優(yōu)點(diǎn)能夠極大地提高住院病人、病區(qū)和職工管理的效率，也是醫(yī)院管理的科學(xué)化、正規(guī)化管理，與先進(jìn)科學(xué)技術(shù)接軌的重要條件。因此，開發(fā)這樣一套管理軟件成為很有必要的事情，對于我們即將計(jì)算機(jī)專業(yè)畢業(yè)的學(xué)生來說，也是一次將計(jì)算機(jī)應(yīng)用于現(xiàn)實(shí)管理的一次很有意義的實(shí)踐活動。12 開發(fā)的意義開發(fā)的意義1計(jì)算機(jī)已經(jīng)成為我們學(xué)習(xí)和工作的得力助手，使用其可方便的管理住院病人、病區(qū)和職工今天，計(jì)算機(jī)的價(jià)格已經(jīng)十分低廉，性能卻有了長足的進(jìn)步。它已經(jīng)應(yīng)用于許多領(lǐng)域?，F(xiàn)在我國的住院病人、病區(qū)和職工管理水平絕大部分還停留在紙介質(zhì)的基礎(chǔ)上，這樣的機(jī)制已經(jīng)不能適應(yīng)時(shí)代的發(fā)展，因?yàn)樗速M(fèi)了許多人力和物力，在信息時(shí)代這種傳統(tǒng)的管理方法必然被計(jì)算機(jī)為基礎(chǔ)的信息管理所取代。我作為一個(gè)計(jì)算機(jī)應(yīng)用專業(yè)的畢業(yè)生，希望可以在這方面有所貢獻(xiàn)。改革的總設(shè)計(jì)師鄧小平同志說過“科學(xué)技術(shù)是第一生產(chǎn)力”，我希望能用我所學(xué)的知識編制出一個(gè)實(shí)用的程序來幫助醫(yī)院進(jìn)行住院病人、病區(qū)和職工管理。 開發(fā)這一系統(tǒng)的好處大約有以下幾點(diǎn)：第一、可以存儲歷年住院病人、病區(qū)和職工的信息，安全、高效；第二、只需一到二名檔案錄入員即可操作系統(tǒng)，節(jié)省人力；4第三、可以迅速查到住院病人、病區(qū)和職工的各類信息。2為將來醫(yī)院上網(wǎng)做好準(zhǔn)備跟據(jù) 2003 年中國電信的調(diào)查報(bào)告顯示我國的上網(wǎng)人數(shù)已達(dá)到 1870 萬，互聯(lián)網(wǎng)已經(jīng)十分普及，本系統(tǒng)為醫(yī)院將來的上網(wǎng)作了先期工作，比如醫(yī)院的網(wǎng)絡(luò)管理模式的建立。13 團(tuán)隊(duì)構(gòu)成團(tuán)隊(duì)構(gòu)成指導(dǎo)教師：* 成員：*5第二章第二章 開發(fā)環(huán)境及實(shí)現(xiàn)技術(shù)開發(fā)環(huán)境及實(shí)現(xiàn)技術(shù)21 開發(fā)環(huán)境開發(fā)環(huán)境硬件系統(tǒng)：奔騰 100 以上 CPU、64M 以上內(nèi)存、1G 以上硬盤、光驅(qū)。軟件系統(tǒng)：Windows 9x 或更高版本、Visual Basic 6.0 中文版、Access 數(shù)據(jù)庫。22 開發(fā)工具簡介開發(fā)工具簡介微軟公司的 Visual Basic 6.0 是 Windows 應(yīng)用程序開發(fā)工具，使目前最為廣泛的、易學(xué)易用的面向?qū)ο蟮拈_發(fā)工具。Visual Basic 提供了大量的控件，這些控件可用于設(shè)計(jì)界面和實(shí)現(xiàn)各種功能，減少了編程人員的工作量，也簡化了界面設(shè)計(jì)過程，從而有效的提高了應(yīng)用程序的運(yùn)行效率和可靠性。故而，實(shí)現(xiàn)本系統(tǒng) VB 是一個(gè)相對較好的選擇。Access2000 就是關(guān)系數(shù)據(jù)庫開發(fā)工具，數(shù)據(jù)庫能匯集各種信息以供查詢、存儲和檢索。Access 的優(yōu)點(diǎn)在于它能使用數(shù)據(jù)表示圖或自定義窗體收集信息。數(shù)據(jù)表示圖提供了一種類似于 Excel 的電子表格，可以使數(shù)據(jù)庫一目了然。另外，Access 允許創(chuàng)建自定義報(bào)表用于打印或輸出數(shù)據(jù)庫中的信息。Access 也提供了數(shù)據(jù)存儲庫，可以使用桌面數(shù)據(jù)庫文件把數(shù)據(jù)庫文件置于網(wǎng)絡(luò)文件服務(wù)器，與其他網(wǎng)絡(luò)用戶共享數(shù)據(jù)庫。Access 是一種關(guān)系數(shù)據(jù)庫工具，關(guān)系數(shù)據(jù)庫是已開發(fā)的最通用的數(shù)據(jù)庫之一。如上所述，Access 作為關(guān)系數(shù)據(jù)庫開發(fā)具備了許多優(yōu)點(diǎn)，可以在一個(gè)數(shù)據(jù)包中同時(shí)擁有桌面數(shù)據(jù)庫的便利和關(guān)系數(shù)據(jù)庫的強(qiáng)大功能。微軟的 JET 數(shù)據(jù)庫引擎提供了與數(shù)據(jù)庫打交道的途徑，我們是通過它以及 Visual Basic 來訪問數(shù)據(jù)庫并對其進(jìn)行各種操作。Visual Basic、Access 以及其他微軟的軟件產(chǎn)品都是通過共用 JET 數(shù)據(jù)庫引擎，從而給用戶提供了豐富的數(shù)據(jù)類型。DATA 控件在數(shù)據(jù)庫中的信息與將信息顯示給用戶看的 Visual Basic 程序之間架起了一座橋梁。我們可以設(shè)置 DATA 控件的各個(gè)屬性，告訴它要調(diào)用那個(gè)數(shù)據(jù)庫的哪個(gè)部分。缺省情況下，DATA 控件根據(jù)數(shù)據(jù)庫中的一個(gè)或多個(gè)數(shù)據(jù)表建立一個(gè) dynaset-type（動態(tài)集合）類型的記錄集合。一個(gè)記錄集合是動態(tài)的也就意味著，當(dāng)原來的數(shù)據(jù)表中的容改變了以后，該記錄集合中的記錄也會隨之改變。DATA 控件還提供了用來瀏覽不同記錄的各種跳轉(zhuǎn)按鈕。將 DATA 控件放置在窗體中之后，我們還必須在該控件與要處理的數(shù)據(jù)庫之間建立聯(lián)系。6ADO 是 Mcrosoft 提出的第三種數(shù)據(jù)庫訪問對象，是 Microsoft 數(shù)據(jù)庫訪問技術(shù)的一個(gè)主要發(fā)展方向，ADO 將 OLE DB 封裝在一個(gè)數(shù)據(jù)對象中，使得 VB 程序中以方便地實(shí)現(xiàn)對數(shù)據(jù)庫的訪問。具體的與數(shù)據(jù)庫的關(guān)系如下：VB 數(shù)據(jù)庫應(yīng)用程序一般由用戶界面、數(shù)據(jù)庫引擎和數(shù)據(jù)倉庫三大部分組成。1用戶界面: 用戶界面是指應(yīng)用程序與用戶進(jìn)行交互的界面，包括用于交互的所有界面元素和代碼。它可以顯示數(shù)據(jù)并提供查看或更新數(shù)據(jù)的所有對象，比如數(shù)據(jù)作業(yè)窗體，添加、刪除記錄或執(zhí)行查詢的 VB 代碼等，這些對象隱含著用來請求數(shù)據(jù)庫服務(wù)的屬性、事件和方法。2數(shù)據(jù)庫引擎:所謂數(shù)據(jù)庫引擎，是一種管理數(shù)據(jù)怎樣被存儲和檢索的軟件系統(tǒng)，是應(yīng)用程序與物理數(shù)據(jù)庫之間的橋梁。它把應(yīng)用程序的請求翻譯成對各種類型數(shù)據(jù)庫的物理操作,并向應(yīng)用程序返回結(jié)果。3數(shù)據(jù)倉庫:數(shù)據(jù)倉庫是包含數(shù)據(jù)庫表的一個(gè)或多個(gè)文件，是存放數(shù)據(jù)的地方。對于本地的 VB 數(shù)據(jù)庫來說，就是.mdb 格式文件；對于不同的數(shù)據(jù)庫，它可能具備其它格式。VB 訪問數(shù)據(jù)庫通常有三種途徑:1.使用數(shù)據(jù)控件和數(shù)據(jù)綁定控件訪問數(shù)據(jù)庫；2.通過 VB 提供的數(shù)據(jù)訪問變量編程訪問；3.通過 ODBC 接口訪問 ODBC API 函數(shù)。VB 程序的數(shù)據(jù)訪問通過數(shù)據(jù)訪問接口來實(shí)現(xiàn)。 在 VB 中，主要的數(shù)據(jù)訪問接口有三種：數(shù)據(jù)存取對象(Data Access Object；DAO)、遠(yuǎn)程數(shù)據(jù)對象(Remote Data Object；RDO)、ActiveX 數(shù)據(jù)對象(ActiveX Data Objects；ADO)。VB 通過數(shù)據(jù)庫引擎可以訪問的數(shù)據(jù)庫分如下三類:內(nèi)部數(shù)據(jù)庫、外部數(shù)據(jù)庫和 ODBC數(shù)據(jù)庫。1、內(nèi)部數(shù)據(jù)庫即.MDB 格式的數(shù)據(jù)庫，包括 DAO API、Microsoft Access 和Microsoft Excel 創(chuàng)建的數(shù)據(jù)源，也稱為本地?cái)?shù)據(jù)庫。由于是由 Jet 引擎直接創(chuàng)建和操作這些數(shù)據(jù)庫，可以提供最大程度的靈活性和速度。72、外部數(shù)據(jù)庫即索引順序存取方法(ISAM)數(shù)據(jù)庫，例如Btrieve、dBASE、FoxPro 以及 Paradox 等。VB 能夠創(chuàng)建和操作所有這些數(shù)據(jù)庫，還可以訪問 Microsoft Excel 或 Lotus l-2-3 電子表格，以及一些標(biāo)準(zhǔn)的文本文件。3、ODBC 數(shù)據(jù)庫即符合開放式數(shù)據(jù)庫連接性(ODBC)協(xié)議的數(shù)據(jù)庫。VB 可以訪問ODBC 標(biāo)準(zhǔn)客戶/服務(wù)器數(shù)據(jù)庫-如 Microsoft SQL Server、Oracle 和 Sybase?？墒褂肙DBC Object 直接把命令傳遞給服務(wù)器處理，以創(chuàng)建真正的客戶機(jī)/服務(wù)器程序。8第三章第三章 系統(tǒng)設(shè)計(jì)系統(tǒng)設(shè)計(jì)31 概要設(shè)計(jì)概要設(shè)計(jì)311 概要設(shè)計(jì)階段的主要任務(wù)概要設(shè)計(jì)階段的主要任務(wù)本人先審查軟件計(jì)劃、軟件需求分析提供的文檔，提出最佳推薦方案，用系統(tǒng)流程圖，組成系統(tǒng)物理元素清單，成本效益分析，系統(tǒng)的進(jìn)度計(jì)劃，供指導(dǎo)老師審定，審定后進(jìn)入設(shè)計(jì)。確定模塊結(jié)構(gòu)，劃分功能模塊，將軟件功能需求分配給所劃分的最小單元模塊。確定模塊間的聯(lián)系，確定數(shù)據(jù)結(jié)構(gòu)、文件結(jié)構(gòu)、數(shù)據(jù)庫模式，確定測試方法與策略。 編寫概要設(shè)計(jì)說明書，用戶手冊，測試計(jì)劃，選用相關(guān)的軟件工具來描述軟件結(jié)構(gòu)，結(jié)構(gòu)圖是經(jīng)常使用的軟件描述工具。選擇分解功能與劃分模塊的設(shè)計(jì)原則，例如模塊劃分獨(dú)立性原則，信息隱蔽原則等。312 概要設(shè)計(jì)的過程概要設(shè)計(jì)的過程概要設(shè)計(jì)要先進(jìn)行系統(tǒng)設(shè)計(jì)，復(fù)審系統(tǒng)計(jì)劃與需求分析，確定系統(tǒng)具體的實(shí)施方案；然后進(jìn)行結(jié)構(gòu)設(shè)計(jì)，確定軟件結(jié)構(gòu)。313 概要設(shè)計(jì)的原則概要設(shè)計(jì)的原則將軟件劃分成若干獨(dú)立成分的依據(jù)。如何表示不同的成分內(nèi)的功能細(xì)節(jié)和數(shù)據(jù)結(jié)構(gòu)。如何統(tǒng)一衡量軟件設(shè)計(jì)的技術(shù)質(zhì)量。314 系統(tǒng)功能分析系統(tǒng)功能分析根據(jù)學(xué)校的教務(wù)人員提供的學(xué)生檔案管理的信息，預(yù)測開發(fā)的管理系統(tǒng)的達(dá)到的功能如下：第一部分：系統(tǒng)用戶管理要求：用戶分四類：超級用戶一切功能可用、管理員不可添加系統(tǒng)用戶、修改用戶密碼、不可實(shí)現(xiàn)收費(fèi)功能、收費(fèi)員僅可查詢信息、收費(fèi)功能、普通用戶僅可查詢信息第二部分：患者基本資料 要求：實(shí)現(xiàn)患者資料的新增、修改、辦理患者出院、查詢患者資料。9第三部分病房管理 要求：實(shí)現(xiàn)新增病人、病人的轉(zhuǎn)科轉(zhuǎn)房、病房明細(xì)查詢、患者退房第四部分 主治醫(yī)師管理要求：實(shí)現(xiàn)主治醫(yī)師資料的新增、修改、查詢，有統(tǒng)計(jì)各個(gè)主治醫(yī)師的治療效果第五部分 收費(fèi)管理要求：實(shí)現(xiàn)收費(fèi)項(xiàng)目列表、查詢各患者交費(fèi)情況的查詢，及收費(fèi)窗口第五部分 統(tǒng)計(jì)打印報(bào)表要求：實(shí)現(xiàn)當(dāng)日出/入院病人數(shù)量和人員列表，實(shí)現(xiàn)各患者費(fèi)用情況的打印第六部分 幫助制作幫助文檔，介紹各部分功能即可根據(jù)以上分析，該系統(tǒng)考慮將整個(gè)系統(tǒng)分解成如圖 3-1 模塊結(jié)構(gòu)圖:主界面主界面系系統(tǒng)統(tǒng)管管理理住住院院手手續(xù)續(xù)管管理理住住院院報(bào)報(bào)表表管管理理職職工工人人事事管管理理病病區(qū)區(qū)管管理理登錄登錄圖 3-1 模塊結(jié)構(gòu)圖10并且在系統(tǒng)的開發(fā)過程中，我盡量注意模塊的高內(nèi)聚、低耦合，使得系統(tǒng)的整體性能提高，并且也有利于投入使用后的系統(tǒng)維護(hù)。32 詳細(xì)設(shè)計(jì)詳細(xì)設(shè)計(jì)321 詳細(xì)設(shè)計(jì)的任務(wù)詳細(xì)設(shè)計(jì)的任務(wù)詳細(xì)設(shè)計(jì)就是要在概要設(shè)計(jì)的結(jié)果的基礎(chǔ)上，考慮“怎樣實(shí)現(xiàn)”這個(gè)軟件系統(tǒng)，直到對系統(tǒng)中的每個(gè)模塊給出足夠詳細(xì)的過程性描述。主要任務(wù)如下：為每個(gè)模塊確定采用的算法，選擇某種適當(dāng)?shù)墓ぞ弑磉_(dá)算法的過程，寫出模塊的詳細(xì)過程性描述；確定每一模塊使用的數(shù)據(jù)結(jié)構(gòu)；確定模塊接口的細(xì)節(jié)，包括對系統(tǒng)外部的接口和用戶界面，對系統(tǒng)內(nèi)部其它模塊的接口，以及模塊輸入數(shù)據(jù)、輸出數(shù)據(jù)及局部數(shù)據(jù)的全部細(xì)節(jié)。要為每一個(gè)模塊設(shè)計(jì)出一組測試用例，以便在編碼階段對模塊代碼（即程序）進(jìn)行預(yù)定的測試，模塊的測試用例是軟件測試計(jì)劃的重要組成部分，通常應(yīng)包括輸入數(shù)據(jù)，期望輸出等內(nèi)容。322 詳細(xì)設(shè)計(jì)的方法詳細(xì)設(shè)計(jì)的方法程序流程圖、N-S 圖、PAD 圖、IPO 圖本系統(tǒng)在開發(fā)過程中所采用的詳細(xì)設(shè)計(jì)方法為 IPO 圖：1、住院病人、病區(qū)和職工管理模塊模塊 IPO 圖：I IO OP P病人、病區(qū)和職工的信息提供相應(yīng)的界面供操作人員錄入保存到表2、住院病人、病區(qū)和職工的查詢模塊 IPO 圖：I IO OP P查詢內(nèi)容的設(shè)定提供相應(yīng)的界面供操作人員操作1顯示查詢的結(jié)果2統(tǒng)計(jì)相關(guān)信息113、收費(fèi)管理模塊 IPO 圖：I IO OP P收費(fèi)項(xiàng)目等的設(shè)置提供相應(yīng)的界面供操作人員操作保存到收入/支出項(xiàng)目表4、打印模塊 IPO 圖：I IO OP P選擇打印項(xiàng)提供相應(yīng)的界面供操作人員操作打印5、用戶管理模塊的 IPO 圖I IO OP P增加、刪除、修改用戶信息提供相應(yīng)的界面供操作人員操作保存到用戶管理表12第四章第四章 數(shù)據(jù)庫設(shè)計(jì)數(shù)據(jù)庫設(shè)計(jì)41 數(shù)據(jù)庫數(shù)據(jù)庫 Access 簡介簡介Access 中文版是 Microsoft Office 2000 套裝軟件的數(shù)據(jù)庫管理系統(tǒng)軟件，是目前比較流行的小型桌面數(shù)據(jù)庫管理系統(tǒng)，它適用于小型企業(yè)、學(xué)校、個(gè)人等用戶，可以通過多種方式實(shí)現(xiàn)對數(shù)據(jù)收集、分類、篩選處理，提供用戶查詢或打印報(bào)表。Access 具有良好的界面，采用了與 Windows 和 Microsoft Office 系列軟件完全一致的風(fēng)格，用戶可以通過菜單和對話框操作，不用編寫任何命令便能有效地實(shí)現(xiàn)各種功能的操作，完成數(shù)據(jù)管理任務(wù)。Microsoft Office 的一個(gè)集成化的程序設(shè)計(jì)語言是VBA(Visual Basic for Applications)，使用 VBA 可以創(chuàng)建非常實(shí)用的數(shù)據(jù)庫應(yīng)用系統(tǒng)。Access 可以作為個(gè)人計(jì)算機(jī)終端和大型主機(jī)系統(tǒng)之間的橋梁。通過如 SQL、ODBC 等特定技術(shù)，方便地存儲、檢索和處理服務(wù)器平臺上的關(guān)鍵信息，提供了靈活、可靠、安全的客戶/服務(wù)器解決方案。Access 可以接受多種格式的數(shù)據(jù)，從而方便了用戶在不同系統(tǒng)之間進(jìn)行數(shù)據(jù)轉(zhuǎn)換。隨著 Internet 網(wǎng)絡(luò)應(yīng)用的發(fā)展，Access 還增加了使用信息發(fā)布 Web 向?qū)Ш陀?HTML格式導(dǎo)出對象的功能。數(shù)據(jù)庫的概念數(shù)據(jù)庫是一種存儲數(shù)據(jù)并對數(shù)據(jù)進(jìn)行操作的工具。數(shù)據(jù)庫的作用在于組織和表達(dá)信息，簡而言之，數(shù)據(jù)庫就是信息的集合。計(jì)算機(jī)的數(shù)據(jù)庫可以分為兩類：非關(guān)系數(shù)據(jù)庫（flat-file）和關(guān)系數(shù)據(jù)庫（relational）。關(guān)系數(shù)據(jù)庫中包含了多個(gè)數(shù)據(jù)表的信息，數(shù)據(jù)庫含有各個(gè)不同部分的術(shù)語，象記錄、域等。 新建一個(gè)數(shù)據(jù)庫創(chuàng)建任何一個(gè)數(shù)據(jù)庫的第一步是仔細(xì)的規(guī)劃數(shù)據(jù)庫，設(shè)計(jì)必須是靈活的、有邏輯的。創(chuàng)建一個(gè)數(shù)據(jù)庫結(jié)構(gòu)的過程被認(rèn)為是數(shù)據(jù)模型設(shè)計(jì)。修改已建的數(shù)據(jù)庫數(shù)據(jù)庫的修改分為：添加、編輯和刪除記錄。這三種操作均可由 Visual Basic 創(chuàng)建的程序來完成，下面的章節(jié)將詳細(xì)描述實(shí)現(xiàn)的具體方法。實(shí)現(xiàn)數(shù)據(jù)庫之間的聯(lián)系13數(shù)據(jù)庫之間的關(guān)系指明兩個(gè)庫之間共享一個(gè)共同的關(guān)鍵字值。一個(gè)連接是指一種虛擬的表，這種表是在當(dāng)用戶要求從相互關(guān)聯(lián)的各個(gè)不同的表中獲取信息時(shí)建立的，關(guān)鍵字段用于在相互連接的不同表中查找匹配的記錄。一個(gè)更高級的連接形式稱為自連接。這種連接是指一個(gè)表被連接到它自己的一個(gè)字段，或在不同的紀(jì)錄中由重復(fù)數(shù)據(jù)的組合字段。數(shù)據(jù)庫中有三種不同類型的關(guān)鍵字：主關(guān)鍵字、組合關(guān)鍵字和外關(guān)鍵字。在表中使用的關(guān)鍵字類型用于描述庫表示什么以及在數(shù)據(jù)庫中如何與其它的庫建立關(guān)系。42 數(shù)據(jù)庫需求分析數(shù)據(jù)庫需求分析根據(jù)調(diào)查有關(guān)單位的住院病人、病區(qū)和職工管理的實(shí)際情況，分析得到如下的數(shù)據(jù)庫結(jié)構(gòu)。住院患者資料表：入院科別表：14交費(fèi)情況表：用戶表：1543 測試用例測試用例住院患者資料表的測試用例：入院科別表的測試用例：16交費(fèi)情況表的測試用例：用戶表的測試用例：17第五章第五章 系統(tǒng)的實(shí)現(xiàn)系統(tǒng)的實(shí)現(xiàn)51 系統(tǒng)登錄模塊的實(shí)現(xiàn)系統(tǒng)登錄模塊的實(shí)現(xiàn)1流程圖2界面：界面包括的控件有標(biāo)簽、文本框、命令按鈕等控件。3實(shí)現(xiàn)過程：第一步將所需的控件放到窗體的相應(yīng)位置；方法：首先在“工具箱”中選中所需的控件圖標(biāo)，然后在表單的恰當(dāng)位置上單擊鼠標(biāo)并拖動鼠標(biāo)，即可把由所選取的控件生成的對象添加到窗體上。如下圖：YN開始輸入登錄密碼是否正確主界面18第二步，選擇窗體或控件進(jìn)行屬性設(shè)置，如圖為窗體的屬性設(shè)置界面:第三步雙擊相應(yīng)的控件，在控件的相應(yīng)過程中編寫代碼：如此窗體上“登錄”與“退出”按鈕的代碼如下：19并且具有改變“登錄”菜單為“注銷用戶”菜單的功能。Private Sub Command2_Click()Unload MeEnd Sub此程序段中，“IF”語句的作用是判斷用戶輸入的用戶名與密碼和數(shù)據(jù)庫的是否相同，如果相同，則打開菜單項(xiàng)并執(zhí)行 unload me，如果用戶名或密碼輸入錯(cuò)誤，則提示：使用戶重新輸入用戶名或密碼。Unload me 語句的作用是下載窗體。打開菜單改變登錄菜單為注銷菜單設(shè)置的大小與位置20此窗體上另外還有 Data1、Text3 二個(gè)控件在程序運(yùn)行時(shí)是看不到的，它們的作用是使 VB 與 Access 數(shù)據(jù)庫相連，然后判斷用戶輸入的用戶名與密碼是否與數(shù)據(jù)庫中的一致，如果一致，則允許用戶進(jìn)入系統(tǒng)。此三個(gè)控件的創(chuàng)建方法如下：首先，將 Data、Text 控件拖放到窗體上，其次，設(shè)置它們的屬性：（1）Data1 控件的屬性設(shè)置如下圖：此兩個(gè)屬性的作用是保證 Data 控件與數(shù)據(jù)庫相連。數(shù)據(jù)庫的名稱數(shù)據(jù)庫中的表名21Visible 屬性是使此控件運(yùn)行時(shí)在窗體上不顯示。（2）Text3 控件的屬性設(shè)置如下：Visible 屬性的設(shè)置同 Data1 控件。5 52 2 主界面的實(shí)現(xiàn)主界面的實(shí)現(xiàn)主界面是用菜單形式表現(xiàn)的，如圖：運(yùn)行時(shí)是否隱藏此數(shù)據(jù)控件綁定到何數(shù)據(jù)庫此數(shù)據(jù)控件綁定到何字段22菜單的制作過程如下：首先通過“工具”菜單中的“菜單編輯器”調(diào)出菜單編輯器，然后進(jìn)行菜單的設(shè)置，如下圖： 此過程中要注意各菜單的名稱唯一，還要注意菜單的級別，另外此設(shè)計(jì)過程中我們還可以給菜單加快捷鍵。調(diào)節(jié)菜單的級別設(shè)置菜單是否有效快捷鍵設(shè)置23最后設(shè)置如下的代碼（只要單擊菜單即可設(shè)置各菜單代碼），代碼如下：主要是通過 Show 方法調(diào)用相應(yīng)的窗體。53 住院手續(xù)模塊的實(shí)現(xiàn)住院手續(xù)模塊的實(shí)現(xiàn)531 入院登記模塊的實(shí)現(xiàn)：入院登記模塊的實(shí)現(xiàn)：1、流程圖：2、運(yùn)行界面：入院的運(yùn)行界面：NY開始增加病人是否繼續(xù)退出241實(shí)現(xiàn)過程：（以入院為例）第一步將所需的控件放到窗體的相應(yīng)位置；方法：首先在“工具箱”中選中所需的控件圖標(biāo)，然后在表單的恰當(dāng)位置上單擊鼠標(biāo)并拖動鼠標(biāo)，即可把由所選取的控件生成的對象添加到窗體上。如下圖：第二步，選擇窗體或控件進(jìn)行屬性設(shè)置，同上一小結(jié)。 其它屬性和控件的設(shè)置方法類似。第三步雙擊相應(yīng)的控件，在控件的相應(yīng)過程中編寫代碼：的代碼為：25關(guān)鍵的有方法：addnew、update、delete、edit 等。此窗體上用了 1 個(gè) Adodc 控件，Adodc1 用來連接入院科別表。使用方法是首先通過Adodc 控件與數(shù)據(jù)庫相連，然后將各數(shù)據(jù)項(xiàng)與數(shù)據(jù)字段相連。Adodc1 控件的屬性為： 如科別的控件的主要屬性設(shè)置如下：連接數(shù)據(jù)庫數(shù)據(jù)庫中的何表26其他控件的設(shè)置同。出院管理類型，主要以有無入院/出院時(shí)間判斷病人是住院狀態(tài)還是出院狀態(tài)。532 收取押金模塊的實(shí)現(xiàn)收取押金模塊的實(shí)現(xiàn)1運(yùn)行界面：2實(shí)現(xiàn)過程：列表數(shù)據(jù)來源顯示的字段顯示數(shù)據(jù)的來源列表的字段27界面的實(shí)現(xiàn)方法同上，下面主要看關(guān)鍵代碼：Text1 的改變事件的代碼：Private Sub Text1_Change() SQL = select * from 住院患者資料 where 住院號= & Trim(Text1.Text) & Data1.RecordSource = SQL Data1.Refresh If Data1.Recordset.EOF Then MsgBox 沒有此 住院號 ,請核對住院號！, , 提示 Else Label5.Visible = True Label6.Visible = True Label7.Visible = True Label8.Visible = True Label9.Visible = True Label10.Visible = True Text2.Visible = True Text3.Visible = True Text4.Visible = True Text5.Visible = True Text6.Visible = True Data2.Recordset.AddNew Text8.Text = Text1.Text Text7.Text = 預(yù)收 Text6.Text = yf Text9.Text = Date Label1.Caption = Date End IfEnd Sub28主要作用：通過 SQL 語句查詢出此此住院號的記錄并顯示結(jié)果。然后再增加預(yù)收費(fèi)用，如下：Private Sub Text5_Change()Text11.Text = Text5.TextEnd SubPrivate Sub Text5_LostFocus()Text10.Text = Val(Text10.Text) + Val(Text11.Text)End Sub數(shù)據(jù)庫的實(shí)現(xiàn)方法同前，不再介紹。533 零用清單模塊的實(shí)現(xiàn)1、運(yùn)行界面：2、實(shí)現(xiàn)方法：主要作用：增加預(yù)支項(xiàng)目，并完成與預(yù)收費(fèi)用的比較，作出判斷。代碼如下：29534 出院打票模塊的實(shí)現(xiàn)出院打票模塊的實(shí)現(xiàn)1、運(yùn)行界面：替換并判斷是否超支完成自動總價(jià)計(jì)算302、實(shí)現(xiàn)方法：首先根據(jù)住院號查找并出院，再打印出院憑證。代碼如下：Private Sub Command1_Click() Text1(12) = Date MsgBox 出院成功！祝君身體健康！, , 提示End SubPrivate Sub Command2_Click()SQL = select * from 住院患者資料 where 住院號= & Trim(Text1(0).Text) & Data1.RecordSource = SQLData1.RefreshIf Data1.Recordset.EOF Then MsgBox 住院號錯(cuò)！, , 提示End IfEnd Sub實(shí)現(xiàn)查找功能。Private Sub Command3_Click()If Len(Trim(Text1(0).Text) = 0 Then MsgBox 請輸入住院號！, , 提示31Else If DataEnvironment1.rs 打印費(fèi)用.State adStateClosed Then DataEnvironment1.rs 打印費(fèi)用.Close End If DataEnvironment1.Commands(打印費(fèi)用).Parameters(0).Value = Trim(Text1(0).Text) Set DataReport4.DataSource = DataEnvironment1 DataReport4.DataMember = 打印費(fèi)用 DataReport4.ShowEnd IfEnd Sub根據(jù)住院號打印。主要是調(diào) datareport4 打印，其設(shè)計(jì)界面如下：它的數(shù)據(jù)源為 DataEnvironment1，界面如下：32通過 SQL 語句 SELECT * FROM 住院患者資料 WHERE 住院號 = ?實(shí)現(xiàn)。535 費(fèi)用查詢費(fèi)用查詢/明細(xì)模塊的實(shí)現(xiàn)明細(xì)模塊的實(shí)現(xiàn)1、運(yùn)行界面：2、實(shí)現(xiàn)方法通過控件 SSTAB 實(shí)現(xiàn)。每一頁實(shí)現(xiàn)一個(gè)查找功能。其中的查詢語句與前面的章節(jié)相似，不再重復(fù)。54 住院報(bào)表模塊的實(shí)現(xiàn)住院報(bào)表模塊的實(shí)現(xiàn)541 在院名冊的實(shí)現(xiàn)在院名冊的實(shí)現(xiàn)2運(yùn)行界面：332實(shí)現(xiàn)過程：主要通過 DataReport1 實(shí)現(xiàn)，設(shè)計(jì)界面如下：設(shè)計(jì)方法同上節(jié)。542 住院住院/出院查詢模塊的實(shí)現(xiàn)出院查詢模塊的實(shí)現(xiàn)1、運(yùn)行界面：342、實(shí)現(xiàn)的方法以住院查詢?yōu)槔榻B。界面設(shè)計(jì)同前，主要用了一個(gè) combo 控件，用來選擇查詢的條件，代碼如下：35查詢語句主要通過 SQL 實(shí)現(xiàn)。查詢出院人員的實(shí)現(xiàn)方法相同，在此不再介紹。543 清單查詢模塊的實(shí)現(xiàn)方法清單查詢模塊的實(shí)現(xiàn)方法1運(yùn)行界面：查詢滿足條件的記錄設(shè)置控件的enable 屬性36實(shí)現(xiàn)方法同前。涉及到 DataReport2 和 DataReport5 兩個(gè)報(bào)表。55 病區(qū)管理模塊的實(shí)現(xiàn)病區(qū)管理模塊的實(shí)現(xiàn)1流程圖：NY開始增加刪除修改查詢病區(qū)信息是否繼續(xù)退出2運(yùn)行界面：373實(shí)現(xiàn)過程：界面的設(shè)計(jì)方法與實(shí)現(xiàn)方法同前。主要作用：管理病區(qū)的信息。56 職工人事管理模塊的實(shí)現(xiàn)職工人事管理模塊的實(shí)現(xiàn)1流程圖：38NY開始增加刪除查詢?nèi)耸滦畔⑹欠窭^續(xù)退出2運(yùn)行界面：393實(shí)現(xiàn)過程：界面的設(shè)計(jì)方法與實(shí)現(xiàn)方法同前。主要作用：實(shí)現(xiàn)職工人事信息的管理。57 版本信息模塊的實(shí)現(xiàn)版本信息模塊的實(shí)現(xiàn)1運(yùn)行界面：2實(shí)現(xiàn)過程主要通過圖片框、標(biāo)簽、按鈕控件實(shí)現(xiàn)。通過標(biāo)簽框顯示相關(guān)的信息。58 用戶管理模塊的實(shí)現(xiàn)用戶管理模塊的實(shí)現(xiàn)界面如下圖：40數(shù)據(jù)庫的連接方法同上。主要功能：實(shí)現(xiàn)密碼的更改，增加、刪除、修改用戶信息。41第六章第六章 系統(tǒng)使用說明系統(tǒng)使用說明61 使用說明使用說明1、運(yùn)行于 Windows 98 以上操作系統(tǒng)。 建議分辨率：800*600。2、數(shù)據(jù)庫的默認(rèn)路徑：C:住院處信息管理系統(tǒng) Hospital.mdb。3、系統(tǒng)默認(rèn)用戶名、密碼如下：用戶名密碼Admin1Admin1Admin2Admin2Admin3Admin362 運(yùn)行環(huán)境運(yùn)行環(huán)境1、運(yùn)行環(huán)境：Windows 98 以上操作系統(tǒng)。2、JET 數(shù)據(jù)引擎、ADO 數(shù)據(jù)引擎。42第七章第七章 設(shè)計(jì)心得設(shè)計(jì)心得經(jīng)過二個(gè)多月的設(shè)計(jì)和開發(fā)，住院處信息管理系統(tǒng)基本開發(fā)完畢。在此期間本人閱讀了大量 VB 及管理信息系統(tǒng)的教程，收獲非淺，比如：之前本人對DATA 及 ADOBC 控件不熟悉，通過這次畢業(yè)設(shè)計(jì)，我能熟練的操作這兩個(gè)控件；再比如說在用 COMBO 控件時(shí)不知道如何向其中添加列表項(xiàng)，走了許多彎路，查詢了縱多資料，最后終于找到了一種捷徑的方法，解決了我設(shè)計(jì)中的一大難題。因此，在本次的畢業(yè)設(shè)計(jì)中，為搞清控件的使用方法、編程的各個(gè)難點(diǎn)、掌握面向?qū)ο蟮木幊趟枷?，本人查過相關(guān)的教材、查詢過相關(guān)的網(wǎng)站、請教過指導(dǎo)教師。在摸索中學(xué)習(xí)，在困惑中探索，終于探究了一套較好的學(xué)習(xí)面向?qū)ο蟮某绦蛟O(shè)計(jì)的方法。但是由于畢業(yè)設(shè)計(jì)時(shí)間較短，所以該系統(tǒng)還有許多不盡如人意的地方，比如聯(lián)機(jī)文檔比較少，用戶界面不夠美觀，出錯(cuò)處理不完善等多方面問題。這些都有待進(jìn)一步改善。43參考文獻(xiàn)參考文獻(xiàn)1.數(shù)據(jù)庫系統(tǒng)原理與應(yīng)用 閃四清 清華大學(xué)出版社 1999 年2.Visual Basic 6.0 程序設(shè)計(jì) 劉世峰 中央廣播電大出版社 2003 年3.Visual Basic 程序設(shè)計(jì) 陳 明 中央廣播電大出版社 2001 年4.軟件工程 楊文龍 電子工業(yè)出版社 2001 年5.管理信息系統(tǒng) 薛華成 清華大學(xué)出版社 1996 年