基于Access的醫(yī)學生數(shù)據(jù)庫語言學習探討

1、基于Access的醫(yī)學生數(shù)據(jù)庫語言學習討論基于Aess的醫(yī)學生數(shù)據(jù)庫語言學習討論隨著計算機技術的不斷開展及普及，計算機已經(jīng)成為人們工作中不可缺少的工具，與此同時，信息技術在醫(yī)院也被全面應用，醫(yī)院信息化管理為醫(yī)院的各項業(yè)務管理帶來了極大的方便。在醫(yī)學領域，醫(yī)院信息管理系統(tǒng)、醫(yī)學專家系統(tǒng)、數(shù)字人體分析以及大量醫(yī)學數(shù)據(jù)分析管理等都毫不例外地是以數(shù)據(jù)庫技術為根底的。數(shù)據(jù)庫語言是高校非計算機專業(yè)計算機教學普遍開設的課程，在醫(yī)學院校開設數(shù)據(jù)庫語言是醫(yī)學生掌握計算機知識、熟悉數(shù)據(jù)庫操作最實在可行的途徑。數(shù)據(jù)庫語言Aess是功能較強、易于掌握的數(shù)據(jù)庫管理軟件，也是醫(yī)學生今后工作和科研所必須掌握的一門計算機編程

2、語言。該課程的學習以培養(yǎng)醫(yī)學生面向?qū)ο蟪绦蛟O計的理念為宗旨，通過教學，從根底到理論，使學生掌握數(shù)據(jù)庫語言Aess的根本功能，培養(yǎng)初步開發(fā)信息系統(tǒng)的才能，根本具備解決實際應用問題的才能，更為培養(yǎng)醫(yī)學生具有數(shù)字技術與醫(yī)學結(jié)合的思維方式打下良好的基矗irsft公司開發(fā)的數(shù)據(jù)庫管理系統(tǒng)軟件Aess作為ffie的重要組件之一，是一個面向?qū)ο蟮?、采用事件?qū)動的關系型數(shù)據(jù)庫環(huán)境。Aess在關系數(shù)據(jù)模型的理論根底上結(jié)合了先進的面向?qū)ο笏枷?，同時提本文由論文聯(lián)盟搜集整理供了大量適用于面向?qū)ο箝_發(fā)思想和方法的各種軟件工具，為用戶開發(fā)基于inds環(huán)境的數(shù)據(jù)庫應用軟件系統(tǒng)創(chuàng)造了條件。本課程所采用的數(shù)據(jù)庫系統(tǒng)是Aess

3、2022。系統(tǒng)構造與設計教育形式是做中學和基于工程教育和學習的集中概括和抽象表達，按照學科穿插浸透、理論結(jié)合理論的教學理念，按照根底知識應用進步才能創(chuàng)新三個階段來改善學生的學習效果，進步學生的學習才能。所以，我們采用工程開發(fā)為任務，詳細實現(xiàn)要手段的方式來綜合學習Aess。1.確定所需要的表本系統(tǒng)有4個實體，即醫(yī)生、患者、床位和住院管理信息。系統(tǒng)的維護需要明確使用者的身份，因此，在系統(tǒng)登錄時對使用者要進展身份確實認，通過一個表來存儲系統(tǒng)所有的用戶名及密碼。2.確定表的構造及主鍵關系模型如下：醫(yī)生編號、姓名、性別、出生日期、職稱、所屬科室、擅長診斷、個人簡介，見表1?；颊卟v號、姓名、性別、出生日

4、期、身份證號、聯(lián)絡方式、病史，見下頁表2。床位床位號、類別、所屬科室名、說明，見下頁表3。出入院信息編號、主管醫(yī)生編號、患者病歷號、床位號、住院日期、出院日期、病由，見下頁表4。3.轉(zhuǎn)換并標準將E-R圖轉(zhuǎn)換成關系模型并對關系形式進展標準化，至少到達3NF。醫(yī)院住院管理信息系統(tǒng)E-R圖如圖1所示。4.功能模塊根據(jù)需求分析，系統(tǒng)功能設計包括以下特點，即分層管理、業(yè)務功能模塊化管理、業(yè)務流程嚴格控制等。住院管理信息系統(tǒng)主要由兩大功能模塊構成。一類功能模塊是基于根本信息管理，包括醫(yī)生根本信息管理模塊、患者根本信息管理模塊和床位根本信息管理模塊，另一類是基于出入院登記管理，包括入院登記管理、出院登記管理

5、和住院情況統(tǒng)計。系統(tǒng)功能模塊如圖2所示。關鍵技術舉例雖然Aess的六大對象為表、窗體、查詢、報表、宏和模塊VBA編程，有些簡單的功能可以通過向?qū)е苯油瓿?，但是有些?shù)據(jù)關聯(lián)著比擬復雜的功能，就需要借助VBA代碼實現(xiàn)。本文以入院登記窗體實現(xiàn)為例。入院登記窗體的操作過程是：翻開窗體后可看到患者的信息，通過患者信息區(qū)域的記錄選擇器可以查看第一條/上一條/下一條/最后一條記錄，通過查找患者可以找到相應的患者。找到患者后最下面的住院信息子窗體中會顯示該患者以往的住院記錄，如住院日期有值，而出院日期沒有值，那么說明該患者已住院，不能再辦理入院手續(xù)了。如患者沒有正在住院，在1.選擇科室的列表中選擇科室后，系統(tǒng)

6、就會將該科室的出診醫(yī)生和空閑床位分別顯示在對應的列表框中。單擊選擇醫(yī)生和空閑床位后，這時生成入院信息的按鈕才被激活。填寫住院病由后，單擊生成入院信息按鈕，那么可以辦理該患者的住院手續(xù)，下方的住院信息子窗體里會顯示當前參加的住院記錄，此時住院日期為當前日期及時間，而出院日期為空。入院登記的運行界面如圖3所示。1.技術要點分析1選擇科室后，要自動顯示醫(yī)生和空床位列表信息。建立自動關聯(lián)是一技術要點。2醫(yī)生和空床位兩個列表信息，采用了多列方式來展示相關信息。多列的列表的賦值和讀取是一難點。3只有醫(yī)生和空床位兩個列表都進展了選擇后，生成入院信息的按鈕才被激活。要記錄這兩個列表的選擇狀態(tài)，就要采用全局變量

7、來做標志。4從界面上獲取患者的HID、醫(yī)生的DID、床位的ID和病由后，將相關信息添加到住院表中，并刷新界面，從而最終完成入院登記。5數(shù)據(jù)庫操作前，先要進展連接，操作完成后要釋放數(shù)據(jù)庫連接。2.關鍵技術的VBA代碼實現(xiàn)1查看信息按鈕單擊事件中的VBA代碼。PrivateSubkxx_lik-進展列表框初始化-e.ys.lununt=3e.lununt=2Fri=0Te.ys.Listunt-1e.ys.RevEite0NextiFri=0Te.Listunt-1e.ReveIte0NextiDinAsNeADDB.nnetinDirsAsNeADDB.RerdsetDifielAsADDB.F

8、ieldDistrsql，a，b，dAsString-建立數(shù)據(jù)庫連接-Setn=urrentPrjet.nnetinSetrs=NeADDB.Rerdset-將符合條件的醫(yī)生信息參加列表框-strsql=selet*fr醫(yī)生here所屬科室=e.keshirs.penstrsql，urrentPrjet.Aessnnetin，adpenKeysetIfrs.EFThensgBx此類型號源已用完e.keshi.SetFusElsers.veFirstDhileNtrs.EFa=rsDIDb=rs姓名=rs職稱d=a，b，將符合條件的醫(yī)生姓名參加列表框ys.AddItedrs.veNextLpEn

9、dIf-將符合條件的空床位名參加列表框-rs.lseSetrs=Nthingstrsql=SELET床位.ID，類別FR床位，住院HERE床位.ID=住院.IDand出院日期=nand所屬科室=e.keshiUNINSELETID，類別FR床位HERE所屬科室=e.keshiandIDntinseletIDfr住院sgBxstrsql=strsqlrs.penstrsql，urrentPrjet.Aessnnetin，adpenKeysetIfrs.EFThensgBx無空床位e.keshi.SetFusElsers.veFirstDhileNtrs.EFa=rsIDb=rs類別d=a，b將符

10、合條件的醫(yī)生姓名參加列表框.AddItedrs.veNextLpEndIf-關閉數(shù)據(jù)庫連接-rs.lsen.lseSetrs=NthingSetn=NthingEndSub2生成入院信息按鈕單擊事件中的VBA代碼。PrivateSubruyuan_likIfIsNulle.bingyure.bingyu=ThenDd.BeepsgBx請輸入入院病由！e.bingyu.SetFusExitSubEndIfDinAsNeADDB.nnetinDirsAsNeADDB.Rerdset-建立數(shù)據(jù)庫連接-Setn=urrentPrjet.nnetinSetrs=NeADDB.RerdsetDistrsqlAsStringstrsql=selet*fr住院rs.penstrsql，urrentPrjet.Aessnnetin，adpenKeyset，adLkptiisti，addText-添加新記錄-rs.AddNe準備添加新記錄rsHID=e.HIDrsDID=e.ys.IteDatae.ys.ListIndexrsID=e.lun0rs住院日期=Nrs病由=e.bingyurs.Update記錄集更新e.R