【正文】 alse Else If Option1(2).Value = True Then = False = True = False Else If Option1(3).Value = True Then = False = False = True Else MsgBox 請選擇查詢的項！ , , 提示 End If End If End If Next i = True End Sub 主要選擇查詢的方法。 Adodc1 控件的屬性為： 連接數(shù)據(jù)庫 如科別的控件的主要屬性設(shè)置如下： 其他控件的設(shè)置同。 第三步雙擊相應(yīng)的控件，在控件的相應(yīng)過程中編寫代碼： 的代碼為： Private Sub Command1_Click() If = 新增 Then n = Trim(Str( + 1)) = 確定 Text1(0).Text = n Text1(3).Text = 30 Text1(11) = Date Text1(1).SetFocus = False = False Else MsgBox 入院成功！ = 新增 = True = True End If End Sub 的代碼為： Private Sub Command2_Click() Sub 的代碼為： Private Sub Command3_Click() Sub 圖片框的代碼為： Private Sub Picture1_Click() = End Sub 此窗體上用了 1個 Adodc 控件， Adodc1 用來連接醫(yī)師情況表。如下圖： 第二步，選擇窗體或控件進(jìn)行屬性設(shè)置，同上一小結(jié)。 最后設(shè)置如下的代碼（只要單擊菜單即可設(shè)置各菜單代碼），代碼如下： 主要是通過 Show 方法調(diào)用相應(yīng)的窗體。 數(shù) 據(jù) 庫的名稱 數(shù)據(jù)庫中的表名 運(yùn)行時是否隱藏 （ 2） Text3 控件的屬性設(shè)置如下： Visible 屬性的設(shè)置同 Data1 控件。此三個控件的創(chuàng)建方法如下： 首先，將 Data、 Text 控件拖放到窗體上，其次，設(shè)置它們的屬性： （ 1） Data1 控件的屬性設(shè)置如下圖： 此兩個屬性的作用是保證 Data控件與數(shù)據(jù)庫相連。 Unload me 語句的作用是下載窗體。如下圖： 第二步，選擇窗體或控件進(jìn)行屬性設(shè)置，如圖為窗體的屬性設(shè)置界面 : 第三步雙擊相應(yīng)的控件，在控件的相應(yīng)過程中編寫代碼： 如此窗體上“進(jìn)入”與“退出”按鈕的代碼如下： 并且具有改變“登錄”菜單為“注銷”菜單的功能。 住院患者情況表： 主治醫(yī)師情況表： 交費(fèi)情況表： 用戶表： 4． 3測試用例 住院患者情況表的測試用例： 主治醫(yī)師情況表的測試用例： 交費(fèi)情況表的測試用例： 用戶表的測試用例： 第五章 系統(tǒng)的實(shí)現(xiàn) 5． 1系統(tǒng)登錄模塊的實(shí)現(xiàn) 1．流程圖 2．界面： 界面包括的控件有標(biāo)簽、文本框、命令按鈕等控件。在表中使用的關(guān)鍵字類型用于描述庫表示什么以及在數(shù)據(jù)庫中如何與其它的庫建立關(guān)系。這種連接是指一個表被連接到它自己的一個字段，或在不同的紀(jì)錄中由重復(fù)數(shù)據(jù)的組合字段。一個連接是指一種虛擬的表，這種表是在當(dāng)用戶要求從相互關(guān)聯(lián)的各個不同的表中獲取信息時建立的，關(guān)鍵字段用于在相互連接的不同表中查找匹配的記錄。這三種操作均可由 Visual Basic 創(chuàng)建的程序來完成，下面的章節(jié)將 詳細(xì)描述實(shí)現(xiàn)的具體方法。 1． 標(biāo)識需要的數(shù)據(jù)； 2． 收集被標(biāo)識的字段到表中； 3． 標(biāo)識主關(guān)鍵字字段； 4． 繪制一個簡單的數(shù)據(jù)圖表； 5． 規(guī)范數(shù)據(jù)； 6． 標(biāo)識指定字段的信息； 7． 創(chuàng)建物理表。 新建一個數(shù)據(jù)庫 創(chuàng)建任何一個數(shù)據(jù)庫的第一步是仔細(xì)的規(guī)劃數(shù)據(jù)庫，設(shè)計必須是靈活的、有邏輯的。計算機(jī)的數(shù)據(jù)庫可以分為兩類：I O P 增加、刪除、修改用戶信息 提供相應(yīng)的界面供操作人員操作 保存到用戶管理表 非關(guān)系數(shù)據(jù)庫（ flatfile）和關(guān)系數(shù)據(jù)庫（ relational）。 數(shù)據(jù)庫的概念 數(shù)據(jù)庫是一種存儲數(shù)據(jù)并對數(shù)據(jù)進(jìn)行操作的工具。 Access 可以接受多種格式的數(shù)據(jù)，從而方便了用戶在不同系統(tǒng)之間進(jìn)行數(shù)據(jù)轉(zhuǎn)換。 Access 可以作為個人計算機(jī)終端和大型主機(jī)系統(tǒng)之間的橋梁。 Access 具有良好的界面，采用了與 Windows 和 Microsoft Office 系列軟件完全一致的風(fēng)格，用戶可以通過菜單和對話框操作，不用編寫任何命令便能有效地實(shí)現(xiàn)各種功能的操作，完成數(shù)據(jù)管理任務(wù)。④要為每一個模塊設(shè)計出一組測試用例，以便在編碼階段對模塊代碼（即程序）進(jìn)行預(yù)定的測試，模塊的測試用例是軟件測試計劃的重要組成部分，通常應(yīng)包括輸入數(shù)據(jù)，期望輸出等內(nèi)容。 3． 2詳細(xì)設(shè)計 3． 2． 1 詳細(xì)設(shè)計的任務(wù) 詳細(xì)設(shè)計就是要在概要設(shè)計的結(jié)果的基礎(chǔ)上，考慮“怎樣實(shí)現(xiàn)”這個軟件系統(tǒng)，直到對系統(tǒng)中的每個模塊給出足夠詳細(xì)的過程性描述。 3． 1． 4 系統(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)患者資料的新增、修改、辦理患者出院、查詢患者資料 。 ②如何表示不同的成分內(nèi)的功能細(xì)節(jié)和數(shù)據(jù)結(jié)構(gòu)。 3． 1． 2 概要設(shè)計的過程 概要設(shè)計要先進(jìn)行系統(tǒng)設(shè)計，復(fù)審系統(tǒng)計劃與需求分析，確定系統(tǒng)具體的實(shí)施方案；然后進(jìn)行結(jié)構(gòu)設(shè)計，確定軟件結(jié)構(gòu)。 ③ 編寫概要設(shè)計說明書，用戶手冊，測試計劃，選用相關(guān)的軟件工具來描述軟件結(jié)構(gòu)，結(jié)構(gòu)圖是經(jīng)常使用的軟件描述工具。 ②確定模塊結(jié)構(gòu)，劃分功能模塊，將軟件功能需求分配給所劃分的最小單元模塊。可使用 ODBC Object 直接把命令傳遞給服務(wù)器處理，以創(chuàng)建真正的客戶機(jī) /服務(wù)器程序。 ODBC 數(shù)據(jù)庫 —— 即符合開放式數(shù)據(jù)庫連接性 (ODBC)協(xié)議的數(shù)據(jù)庫。 外部數(shù)據(jù)庫 —— 即 索引順序存取方法 (ISAM)數(shù)據(jù)庫，例如 Btrieve、dBASE、 FoxPro 以及 Paradox 等。 內(nèi)部數(shù)據(jù)庫 —— 即 .MDB 格式的數(shù)據(jù)庫，包括 DAO API、 Microsoft Access和 Microsoft Excel 創(chuàng)建的數(shù)據(jù)源，也稱為本地數(shù)據(jù)庫。 在 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ù)庫通常有三種途徑 : ； VB 提供的數(shù)據(jù)訪問變量編程訪問； ODBC 接口訪問 ODBC API 函數(shù)。 3．?dāng)?shù)據(jù)倉庫 :數(shù)據(jù)倉庫是包含數(shù)據(jù)庫表的一個或多個文件，是存放數(shù)據(jù)的地方。 2．?dāng)?shù)據(jù)庫引擎 :所謂數(shù)據(jù)庫引擎，是一種管理數(shù)據(jù)怎樣被存儲和檢索的軟件系統(tǒng)，是應(yīng)用程序與物理數(shù)據(jù)庫之間的橋梁。 1．用戶界面 : 用戶界面是指應(yīng)用程序與用戶進(jìn)行交互的界面，包括用于交互的 所有界面元素和代碼。 ADO 是 Mcrosoft 提出的第三種數(shù)據(jù)庫訪問對象，是 Microsoft 數(shù)據(jù)庫訪問技術(shù)的一個主要發(fā)展方向， ADO 將 OLE DB 封裝在一個數(shù)據(jù)對象中，使得 VB 程序中以方便地實(shí)現(xiàn)對數(shù)據(jù)庫的訪問。 DATA 控件還提供了用來瀏覽不同記錄的各種跳轉(zhuǎn)按鈕。缺省情況下， DATA 控件根據(jù)數(shù)據(jù)庫中的一個或多個數(shù)據(jù)表建立一個 dynasettype（動態(tài)集合）類型的記錄集合。 DATA 控件在數(shù)據(jù)庫中的信息與將信息顯示給用戶看的 Visual Basic程序之間架起了一座橋梁。 微軟的 JET 數(shù)據(jù)庫引擎提供了與數(shù)據(jù)庫打交道的途徑，我們是通過它以及Visual Basic 來訪問數(shù) 據(jù)庫并對其進(jìn)行各種操作。 Access 是一種關(guān)系數(shù)據(jù)庫工具，關(guān)系數(shù)據(jù)庫是已開發(fā)的最通用的數(shù)據(jù)庫之一。另外， Access 允許創(chuàng)建自定義報表用于打印或輸出數(shù)據(jù)庫中的信息。 Access 的優(yōu)點(diǎn)在于它能使用數(shù)據(jù)表示圖或自定義窗體收集信息。故而，實(shí)現(xiàn)本系統(tǒng) VB 是一個相對較好的選擇。 2． 2開發(fā)工具簡介 微軟公司的 Visual Basic 是 Windows 應(yīng)用程序開發(fā)工具，使目前最為廣泛的、易學(xué)易用的面向?qū)ο蟮拈_發(fā)工具。 1． 3團(tuán)隊構(gòu)成 指導(dǎo)教師： ******* 成員： ****** 第二章 開發(fā)環(huán)境及實(shí)現(xiàn)技術(shù) 2． 1開發(fā)環(huán)境 硬件系統(tǒng)：奔騰 100 以上 CPU、 64M以上內(nèi)存、 1G以上硬盤、光驅(qū)。 開發(fā)這一系統(tǒng)的好處大約有以下幾點(diǎn)： 第一、可以存儲歷年病人及醫(yī)師的信息，安全、高效； 第二、只需一到二名檔案錄入員即可操作系統(tǒng)，節(jié)省人力； 第三、可以迅速查到病人及醫(yī)師的各類信息。 我作為一個計算機(jī)應(yīng)用專業(yè)的畢業(yè)生，希望可以在這方面有所貢獻(xiàn)。它已經(jīng)應(yīng)用于許多領(lǐng)域。 因此，開發(fā)這樣一套管理軟件成為很有必要的事情，對于我們即將計算機(jī)專業(yè)畢業(yè)的學(xué)生來說，也是一次將計算機(jī)應(yīng)用于現(xiàn)實(shí)管理的一次很有意義的實(shí)踐活動。 作為計算機(jī)應(yīng)用的一部分，使用計算機(jī)對病人及醫(yī)師進(jìn)行管理，具有著手工管理所無法比擬的優(yōu)點(diǎn)，如 :檢索迅速、查找方便、可靠性高、存儲量大、保密性 好、壽命長、成本低等。醫(yī)務(wù)收費(fèi)管理系統(tǒng) 目 錄 第一章 緒 論 .................................................................................................................................2 1． 1 課題簡介 ................................................................................................................................2 1． 2 開發(fā)的意義 .............................................................................................................................2 1． 3 團(tuán)隊構(gòu)成 ................................................................................................................................3 第二章 開發(fā)環(huán)境及實(shí)現(xiàn)技術(shù) ............................................................................................................4 2． 1 開發(fā)環(huán)境 ................................................................................................................................4 2． 2 開發(fā)工具簡介 .........................................................................................................................4 第三章 系統(tǒng)設(shè)計 ..............................................................................................................................6 3． 1 概要設(shè)計 ..........................................................................................................................