住院處信息管理系統(tǒng)計算機(jī)畢業(yè)設(shè)計(論文)

1、住院信息管理系統(tǒng)住院信息管理系統(tǒng) 目目 錄錄 第一章第一章 緒緒 論論 .3 11 課題簡介 .3 12 開發(fā)的意義 .3 13 團(tuán)隊構(gòu)成 .4 第二章第二章 開發(fā)環(huán)境及實現(xiàn)技術(shù)開發(fā)環(huán)境及實現(xiàn)技術(shù) .5 21 開發(fā)環(huán)境 .5 22 開發(fā)工具簡介 .5 第三章第三章 系統(tǒng)設(shè)計系統(tǒng)設(shè)計 .8 31 概要設(shè)計 .8 311概要設(shè)計階段的主要任務(wù).8 312概要設(shè)計的過程.8 313概要設(shè)計的原則.8 314系統(tǒng)功能分析.8 32 詳細(xì)設(shè)計 .10 321詳細(xì)設(shè)計的任務(wù).10 322詳細(xì)設(shè)計的方法.10 第四章第四章 數(shù)據(jù)庫設(shè)計數(shù)據(jù)庫設(shè)計 .12 41 數(shù)據(jù)庫 access簡介.12 42 數(shù)據(jù)庫需求

2、分析 .13 43 測試用例 .15 第五章第五章 系統(tǒng)的實現(xiàn)系統(tǒng)的實現(xiàn) .17 51 系統(tǒng)登錄模塊的實現(xiàn) .17 52 主界面的實現(xiàn) .21 53 住院手續(xù)模塊的實現(xiàn) .23 531入院登記模塊的實現(xiàn)：.23 532收取押金模塊的實現(xiàn).26 534出院打票模塊的實現(xiàn).29 535費(fèi)用查詢/明細(xì)模塊的實現(xiàn).32 54 住院報表模塊的實現(xiàn) .32 541在院名冊的實現(xiàn).32 542住院/出院查詢模塊的實現(xiàn).33 543清單查詢模塊的實現(xiàn)方法.35 55 病區(qū)管理模塊的實現(xiàn) .35 56 職工人事管理模塊的實現(xiàn) .37 57 版本信息模塊的實現(xiàn) .38 58 用戶管理模塊的實現(xiàn) .39 第六章第六

3、章 系統(tǒng)使用說明系統(tǒng)使用說明 .40 61 使用說明 .40 62 運(yùn)行環(huán)境 .40 第七章第七章 設(shè)計心得設(shè)計心得 .41 參考文獻(xiàn)參考文獻(xiàn) .42 第一章第一章 緒緒 論論 11 課題簡介課題簡介 住院處信息管理系統(tǒng)是每一所醫(yī)院管理住院病人、病區(qū)和職工收入和支出 的不可缺少的一個管理信息系統(tǒng)，它的內(nèi)容對于醫(yī)院的管理者來說是至關(guān)重要 的，所以住院處信息管理系統(tǒng)應(yīng)該能夠為每一個醫(yī)院的管理者提供充足的信息 和快捷的查詢手段，大大的方便醫(yī)院的管理者的合理管理。 隨著科學(xué)技術(shù)的不斷提高，計算機(jī)科學(xué)日漸成熟，其強(qiáng)大的功能已為人們 深刻認(rèn)識，它已進(jìn)入人類社會的各個領(lǐng)域并發(fā)揮著越來越重要的作用。 作為計算

4、機(jī)應(yīng)用的一部分，使用計算機(jī)對住院病人、病區(qū)和職工進(jìn)行管理， 具有著手工管理所無法比擬的優(yōu)點(diǎn)，如:檢索迅速、查找方便、可靠性高、存儲 量大、保密性好、壽命長、成本低等。這些優(yōu)點(diǎn)能夠極大地提高住院病人、病 區(qū)和職工管理的效率，也是醫(yī)院管理的科學(xué)化、正規(guī)化管理，與先進(jìn)科學(xué)技術(shù) 接軌的重要條件。 因此，開發(fā)這樣一套管理軟件成為很有必要的事情，對于我們即將計算機(jī) 專業(yè)畢業(yè)的學(xué)生來說，也是一次將計算機(jī)應(yīng)用于現(xiàn)實管理的一次很有意義的實 踐活動。 12 開發(fā)的意義開發(fā)的意義 1計算機(jī)已經(jīng)成為我們學(xué)習(xí)和工作的得力助手，使用其可方便的管理住院 病人、病區(qū)和職工 今天，計算機(jī)的價格已經(jīng)十分低廉，性能卻有了長足的進(jìn)步

5、。它已經(jīng)應(yīng)用 于許多領(lǐng)域。 現(xiàn)在我國的住院病人、病區(qū)和職工管理水平絕大部分還停留在紙介質(zhì)的基 礎(chǔ)上，這樣的機(jī)制已經(jīng)不能適應(yīng)時代的發(fā)展，因為它浪費(fèi)了許多人力和物力， 在信息時代這種傳統(tǒng)的管理方法必然被計算機(jī)為基礎(chǔ)的信息管理所取代。 我作為一個計算機(jī)應(yīng)用專業(yè)的畢業(yè)生，希望可以在這方面有所貢獻(xiàn)。改革 的總設(shè)計師鄧小平同志說過“科學(xué)技術(shù)是第一生產(chǎn)力”，我希望能用我所學(xué)的 知識編制出一個實用的程序來幫助醫(yī)院進(jìn)行住院病人、病區(qū)和職工管理。 開發(fā)這一系統(tǒng)的好處大約有以下幾點(diǎn)： 第一、可以存儲歷年住院病人、病區(qū)和職工的信息，安全、高效； 第二、只需一到二名檔案錄入員即可操作系統(tǒng)，節(jié)省人力； 第三、可以迅速查到

6、住院病人、病區(qū)和職工的各類信息。 2為將來醫(yī)院上網(wǎng)做好準(zhǔn)備 跟據(jù) 2003 年中國電信的調(diào)查報告顯示我國的上網(wǎng)人數(shù)已達(dá)到 1870 萬，互 聯(lián)網(wǎng)已經(jīng)十分普及，本系統(tǒng)為醫(yī)院將來的上網(wǎng)作了先期工作，比如醫(yī)院的網(wǎng)絡(luò) 管理模式的建立。 13 團(tuán)隊構(gòu)成團(tuán)隊構(gòu)成 指導(dǎo)教師：* 成員：* 第二章第二章 開發(fā)環(huán)境及實現(xiàn)技術(shù)開發(fā)環(huán)境及實現(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

7、basic 6.0 是 windows 應(yīng)用程序開發(fā)工具，使目前最為 廣泛的、易學(xué)易用的面向?qū)ο蟮拈_發(fā)工具。visual basic 提供了大量的控件， 這些控件可用于設(shè)計界面和實現(xiàn)各種功能，減少了編程人員的工作量，也簡化 了界面設(shè)計過程，從而有效的提高了應(yīng)用程序的運(yùn)行效率和可靠性。故而，實 現(xiàn)本系統(tǒng) vb 是一個相對較好的選擇。 access2000 就是關(guān)系數(shù)據(jù)庫開發(fā)工具，數(shù)據(jù)庫能匯集各種信息以供查詢、 存儲和檢索。access 的優(yōu)點(diǎn)在于它能使用數(shù)據(jù)表示圖或自定義窗體收集信息。 數(shù)據(jù)表示圖提供了一種類似于 excel 的電子表格，可以使數(shù)據(jù)庫一目了然。另 外，access 允許創(chuàng)建自定義

8、報表用于打印或輸出數(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)，可以在一個數(shù)據(jù)包中同時擁有桌面數(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ù)庫引擎，從而給用戶提

9、供了豐富 的數(shù)據(jù)類型。 data 控件在數(shù)據(jù)庫中的信息與將信息顯示給用戶看的 visual basic 程序 之間架起了一座橋梁。我們可以設(shè)置 data 控件的各個屬性，告訴它要調(diào)用那個 數(shù)據(jù)庫的哪個部分。缺省情況下，data 控件根據(jù)數(shù)據(jù)庫中的一個或多個數(shù)據(jù)表 建立一個 dynaset-type（動態(tài)集合）類型的記錄集合。一個記錄集合是動態(tài)的 也就意味著，當(dāng)原來的數(shù)據(jù)表中的容改變了以后，該記錄集合中的記錄也會隨 之改變。data 控件還提供了用來瀏覽不同記錄的各種跳轉(zhuǎn)按鈕。將 data 控件 放置在窗體中之后，我們還必須在該控件與要處理的數(shù)據(jù)庫之間建立聯(lián)系。 ado 是 mcrosoft 提

10、出的第三種數(shù)據(jù)庫訪問對象，是 microsoft 數(shù)據(jù)庫訪問 技術(shù)的一個主要發(fā)展方向，ado 將 ole db 封裝在一個數(shù)據(jù)對象中，使得 vb 程 序中以方便地實現(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ù)怎樣被存儲和檢索

11、的軟 件系統(tǒng)，是應(yīng)用程序與物理數(shù)據(jù)庫之間的橋梁。它把應(yīng)用程序的請求翻譯成對 各種類型數(shù)據(jù)庫的物理操作,并向應(yīng)用程序返回結(jié)果。 3數(shù)據(jù)倉庫:數(shù)據(jù)倉庫是包含數(shù)據(jù)庫表的一個或多個文件，是存放數(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ù)訪問接口來實現(xiàn)。 在 vb 中，主要的數(shù)據(jù)訪問接口有三種：數(shù)據(jù)存取對象(data access o

12、bject；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ù)源，也稱為本地數(shù)據(jù)庫。由于是由 jet 引擎直接創(chuàng)建和操作這些數(shù)據(jù)庫，可以提供最大程度的靈活性和速度。 2、外部數(shù)據(jù)庫即索引順序存取方法(isam)數(shù)據(jù)庫，例如 btrieve、dbase、fox

13、pro 以及 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?？墒褂?odbc object 直接把命令傳遞給服務(wù)器處理，以創(chuàng)建真正的 客戶機(jī)/服務(wù)器程序。 第三章第三章 系統(tǒng)設(shè)計系統(tǒng)設(shè)計 31 概要設(shè)計概要設(shè)計 311 概要設(shè)計階段的主要任務(wù)概要設(shè)計階段的主要任務(wù) 本人先審查軟件

14、計劃、軟件需求分析提供的文檔，提出最佳推薦方案， 用系統(tǒng)流程圖，組成系統(tǒng)物理元素清單，成本效益分析，系統(tǒng)的進(jìn)度計劃，供 指導(dǎo)老師審定，審定后進(jìn)入設(shè)計。 確定模塊結(jié)構(gòu)，劃分功能模塊，將軟件功能需求分配給所劃分的最小單 元模塊。確定模塊間的聯(lián)系，確定數(shù)據(jù)結(jié)構(gòu)、文件結(jié)構(gòu)、數(shù)據(jù)庫模式，確定測 試方法與策略。 編寫概要設(shè)計說明書，用戶手冊，測試計劃，選用相關(guān)的軟件工具來描 述軟件結(jié)構(gòu)，結(jié)構(gòu)圖是經(jīng)常使用的軟件描述工具。選擇分解功能與劃分模塊的 設(shè)計原則，例如模塊劃分獨(dú)立性原則，信息隱蔽原則等。 312 概要設(shè)計的過程概要設(shè)計的過程 概要設(shè)計要先進(jìn)行系統(tǒng)設(shè)計，復(fù)審系統(tǒng)計劃與需求分析，確定系統(tǒng)具體的 實施方案

15、；然后進(jìn)行結(jié)構(gòu)設(shè)計，確定軟件結(jié)構(gòu)。 313 概要設(shè)計的原則概要設(shè)計的原則 將軟件劃分成若干獨(dú)立成分的依據(jù)。 如何表示不同的成分內(nèi)的功能細(xì)節(jié)和數(shù)據(jù)結(jié)構(gòu)。 如何統(tǒng)一衡量軟件設(shè)計的技術(shù)質(zhì)量。 314 系統(tǒng)功能分析系統(tǒng)功能分析 根據(jù)學(xué)校的教務(wù)人員提供的學(xué)生檔案管理的信息，預(yù)測開發(fā)的管理系統(tǒng)的 達(dá)到的功能如下： 第一部分：系統(tǒng)用戶管理 要求：用戶分四類：超級用戶一切功能可用、管理員不可添加系統(tǒng)用戶、 修改用戶密碼、不可實現(xiàn)收費(fèi)功能、收費(fèi)員僅可查詢信息、收費(fèi)功能、普通 用戶僅可查詢信息 第二部分：患者基本資料 要求：實現(xiàn)患者資料的新增、修改、辦理患者出院、查詢患者資料。 第三部分病房管理 要求：實現(xiàn)新增病

16、人、病人的轉(zhuǎn)科轉(zhuǎn)房、病房明細(xì)查詢、患者退房 第四部分 主治醫(yī)師管理 要求：實現(xiàn)主治醫(yī)師資料的新增、修改、查詢，有統(tǒng)計各個主治醫(yī)師的治 療效果 第五部分 收費(fèi)管理 要求：實現(xiàn)收費(fèi)項目列表、查詢各患者交費(fèi)情況的查詢，及收費(fèi)窗口 第五部分 統(tǒng)計打印報表 要求：實現(xiàn)當(dāng)日出/入院病人數(shù)量和人員列表，實現(xiàn)各患者費(fèi)用情況的打印 第六部分 幫助 制作幫助文檔，介紹各部分功能即可根據(jù)以上分析，該系統(tǒng)考慮將整個系 統(tǒng)分解成如圖 3-1 模塊結(jié)構(gòu)圖: 主界面主界面 系系 統(tǒng)統(tǒng) 管管 理理 住住 院院 手手 續(xù)續(xù) 管管 理理 住住 院院 報報 表表 管管 理理 職職 工工 人人 事事 管管 理理 病病 區(qū)區(qū) 管管 理

17、理 登錄登錄 圖 3-1 模塊結(jié)構(gòu)圖 并且在系統(tǒng)的開發(fā)過程中，我盡量注意模塊的高內(nèi)聚、低耦合，使得系統(tǒng) 的整體性能提高，并且也有利于投入使用后的系統(tǒng)維護(hù)。 32 詳細(xì)設(shè)計詳細(xì)設(shè)計 321 詳細(xì)設(shè)計的任務(wù)詳細(xì)設(shè)計的任務(wù) 詳細(xì)設(shè)計就是要在概要設(shè)計的結(jié)果的基礎(chǔ)上，考慮“怎樣實現(xiàn)”這個軟件 系統(tǒng)，直到對系統(tǒng)中的每個模塊給出足夠詳細(xì)的過程性描述。主要任務(wù)如下： 為每個模塊確定采用的算法，選擇某種適當(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é)。

18、要為每一個模塊設(shè)計出一組 測試用例，以便在編碼階段對模塊代碼（即程序）進(jìn)行預(yù)定的測試，模塊的測 試用例是軟件測試計劃的重要組成部分，通常應(yīng)包括輸入數(shù)據(jù)，期望輸出等內(nèi) 容。 322 詳細(xì)設(shè)計的方法詳細(xì)設(shè)計的方法 程序流程圖、n-s 圖、pad 圖、ipo 圖 本系統(tǒng)在開發(fā)過程中所采用的詳細(xì)設(shè)計方法為 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é)果

19、 2統(tǒng)計相關(guān) 信息 3、收費(fèi)管理模塊 ipo 圖： i io op p 收費(fèi)項目等的 設(shè)置 提供相應(yīng) 的界面供 操作人員 操作 保存到收入/ 支出項目表 4、打印模塊 ipo 圖： i io op p 選擇打印項提供相應(yīng) 的界面供 操作人員 操作 打印 5、用戶管理模塊的 ipo 圖 i io op p 增加、刪除、 修改用戶信息 提供相應(yīng) 的界面供 操作人員 操作 保存到用戶 管理表 第四章第四章 數(shù)據(jù)庫設(shè)計數(shù)據(jù)庫設(shè)計 41 數(shù)據(jù)庫數(shù)據(jù)庫 access 簡介簡介 access 中文版是 microsoft office 2000 套裝軟件的數(shù)據(jù)庫管理系統(tǒng)軟件， 是目前比較流行的小型桌面數(shù)據(jù)庫

20、管理系統(tǒng)，它適用于小型企業(yè)、學(xué)校、個人 等用戶，可以通過多種方式實現(xiàn)對數(shù)據(jù)收集、分類、篩選處理，提供用戶查詢 或打印報表。 access 具有良好的界面，采用了與 windows 和 microsoft office 系列軟 件完全一致的風(fēng)格，用戶可以通過菜單和對話框操作，不用編寫任何命令便能 有效地實現(xiàn)各種功能的操作，完成數(shù)據(jù)管理任務(wù)。microsoft office 的一個集 成化的程序設(shè)計語言是 vba(visual basic for applications)，使用 vba 可以 創(chuàng)建非常實用的數(shù)據(jù)庫應(yīng)用系統(tǒng)。 access 可以作為個人計算機(jī)終端和大型主機(jī)系統(tǒng)之間的橋梁。通過如 s

21、ql、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ī)的數(shù)據(jù)庫可以分為兩 類：非關(guān)系數(shù)據(jù)庫（flat-file）和關(guān)系數(shù)據(jù)庫（relational）。關(guān)系數(shù)據(jù)庫中 包含了多個數(shù)據(jù)表的信息，

22、數(shù)據(jù)庫含有各個不同部分的術(shù)語，象記錄、域等。 新建一個數(shù)據(jù)庫 創(chuàng)建任何一個數(shù)據(jù)庫的第一步是仔細(xì)的規(guī)劃數(shù)據(jù)庫，設(shè)計必須是靈活的、 有邏輯的。創(chuàng)建一個數(shù)據(jù)庫結(jié)構(gòu)的過程被認(rèn)為是數(shù)據(jù)模型設(shè)計。 修改已建的數(shù)據(jù)庫 數(shù)據(jù)庫的修改分為：添加、編輯和刪除記錄。這三種操作均可由 visual basic 創(chuàng)建的程序來完成，下面的章節(jié)將詳細(xì)描述實現(xiàn)的具體方法。 實現(xiàn)數(shù)據(jù)庫之間的聯(lián)系 數(shù)據(jù)庫之間的關(guān)系指明兩個庫之間共享一個共同的關(guān)鍵字值。一個連接是 指一種虛擬的表，這種表是在當(dāng)用戶要求從相互關(guān)聯(lián)的各個不同的表中獲取信 息時建立的，關(guān)鍵字段用于在相互連接的不同表中查找匹配的記錄。一個更高 級的連接形式稱為自連接。這種

23、連接是指一個表被連接到它自己的一個字段， 或在不同的紀(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ù)據(jù)庫結(jié)構(gòu)。 住院患者資料表： 入院科別表： 交費(fèi)情況表： 用戶表： 43 測試用例測試用例 住院患者資料表的測試用例： 入院科別表的測試用例： 交費(fèi)情況表的測試用例： 用戶表的測試用例： 第五章第五章 系統(tǒng)的實現(xiàn)系統(tǒng)的實現(xiàn) 51 系統(tǒng)登錄模塊的實現(xiàn)系統(tǒng)登錄模塊的實

24、現(xiàn) 1流程圖 2界面： 界面包括的控件有標(biāo)簽、文本框、命令按鈕等控件。 3實現(xiàn)過程： 第一步將所需的控件放到窗體的相應(yīng)位置；方法：首先在“工具箱”中選 中所需的控件圖標(biāo)，然后在表單的恰當(dāng)位置上單擊鼠標(biāo)并拖動鼠標(biāo)，即可把由 所選取的控件生成的對象添加到窗體上。如下圖： y n 開始 輸入登錄密碼 是否正確 主界面 第二步，選擇窗體或控件進(jìn)行屬性設(shè)置，如圖為窗體的屬性設(shè)置界面: 第三步雙擊相應(yīng)的控件，在控件的相應(yīng)過程中編寫代碼： 如此窗體上“登錄”與“退出”按鈕的代碼如下： 并且具有改變“登錄”菜單為“注銷用戶”菜單的功能。 private sub command2_click() unload

25、me end sub 此程序段中，“if”語句的作用是判斷用戶輸入的用戶名與密碼和數(shù)據(jù)庫 的是否相同，如果相同，則打開菜單項并執(zhí)行 unload me，如果用戶名或密碼 輸入錯誤，則提示： 使用戶重新輸入用戶名或密碼。 unload me 語句的作用是下載窗體。 打開菜單 改變登錄菜單為 注銷菜單 設(shè)置的大小 與位置 此窗體上另外還有 data1、text3 二個控件在程序運(yùn)行時是看不到的，它們 的作用是使 vb 與 access 數(shù)據(jù)庫相連，然后判斷用戶輸入的用戶名與密碼是否 與數(shù)據(jù)庫中的一致，如果一致，則允許用戶進(jìn)入系統(tǒng)。此三個控件的創(chuàng)建方法 如下： 首先，將 data、text 控件拖放

26、到窗體上，其次，設(shè)置它們的屬性： （1）data1 控件的屬性設(shè)置如下圖： 此兩個屬性的作用是保證 data 控件與數(shù)據(jù)庫相連。 數(shù)據(jù)庫 的名稱 數(shù)據(jù)庫中 的表名 visible 屬性是使此控件運(yùn)行時在窗體上不顯示。 （2）text3 控件的屬性設(shè)置如下： visible 屬性的設(shè)置同 data1 控件。 5 52 2 主界面的實現(xiàn)主界面的實現(xiàn) 主界面是用菜單形式表現(xiàn)的，如圖： 運(yùn)行時是否 隱藏 此數(shù)據(jù)控件綁定到 何數(shù)據(jù)庫 此數(shù)據(jù)控件綁 定到何字段 菜單的制作過程如下： 首先通過“工具”菜單中的“菜單編輯器”調(diào)出菜單編輯器，然后進(jìn)行菜 單的設(shè)置，如下圖： 此過程中要注意各菜單的名稱唯一，還要注

27、意菜單的級別，另外此設(shè)計過 程中我們還可以給菜單加快捷鍵。 調(diào)節(jié)菜單的 級別 設(shè)置菜單是 否有效 快捷鍵設(shè)置 最后設(shè)置如下的代碼（只要單擊菜單即可設(shè)置各菜單代碼），代碼如下： 主要是通過 show 方法調(diào)用相應(yīng)的窗體。 53 住院手續(xù)模塊的實現(xiàn)住院手續(xù)模塊的實現(xiàn) 531 入院登記模塊的實現(xiàn)：入院登記模塊的實現(xiàn)： 1、流程圖： 2、運(yùn)行界面： 入院的運(yùn)行界面： n y 開始 增加病人 是否繼續(xù) 退出 1實現(xiàn)過程：（以入院為例） 第一步將所需的控件放到窗體的相應(yīng)位置；方法：首先在“工具箱”中選 中所需的控件圖標(biāo)，然后在表單的恰當(dāng)位置上單擊鼠標(biāo)并拖動鼠標(biāo)，即可把由 所選取的控件生成的對象添加到窗體上

28、。如下圖： 第二步，選擇窗體或控件進(jìn)行屬性設(shè)置，同上一小結(jié)。 其它屬性和控件的設(shè)置方法類似。 第三步雙擊相應(yīng)的控件，在控件的相應(yīng)過程中編寫代碼： 的代碼為： 關(guān)鍵的有方法：addnew、update、delete、edit 等。 此窗體上用了 1 個 adodc 控件，adodc1 用來連接入院科別表。使用方法是 首先通過 adodc 控件與數(shù)據(jù)庫相連，然后將各數(shù)據(jù)項與數(shù)據(jù)字段相連。 adodc1 控件的屬性為： 如科別的控件的主要屬性設(shè)置如下： 連接數(shù)據(jù)庫 數(shù)據(jù)庫中的 何表 其他控件的設(shè)置同。 出院管理類型，主要以有無入院/出院時間判斷病人是住院狀態(tài)還是出院狀 態(tài)。 532 收取押金模塊的實

29、現(xiàn)收取押金模塊的實現(xiàn) 1運(yùn)行界面： 列表數(shù)據(jù)來源 顯示的字段 顯示數(shù)據(jù)的來源 列表的字段 2實現(xiàn)過程： 界面的實現(xiàn)方法同上，下面主要看關(guān)鍵代碼： text1 的改變事件的代碼： private sub text1_change() sql = select * from 住院患者資料 where 住院號= and as he turned to the left and ran towards them they retreated, until at last he could hear them no more. drawing his bright sword and crying _e

30、lendil! elendil!_ he crashed through the trees. a mile, maybe, from parth galen in a little glade not far from the lake he found boromir. he was sitting with his back to a great tree, as if he was resting. but aragorn saw that he was pierced with many black-feathered arrows; his sword was still in h

31、is hand, but it was broken near the hilt; his horn cloven in two was at his side. many orcs lay slain, piled all about him and at his feet. aragorn knelt beside him. boromir opened his eyes and strove to speak. at last slow words came. i tried to take the ring from frodo he said. i am sorry. i have

32、paid. his glance strayed to his fallen enemies; twenty at least lay there. they have gone: the halflings: the orcs have taken them. i think they are not dead. orcs bound them. he paused and his eyes closed wearily. after a moment he spoke again. farewell, aragorn! go to minas tirith and save my peop

33、le! i have failed. no! said aragorn, taking his hand and kissing his brow. you have conquered. few have gained such a victory. be at peace! minas tirith shall not fall! boromir smiled. which way did they go? was frodo there? said aragorn. but boromir did not speak again. alas! said aragorn. thus pas

34、ses the heir of denethor, lord of the tower of guard! this is a bitter end. now the company is all in ruin. it is i that have failed. vain was gandalfs trust in me. what shall i do now? boromir has laid it on me to go to minas tirith, and my heart desires it; but where are the ring and the bearer? h

35、ow shall i find them and save the quest from disaster? he knelt for a while, bent with weeping, still clasping boromirs hand. so it was that legolas and gimli found him. they came from the western slopes of the hill, silently, creeping through the trees as if they were hunting. gimli had his axe in

36、hand, and legolas his long knife: all his arrows were spent. when they came into the glade they halted in amazement; and then they stood a moment with heads bowed in grief, for it seemed to them plain what had happened. alas! said legolas, coming to aragorns side. we have hunted and slain many orcs

37、in the woods, but we should have been of more use here. we came when we heard the horn-but too late, it seems. i fear you have taken deadly hurt. boromir is dead, said aragorn. i am unscathed, for i was not here with him. he fell defending the hobbits, while i was away upon the hill. the hobbits! cr

38、ied gimli where are they then? where is frodo? i do not know, answered aragorn wearily. before he died boromir told me that the orcs had bound them; he did not think that they were dead. i sent him to follow merry and pippin; but i did not ask him if frodo or sam were with him: not until it was too

39、late. all that i have done today has gone amiss. what is to be done now? first we must tend the fallen, said legolas. we cannot leave him lying like carrion among these foul orcs. but we must be swift, said gimli. he would not wish us to linger. we must follow the orcs, if there is hope that any of

40、our company are living prisoners. but we do not know whether the ring-bearer is with them or not said aragorn. are we to abandon him? must we not seek him first? an evil choice is now before us! then let us do first what we must do, said legolas. we have not the time or the tools to bury our comrade

41、 fitly, or to raise a mound over him. a cairn we might build. the labour would be hard and long: there are no stones that we could use nearer than the water-side, said gimli. then let us lay him in a boat with his weapons, and the weapons of his vanquished foes, said aragorn. we will send him to the

42、 falls of rauros and give him to anduin. the river of gondor will take care at least that no evil creature dishonours his bones. quickly they searched the bodies of the orcs, gathering their swords and cloven helms and shields into a heap. see! cried aragorn. here we find tokens! he picked out from

43、the pile of grim weapons two knives, leaf-bladed, damasked in gold and red; and searching further he found also the sheaths, black, set with small red gems. no orc-tools these! he said. they were borne by the hobbits. doubtless the orcs despoiled them, but feared to keep the knives, knowing them for

44、 what they are: work of westernesse, wound about with spells for the bane of mordor. well, now, if they still live, our friends are weaponless. i will take these things, hoping against hope, to give them back. and i, said legolas, will take all the arrows that i can find, for my quiver is empty. he

45、searched in the pile and on the ground about and found not a few that were undamaged and longer in the shaft than such arrows as the orcs were accustomed to use. he looked at them closely. and aragorn looked on the slain, and he said: here lie many that are not folk of mordor. some are from the nort

46、h, from the misty mountains, if i know anything of orcs and their kinds. and here are others strange to me. their gear is not after the manner of orcs at all! there were four goblin-soldiers of greater stature, swart, slant-eyed, with thick legs and large hands. they were armed with short broad-blad

47、ed swords, not with the curved scimitars usual with orcs: and they had bows of yew, in length and shape like the bows of men. upon their shields they bore a strange device: a small white hand in the centre of a black field; on the front of their iron helms was set an s-rune, wrought of some white me

48、tal. i have not seen these tokens before, said aragorn. what do they mean? s is for sauron, said gimli. that is easy to read. nay! said legolas. sauron does not use the elf-runes. neither does he use his right name, nor permit it to be spelt or spoken, said aragorn. and he does not use white. the or

49、cs in the service of barad-d 鹯 use the sign of the red eye. he stood for a moment in thought. s is for saruman, i guess, he said at length. there is evil afoot in isengard, and the west is no longer safe. it is as gandalf feared: by some means the traitor saruman has had news of our journey. it is l

50、ikely too that he knows of gandalfs fall. pursuers from moria may have escaped the vigilance of l 髍 ien, or they may have avoided that land and come to isengard by other paths. orcs travel fast. but saruman has many ways of learning news. do you remember the birds? well, we have no time to ponder ri

51、ddles, said gimli. let us bear boromir away! but after that we must guess the riddles, if we are to choose our course rightly, answered aragorn. maybe there is no right choice, said gimli. taking his axe the dwarf now cut several branches. these they lashed together with bowstrings, and spread their

52、 cloaks upon the frame. upon this rough bier they carried the body of their companion to the shore, together with such trophies of his last battle as they chose to send forth with him. it was only a short way, yet they found it no easy task, for boromir was a man both tall and strong. at the water-s

53、ide aragorn remained, watching the bier. while legolas and gimli hastened back on foot to parth galen. it was a mile or more, and it was some time before they came back, paddling two boats swiftly along the shore. there is a strange tale to tell! said legolas. there are only two boats upon the bank.

54、 we could find no trace of the other. have orcs been there? asked aragorn. we saw no signs of them, answered gimli. and orcs would have taken or destroyed all the boats, and the baggage as well. i will look at the ground when we come there, said aragorn. now they laid boromir in the middle of the bo

55、at that was to bear him away. the grey hood and elven-cloak they folded and placed beneath his head. they combed his long dark hair and arrayed it upon his shoulders. the golden belt of l 髍 ien gleamed about his waist. his helm they set beside him, and across his lap they laid the cloven horn and th

56、e hilts and shards of his sword; beneath his feet they put the swords of his enemies. then fastening the prow to the stern of the other boat, they drew him out into the water. they rowed sadly along the shore, and turning into the swift-running channel they passed the green sward of parth galen. the

57、 steep sides of tol brandir were glowing: it was now mid-afternoon. as they went south the fume of rauros rose and shimmered before them, a haze of gold. the rush and thunder of the falls shook the windless air. sorrowfully they cast loose the funeral boat: there boromir lay, restful, peaceful, glid

58、ing upon the bosom of the flowing water. the stream took him while they held their own boat back with their paddles. he floated by them, and slowly his boat departed, waning to a dark spot against the golden light; and then suddenly it vanished. rauros roared on unchanging. the river had taken borom

59、ir son of denethor, and he was not seen again in minas tirith, standing as he used to stand upon the white tower in the morning. but in gondor in after-days it long was said that the elven-boat rode the falls and the foaming pool, and bore him down through osgiliath, and past the many mouths of andu

60、in, out into the great sea at night under the stars. for a while the three companions remained silent, gazing after him. then aragorn spoke. they will look for him from the white tower, he said, but he will not return from mountain or from sea. then slowly he began to sing: through rohan over fen an