校醫(yī)院門(mén)診管理信息系統(tǒng)實(shí)驗(yàn)報(bào)告

. .一．需求分析設(shè)計(jì)這個(gè)校醫(yī)院門(mén)診管理信息系統(tǒng)的目的是為了規(guī)范校醫(yī)院門(mén)診過(guò)程中處要功能是實(shí)現(xiàn)各項(xiàng)相關(guān)信息(包括病人的相關(guān)信息、費(fèi)用標(biāo)準(zhǔn)的相關(guān)信息)(1)醫(yī)生。在本系統(tǒng)中，醫(yī)生的用戶(hù)類(lèi)型被定義為“1”。“醫(yī)生”類(lèi)型的b.創(chuàng)建維護(hù)學(xué)生的診療記錄，如癥狀、診療結(jié)果等。(即進(jìn)行編輯)c.創(chuàng)建維護(hù)學(xué)生的處方單。(即進(jìn)行編輯) (2)掛號(hào)人員。在本系統(tǒng)中，掛號(hào)人員的用戶(hù)類(lèi)型被定義為“2”?！皰焯?hào)醫(yī)保類(lèi)型等。(即進(jìn)行編輯) (3)財(cái)務(wù)人員。在本系統(tǒng)中，財(cái)務(wù)人員的用戶(hù)類(lèi)型被定義為“3”?！柏?cái)務(wù)d.維護(hù)學(xué)生的醫(yī)藥費(fèi)報(bào)銷(xiāo)記錄。(即進(jìn)行編輯)人員”類(lèi)型的用戶(hù)在本系統(tǒng)中具有如下權(quán)限；d.創(chuàng)建、維護(hù)學(xué)生的交費(fèi)費(fèi)用單據(jù)。(即進(jìn)行編輯).(1)病人管理。病人管理的功能是供用戶(hù)對(duì)病人的掛號(hào)記錄、診療記錄、(2)費(fèi)用標(biāo)準(zhǔn)管理。費(fèi)用標(biāo)準(zhǔn)管理的功能是供用戶(hù)對(duì)治療費(fèi)用標(biāo)準(zhǔn)(對(duì)于診療項(xiàng)目而言的)、藥品價(jià)格記錄等信息進(jìn)行編輯和查詢(xún)。(3)添加新用戶(hù)。用戶(hù)可以添加新用戶(hù)的信息來(lái)創(chuàng)建與自己用戶(hù)類(lèi)型即使(4)退出系統(tǒng)。用戶(hù)在結(jié)束使用之后可以主界面選擇“退出系統(tǒng)”，進(jìn)而(1)操作系統(tǒng)：Windows7。(2)數(shù)據(jù)庫(kù)：MicrosoftSQLServer2008.二．系統(tǒng)設(shè)計(jì)(1)病人(學(xué)號(hào)，姓名，性別，年齡，學(xué)院，學(xué)歷，醫(yī)保類(lèi)型)(2)藥品(藥品編號(hào)，藥品名稱(chēng)，進(jìn)貨價(jià)格，出售價(jià)格，保質(zhì)期，庫(kù)存量，.(3)診療項(xiàng)目(診療項(xiàng)目編號(hào)，收費(fèi)標(biāo)準(zhǔn)，診療項(xiàng)目名稱(chēng))(4)費(fèi)用(學(xué)號(hào)，醫(yī)保報(bào)銷(xiāo)費(fèi)用，需交費(fèi)用，診療項(xiàng)目花費(fèi)，藥品費(fèi)用，(5)醫(yī)生(醫(yī)生編號(hào)，醫(yī)生姓名，所屬科室)(6)劃價(jià)人員(劃價(jià)人員編號(hào)，劃價(jià)人員姓名)(7)財(cái)務(wù)人員(財(cái)務(wù)人員編號(hào)，財(cái)務(wù)人員姓名)(8)掛號(hào)人員(掛號(hào)人員姓名，掛號(hào)人員編號(hào))(9)處方(學(xué)號(hào)，醫(yī)生編號(hào)，處方，開(kāi)具日期，診療結(jié)果，病人癥狀)(10)診療記錄(學(xué)號(hào)，醫(yī)生編號(hào)，癥狀，診療結(jié)果)(I)E-R圖如下：劃價(jià)人員醫(yī)生財(cái)務(wù)人員掛號(hào)人員診療記錄產(chǎn)生包含藥品診療項(xiàng)目費(fèi)用處方.性別年齡學(xué)歷醫(yī)保類(lèi)型財(cái)務(wù)人員姓名開(kāi)具日期診療結(jié)果癥狀診療項(xiàng)目花費(fèi)藥品費(fèi)用實(shí)交費(fèi)用.劃價(jià)人員姓名保質(zhì)期庫(kù)存量診療結(jié)果項(xiàng)目診療項(xiàng)目名稱(chēng)..IUse系統(tǒng).ETABLE(掛號(hào)人員姓名nchar(10)NOTNULL,Y.VB過(guò)程這個(gè)程序的功能是通過(guò)各類(lèi)用戶(hù)實(shí)現(xiàn)各項(xiàng)相關(guān)信息(包括病人的相關(guān)信息、圖一學(xué)生處方編輯.圖二病人掛號(hào)記錄查詢(xún)b中所用到的查詢(xún)語(yǔ)句ELECTFromFormSELECTFromForm)SELECTFromFormECTFromFormLECTFromFormECTFromFormTFromForm.(I)實(shí)現(xiàn)查詢(xún)功能的代碼(以Form9為例)：e要查詢(xún)的學(xué)號(hào)輸入名為“Text1”的文本框中。此時(shí)該窗體的代PrivateSubCommand1_Click()Adodc1.RecordSource="SELECT*From費(fèi)用Where學(xué)號(hào)='"&Trim(Text1.Text)&"'"Adodc1.RefreshdSubPrivateSubCommand2_Click()nloadMedSub(II)實(shí)現(xiàn)編輯功能的代碼(以Form2為例).ewtexttetestxtnstEndIfousnstEndIfst(III)實(shí)現(xiàn)權(quán)限設(shè)置的代碼er.PrivateSubClick)MsgBox對(duì)不起，您沒(méi)有訪(fǎng)問(wèn)權(quán)限",,"提示"EndIfEndSub三．程序運(yùn)行