【正文】 生多個(gè)事件，每個(gè)事件都通過(guò)執(zhí)行一段程序來(lái)響應(yīng)。 Visual Basic 通過(guò) ODBC 訪問(wèn) Access、 SQL、 及 Orcal等大型數(shù)據(jù) 庫(kù)在內(nèi)的各種數(shù)據(jù)庫(kù)。 Access 數(shù)據(jù)庫(kù)以文件形式保存，文件的擴(kuò)展名是 MDB。 查詢 (Query)—— 查詢可以按索引快速查找到需要的記錄，按要求篩選記錄并能連接若干個(gè)表的字段組成新表。 報(bào)表 (Report)—— 報(bào)表的功能是將數(shù)據(jù)庫(kù)中的數(shù)據(jù)分類匯總，然后打印出來(lái)，以便分析。模塊使 用 Visual Basic 編程。需求分析的第一步是描述門 診收費(fèi)管理系統(tǒng)的功能，既定義用例，以此確定系統(tǒng)的功能需求。 由于醫(yī)院管理系統(tǒng)屬于當(dāng)今管理系統(tǒng)中最復(fù)雜的一種，門診收費(fèi)管理 系統(tǒng)是醫(yī)院管理系統(tǒng)的最終端的一個(gè)模塊，它處于整個(gè)醫(yī)院管理系統(tǒng)的最末端，可以說(shuō)是整個(gè)系統(tǒng)的信息入口，其他模塊要從收費(fèi)管理系統(tǒng)中提取并保存所需信息。 處方信息：處方醫(yī)師、科室類別、處方金額、處方日期、操作員。 病人 記賬 核實(shí) 登記 結(jié)算 病人 入院登記表 費(fèi)用記錄表 結(jié)賬清單表 不合格 掛號(hào)單 住院?jiǎn)? 費(fèi)用清單 結(jié)賬單 圖 1 數(shù)據(jù)流程圖 石家莊學(xué)院畢業(yè)設(shè)計(jì) 5 用戶信息：用戶名、密碼、權(quán)限。 ER 圖由實(shí)體、屬性、聯(lián)系三部分組成。此外，技術(shù)人員的水平也能達(dá)到開(kāi)發(fā)的需求。 3． 2． 3 運(yùn)行可行性 運(yùn)行可行性是對(duì)組織結(jié)構(gòu)的影響，現(xiàn)有人員和機(jī)構(gòu)、設(shè)施和環(huán)境對(duì)系統(tǒng)的適應(yīng)性及人員培訓(xùn)補(bǔ)充計(jì)劃的可行性。 圖 5 系統(tǒng)登錄界面 （登陸界面設(shè)計(jì)代碼見(jiàn)附錄） 程序流程圖如下： 5． 2． 2 系統(tǒng)主界面 在此系統(tǒng)中，采用了菜單的方式對(duì)系統(tǒng)中各個(gè)功能進(jìn)行列舉，對(duì)系統(tǒng)的使用，通過(guò)菜單即可完成，這樣的設(shè)計(jì)更加的人性化，操作簡(jiǎn)單，容易上手。 圖 13 核算報(bào)表界面 圖 14 藥品銷售報(bào)表圖 石家莊學(xué)院畢業(yè)設(shè)計(jì) 15 圖 15 藥品調(diào)撥報(bào)表圖 圖 15 處方報(bào)表圖 醫(yī)院門診收費(fèi)管理系統(tǒng) 16 圖 16 住院收入圖 5． 2． 5 系統(tǒng)維護(hù)界面 系統(tǒng)維護(hù)模塊主要包括三項(xiàng)內(nèi)容：數(shù)據(jù)庫(kù)備份、用戶管理、修改密碼 圖 17 系統(tǒng)維護(hù)界面 圖 18 數(shù)據(jù)庫(kù)備份 圖 19 用戶管理 6 測(cè)試和維護(hù) 6． 1 系統(tǒng)測(cè)試 表 8 系統(tǒng)測(cè)試 測(cè)試內(nèi)容 測(cè)試用例 預(yù)計(jì)效果 實(shí)際效果 解決方法 登陸模塊測(cè)試 用戶登陸測(cè)試 分別輸入正確和錯(cuò)誤的登陸信息 連接到系統(tǒng) 主界面 無(wú)法進(jìn)入 修改數(shù)據(jù)庫(kù)的管理員信息 系統(tǒng)管理界面模塊測(cè)試 數(shù)據(jù)統(tǒng)計(jì)查詢 測(cè)試 黑盒測(cè)試 能實(shí)現(xiàn)各個(gè)功能 查詢功能無(wú) 法實(shí)現(xiàn) 修改代碼 核算報(bào)表模塊測(cè)試 石家莊學(xué)院畢業(yè)設(shè)計(jì) 17 各個(gè)報(bào)表的測(cè)試 人工測(cè)試 能顯示出各個(gè)報(bào)表的數(shù)據(jù) 成功顯示各個(gè)報(bào)表的數(shù)據(jù) 無(wú) 系統(tǒng)維護(hù)模塊測(cè)試 用戶管理測(cè)試 添加和刪除用戶 添加和刪除成功 達(dá)到預(yù)計(jì)效果 無(wú) 修改密碼測(cè)試 輸入新舊密碼 成功修改 到達(dá)預(yù)計(jì)效果 無(wú) 運(yùn)行維護(hù) 經(jīng)過(guò)測(cè)試，該系統(tǒng)運(yùn)行穩(wěn)定，在使用和維護(hù)中應(yīng)注意以下幾個(gè)問(wèn)題 （ 1） 定期備份數(shù)據(jù)庫(kù)，以免丟失數(shù)據(jù)。本系統(tǒng)可以提高醫(yī)院的管理水平，在激烈的醫(yī)院競(jìng)爭(zhēng)中勝出，可以使醫(yī)院門診收費(fèi)管理更加的輕松，而且操作人員的操作要求要求低，既提高了辦事效率，又提高了醫(yī)院的服務(wù)質(zhì)量。 在開(kāi)發(fā)這個(gè)系統(tǒng)的過(guò)程中，我遇到了很多困難，以前學(xué)的是書本上的知識(shí)，現(xiàn)在到了實(shí)際應(yīng)用上，就有點(diǎn)手忙腳亂的感覺(jué)。2021,3. [10].李作緯 .Visual Basic 程序設(shè)計(jì)實(shí)驗(yàn)指導(dǎo) [M].北京 ：人民郵電出版社 .2021,9 月 . [11].趙欣勝 . Visual Basic 經(jīng)典范例 50 例 [M].北京：科學(xué)出版社 .2021,7. [12].郝春強(qiáng) .新概念 Visual Basic 6 教程 [M].北京：北京科海集團(tuán)公司 .2021,12. [13].鄧良松，劉海巖，陸麗娜 .軟件工程 [M].西安：西安電子科技大學(xué)出版社 .2021,6. [14].求是科技 . Visual Basic 程序設(shè)計(jì)與開(kāi)發(fā)技術(shù)大全 [M].北京：人民郵電出版社 .2021,9. [15].段興 . Visual Basic 數(shù)據(jù)庫(kù)使用程序設(shè)計(jì) 100 例 [M].北京：人民郵電出版社 .2021,10 醫(yī)院門診收費(fèi)管理系統(tǒng) 20 附錄 1．系統(tǒng)登錄界面代碼如下： Public userdwname As String Public username As String Public userright As String Public conn As String Private Sub Command1_Click() Dim password As String Dim respond As String username = password = On Error GoTo err1 = conn = select * from usertab where 用戶名 = amp。 39。 39。 If = adPosUnknown Then respond = MsgBox(用戶名或密碼錯(cuò)誤，請(qǐng)重新輸入！ , vbOKOnly, 警告 ) If respond vbOKOnly Then = = username = password = End If Else userright = (權(quán)限 ) Unload frmlogin End If Exit Sub err1: MsgBox 系統(tǒng)配置錯(cuò)誤！無(wú)法與服務(wù)器連接！ userright = 0 Unload Me End Sub Private Sub Command2_Click() End 石家莊學(xué)院畢業(yè)設(shè)計(jì) 21 End Sub Private Sub Form_Load() = = 39。 \。 Year(Now()) amp。 Day(Now()) amp。 兩個(gè)月的畢業(yè)設(shè)計(jì)時(shí)間既漫長(zhǎng)又短暫，首先我要感謝我的導(dǎo)師孟軍英老師，在畢業(yè)設(shè)計(jì)期間，孟軍英老師給了我莫大的關(guān)心、幫助和支持 ，為我提供了良好的學(xué)習(xí)條件和寬松的畢業(yè)設(shè)計(jì)氛圍，幫助我不斷地學(xué)習(xí)、