門診就診系統的設計與實現—畢業設計論文(編輯修改稿)

　

【文章內容簡介】 ney 數字 長整形 相對應的醫療 費用 F 藥品費用信息 (medical)： 該表用于儲存藥品費用信息，如表 45。 表 45 藥品費用表 字段名稱 數據類型 字段大小 說 明 主 鍵 Med 文本 255 藥品名稱 T Money 數字 長整形 相對應的藥品 費用 F 5 詳細設計 用戶登陸模塊 用戶登陸系統，是根據用戶所輸入帳號代碼以及密碼 (如圖 51)。 圖 51 用戶登陸 用戶輸入帳號 和密碼后，系統先判斷該帳戶是否被凍結，再判斷是否密碼輸入錯誤，當輸入正確時能夠登陸，輸入錯誤 5 次以后該帳戶被凍結 (如圖 52)。 圖 52 登陸功能流程圖 用戶登陸后根據管理員對該帳戶所設定的權限進行工作，如圖 53，這是一位掛號用戶登陸后所見到的界面。 圖 53 掛號用戶登陸后界面 相關代碼：登陸后權限分配 getUserRights() If TestUser() = True And getStatus() = 正常 And Trytime 4 Then If ZcStatus 是 Then () 39。注冊員權限 End If If GhStatus 是 Then 輸 入 是否凍 結 是否輸入錯誤 登 陸 退 出 是 是 否 否 () 39。掛號員權限 End If If YlStatus 是 Then () 39。醫生權限 End If If SfStatus 是 Then () 39。收費員權限 End If If AdminStatus 是 Then () 39。管理員權限 End If clearfields() () () 用戶功能模塊 注冊病人 注冊用戶登陸后，能在注冊模塊使用到 3 個功能，分別為注冊病人、編輯病人以及刪除病人。注冊用戶時打開注冊頁面，系統自動隨機生成 6 位不重復編號，用戶只需根據病人情況輸入病人相關信息即可完成注冊 (如圖 54)。 圖 54 注冊新病人 相關代碼 ：隨機生 成編號 Function renew() As Object ra = Int(1000000 * Rnd()) 39。隨機生成位號碼 While 1 ra = Int(1000000 * Rnd()) If checkIfAlreadyExists() = False Then 39。判斷隨機生成號碼是否存在 Exit While 39。若號碼不存在則跳出循環 End If End While 掛號 掛號用戶登陸后，能在掛號模塊使用到 3 個功能，分別為掛號、退號以及查詢掛號信息。掛號時，用戶根據病人注冊時所獲得的編號讀取病人相關信息，之后根據病人需求為病人掛號到相應的科室 (如圖 55)。 圖 55 病人掛號 相關代碼：讀取掛號科室信息 Function add_depart() () m = New OleDbCommand(SELECT * FROM depart, conn) 39。選擇掛號科室數據表 corr = () While (corr(dep)) 39。將所有掛號科室放入items中 End While () () End Function 醫囑錄入 醫生用戶登陸后，能在掛號模塊使用到 2 個功能，分別為錄入醫囑和修改醫囑。當醫生用戶使用系統時，首先根據病人編號讀取病人相關信息，判斷該病人掛的是該醫生的號，即病人掛號科室應與醫生所在科室相吻合，否則病人是走錯了掛號科室。之后醫生根據病人病情，進行醫囑的錄入，需要選擇所進行的醫療類型、所開處方（如果需多種藥品則可進行多項選擇，根據系統需要，在此僅提供 3 項）以及相應的醫囑 (如圖 56)。 圖 56 醫生下醫囑 收費 收費用戶登陸后， 能在收費模塊使用到 3 個功能，分別為醫療收費、藥品收費和繳費查詢。收費分為 2 種，此處顯示的是藥品收費。首先收費員根據病人編號讀取病人相關信息，根據病人醫囑上所開藥品進行相應的收費，如有多種藥品則將藥品費用相加。繳費后收費用戶可在繳費查詢功能中根據病人編號查到病人是否繳費 (如圖 57)。 圖 57 繳費 相關代碼：病人編號讀取數據庫兩張表里的數據 Function loadpatient() As Object () 39。打開連接 m = New OleDbCommand(SELECT * FROM patient WHERE num = 39。 amp。 amp。 39。, conn) corr = () 39。通過病人編號讀取信息 While = corr(num) 39。讀取病人編號 = corr(pname) 39。讀取病人編號 = corr(way) 39。讀取病人醫療類型 End While () () 39。關閉連接 () 39。釋放資源 () 39。再次 打開連接 m = New OleDbCommand(SELECT * FROM method WHERE meth = 39。 amp。 amp。 39。, conn) corr = () 39。根據上個連接所獲得的病人醫療類型 ,用另外一張表讀取該醫療類型費用 While = corr(money) 39。讀取醫療費用 End While () () 39。關閉連接 () End Function 管理員模塊 用戶添加 管理員用戶添加用戶進入添加界面后，需輸入用戶姓名、輸入代碼、密碼并選擇相應的權限 (如圖 58)。 圖 58 添加用戶 用戶解凍 在用戶登陸時，連續輸入錯誤 5 次密碼則會導致該用戶帳戶被凍結，凍結后只有管理員用戶才能對帳戶進行解凍。解凍時 listbox 將列出所有被凍結帳戶，選擇被凍結帳戶 后點擊解凍即刻 (如圖 59)。 圖 59 解凍用戶 相關代碼：解凍用戶 Private Sub Frm_UnlockUser_Load(ByVal sender As , ByVal e As ) Handles Dim status As String 39。預設 status為凍結 status = 凍結 () m = New OleDbCommand(SELECT * FROM sysuser WHERE status =39。 amp。 status amp。 39。, conn) corr = () 39。讀取 sysuser表中 status項為 凍結 的 While (corr(username)) 39。將這些項放入listbox中 End While () () () End Sub 字典維護 系統字典維護包括增加掛號科室、醫療種類和藥品種類，即在掛號和下醫囑時進行更多的選擇。直接填寫掛號科室以及相應的描述，點擊保存即可。 (如圖510) 圖 510 添加掛號科室 報表查詢 報表查詢可將系統數據庫中所有 報表都列出。圖 511 為病人情況報表，選擇報表查詢相應子項，即可顯示，利用水晶報表完成該功能。 圖 511 病人情況報表 6 系統測試 測試環境 本系統測試環境 ： CPU P4 ， 內存 DDR 1G, ACCESS2021， VISUAL STUDIO 2021， WINDOWS XP 下均測試通過 .建議用戶 CPU PIII，內存 256M 及以上，數據庫版本 ACCESS2021， WIN2021PRO/XP， 2021， WIN2021 SERVER 及以上軟硬件平臺使用 。 測試結果 系統在上述軟硬件環境下分別對 功能用戶 ，系統管理員的詳細設計功能作出測試 ， 結果能夠達到預期功能 ,并且系統運行穩定。 結 論 在老師的指導和督促下，經過三個月的緊張設計與開發，我的畢業設計基于 .Net 的門診就診 系統終于開發完成了， 實現了該系統的基本功能，基本滿足了用戶的需求。 管理員實現了對用戶及系統的管理， 注冊掛號員分別實現了添加病人和根據病人需求掛號，醫生可根據病人的實際情況開出醫囑和用藥，收費員可根據醫囑的內容就行相應的收費。 由于做 畢業 設 計的時間有限以及本人經驗不足，使得本系統在某些方面表現得并不是非常的完善，有很多地方需要改善： 1)系統的美觀方面需要改善。各個按鈕加上對應的圖標，顯得更加專業。 2)流程不夠細化。比如在掛號流程上，掛號員應能對具體的某個科室的醫生掛號而不只是一個單單的可以，相應的就診流程上醫生也能只看到本醫生所接收的病人。 3)考慮不夠周全。在醫生下醫囑的模塊，醫生最多只能選擇三種藥品，如果日后用戶對系統有更多需求想添加更多選擇則會在代碼方面做很大改動。 4)代碼略有重復。比如在讀取病人信息上很多頁面的代碼都是相同的。 在以后的學習中，可以對其進行更正，盡量避免代碼的重復。 但是，通過這次系統開發，將學習的理論與實踐相結合，使我對門診就診系統和數據庫的設計與開發有了更真實、具體的體會，使我得到了一次很有價值的實踐。 參考文獻 [1] 韓澤坤 .Access數據庫開發經典案例解析 [M].北京：清華大學出版社 ,2021。 [2] 銀華強 .Visual 項目開發寶典 [M].北京：電子工業出版社 ,2021。 [3] 王君波 .Visual [M].北京：清華大學出版社， 2021。 [4] 王健南 .ASP數據庫管理項目方案精解 [M].北京： 航空工業 出版社， 2021。 [5] 吉銀林 . [M].北京： 電子工業 出版社， 2021。 [6] 劉化果 .Visual [M].北京：中國電力出版社， 2021。 [7] 石志國 .Visual [M].北京：清華大學出版社， 2021。 致 謝 本文是在 楊上金 老師 、王祖儷老師 的熱情關心和指導下完成的， 他們 淵博的知識和嚴謹的治學作風使我受益匪淺，對順利完成本課題起到 了極大的作用。在此向 他 表示我最衷心的感謝！ 最后向在百忙之中評審本文的各位專家、老師表示衷心的感謝！ 作者簡介： 姓 名：張震 性 別：男 出生年月： 民 族：漢 Email : 聲 明 本論文的工作是 2021 年 2 月至 2021 年 6 月在成都信息工程學院網絡工程系完成的。文中除了特 別加以標注地方外，不包含他人已經發表或撰寫過的研究成果，也不包含為獲得成都信息工程學院或其他教學機構的學位或證書而使用過的材料。除非另有說明，本文的工作是原始性工作。 關于學位論文使用權和研究成果知識產權的說明 本人完全了解成都信息工程學院有關保管使用學位論文的規定，其中包括： （ 1）學校有權保管并向有關部門遞交學位論文的原件與復印件。 （ 2）學校可以采