【正文】 2 金額 Money 收據(jù)數(shù) Varchar 10 日期 Datetime 2 3 系統(tǒng)實現(xiàn)及編碼 系統(tǒng)工程說明 系統(tǒng)的工程名定為醫(yī)院醫(yī)院門診管理系統(tǒng)。 2. 與數(shù)據(jù)庫的連接用 ADOConnection，在程序主界面上 。 4. 編輯字段控件用 Edit 控件，取名為字段名。 界面設(shè)計 ： 表 屬性名 屬性值 picture 選擇相應(yīng)的圖畫 Backstyle 0transparence Caption 醫(yī)院門診管理系統(tǒng) 在主窗體上加入 StatusBar 控件，就加入了一條狀態(tài)欄，此狀態(tài)欄用于顯示系統(tǒng)時間。H00FFFFFFamp。H00FFFFFFamp。H00FFFFFFamp。H00FFFFFFamp。H00FFFFFFamp。H00FFFFFFamp。 當(dāng)窗體載入時，設(shè)置：病案類型、費用類型、類型，顯示系統(tǒng)日期們星期，設(shè)置 MSFlexGrid 表格列數(shù)，列寬及表頭信息。 就看上面的代碼只是對程序的一些數(shù)據(jù)進(jìn)行了初始化，函數(shù)和錄入過程還不是很清楚，下面就來一一介紹說明一下所用到的函數(shù)和錄入過程。 在數(shù)據(jù)錄入的過程中，應(yīng)該考慮到用戶輸入的方便性和高效性。由于一般用戶都習(xí)慣使用（ ENTER） 鍵，所以這里設(shè)計只要用戶按下 （ ENTER） 鍵，下一個需要錄入數(shù)據(jù)的控件便自動獲得焦點。例如： IfKeyCode=vbKeyReturn And Index=1 Then Cbo1(1).SetFocus 通過用戶輸入的拼音簡碼檢索并輸入科室、醫(yī)生等信息 以輸入科室信息為例介紹通過拼音簡碼輸入信息的方法。如果第一條記錄是用戶需要的，那么直接按（ ENTER）鍵，即可在“就診科室”文本框中顯示該科室的信息；否則，可以通過鍵盤中的上下鍵進(jìn)行選擇，然后按（ ENTER）鍵，即可在“就診科室”文本框中顯示該科室的信息。 + Txt1(2).Text + 39。%39。下面以藥品表格（ GRIDYP）為例介紹他的設(shè)計方法。代碼如下： If KeyCode = vbKeyReturn Then 2 With 39。按 ESC 鍵 GridYP 不可見 = False 39。代碼如下： = 39。求合計金額 End If Next i = Format(A, ) 當(dāng)“數(shù)量”單元格發(fā)生變化時，計算收費項目金額和總金額。 2 總結(jié) 經(jīng)過這次畢業(yè)設(shè)計，我感到自己無論在專業(yè)知識方面，還是在動手能力方面都有了很大的收獲。特別是對 ADO 控件。 另外，通過此次畢業(yè)設(shè)計，本人對開發(fā)一個軟件的各個階段有了一定的了解，在實際動手的過程中，深刻體會到書寫代碼時良好的習(xí)慣對錯誤的檢查和代碼的維護(hù)都有很大的幫助，不像以前寫代碼時，只想實現(xiàn)要實現(xiàn)的功能，不管代碼的書寫質(zhì)量，內(nèi)存空間的有效利用等問題。比如：在科室信息表中，我設(shè)計了，科室名稱與科室簡稱還有拼音碼，在操作過程中，似乎覺得沒有必要，有些重復(fù)現(xiàn)象，還有沒有做到拼音碼是唯一的，運行過程中，沒有對已有的拼音碼進(jìn)行提示，在設(shè)計過程中，我也遇到了許多問題如：在做系統(tǒng)時 ,在打印報表時 ,一開始總出現(xiàn)數(shù)據(jù)錯位的現(xiàn)象 ,經(jīng)過反復(fù)檢查代碼后 ,仍然不能解決 .最后考慮到打印數(shù)據(jù)錯位 ,經(jīng)過老師和同學(xué)的幫助，最后問題解決了，從中讓我學(xué)會的如何去調(diào)試程序和解決問題。在我的畢業(yè)設(shè)計遇到困難的時候，是沈老師把我從誤區(qū)中拉了出來，而且她還告訴我了許多解決問題得方法和技巧，這將為我今后走上工作崗位奠定基礎(chǔ)。 Logistics Management, 1999, 29(7):477494. [10] Jeffrey , Jennifer Widom. A First Course in Database Systems. PrenticeHall International, Inc[R]. 1998 2 附錄 文件名 文件類型 說明 frm_main 窗體文件 主程序窗體 main_about 窗體文件 關(guān)于窗體 main_bb_jzkstjbb 窗體文件 就診科室統(tǒng)計報表窗體 main_bb_jztjbb 窗體文 件 結(jié)帳統(tǒng)計報表窗體 main_bb_rjbb 窗體文件 收款員日結(jié)報表窗體 main_bb_zxkstjbb 窗體文件 執(zhí)行科室統(tǒng)計報表窗體 main_charge 窗體文件 門診收費窗體 main_enter 窗體文件 操作員登錄窗 體 main_help 窗體文件 系統(tǒng)幫助窗體 main_js 窗體文件 門診收費結(jié)算窗體 main_Ksgl_Add 窗體文件 科室數(shù)據(jù)添加窗體 main_Ksgl_Update 窗體文件 科室數(shù)據(jù)修改窗體 main_Note 窗體文件 設(shè)置收據(jù)號窗體 main_Tfgl 窗體文件 退費管理窗體 main_Tjcx_sfcx 窗體文件 收費查詢窗體 main_Tjcx_ypcx 窗體文件 藥品查詢窗體 main_Tjcx_zlxmcx 窗體文件 診療項目查詢窗 體 Main_Ypwh 窗體文件 藥品維護(hù)窗體 Main_Ypwh_Add 窗體文件 藥品數(shù)據(jù)添加窗體 Main_Ypwh_Kcxg 窗體文件 藥品庫存數(shù)量管理窗體 Main_Ypwh_Ypdate 窗體文件 藥品數(shù)據(jù)修改窗體 Main_Ysgl 窗體 文件 醫(yī)生管理窗體 Main_Ysgl_Add 窗體文件 醫(yī)生數(shù)據(jù)添加窗體 Main_Ysgl_Update 窗體文件 醫(yī)生數(shù)據(jù)修改窗體 Main_Zlxmgl 窗體文件 診療項目管理窗體 Main_Zlxmgl_Add 窗體文件 診療項目數(shù)據(jù)添加窗體 Main_Zlxmgl_Update 窗體文件 診療項目數(shù)據(jù)修改窗體 Modulel 標(biāo)準(zhǔn)模塊文件 公共模塊 醫(yī)院門診管理系統(tǒng) .exe 執(zhí)行文件 醫(yī)院門診管理系統(tǒng) .vbp 工程文件 2 軟件使用說明書 您好！歡迎使用中小型醫(yī)院門診管理系統(tǒng)，本系統(tǒng)是針對中小型醫(yī)院而開發(fā)的，它是您提高醫(yī)院管理水平的好幫手，它能協(xié)助您簡便、高效地完成醫(yī)院的 管理工作。它包含使用中小型醫(yī)院門診管理系統(tǒng)的詳細(xì)資料，詳細(xì)講述了包括基本概念和使用方法。 一 、中小型民營醫(yī)院門診管理系統(tǒng)簡介 本文所述的醫(yī)院門診管理系統(tǒng) 屬于典型的單層數(shù)據(jù)庫應(yīng)用系統(tǒng)。保證了用戶使用的方便性和習(xí)慣性，也使企業(yè)無需配備專門的技術(shù)人員來制 作、維護(hù)和管理自己的信息平臺，只需掌握電腦基本使用技能的普通人員即可輕松完成以上工作，為企業(yè)大幅度節(jié)省了管理上的成本，為企業(yè)的信息化建設(shè)鋪平了道路 本系統(tǒng)根據(jù)登錄用戶的使用權(quán)限可以完成對各種信息的添加、修改、查詢和刪除操作。 系統(tǒng)主要功能 :計價收費、藥品維護(hù)、統(tǒng)計查詢、報表打印、系統(tǒng)維護(hù)、關(guān)于等，每一模塊進(jìn)行詳細(xì)的介紹在第 2 章中有詳細(xì)說明在這里不再重復(fù)。 圖 5 醫(yī)院門診管理系統(tǒng)主界面 當(dāng)該系統(tǒng)運行時 ,首先彈出如圖 5 所示的對話框，可以選擇你想進(jìn)行的操作。輸入正確的用戶名和口令后，將進(jìn)入如下圖 7 所示的設(shè)置收據(jù)號界面，并根據(jù)具體情況進(jìn)行收據(jù)號的填寫。 2）退費 2 圖 9 門診退費對話框 此窗口是退費的，只要輸入收據(jù)號，按一下回車后，將在下面出現(xiàn)相應(yīng)的信息，若要退費可以將所選定的信息，加到退費項目中，按下面的退費將完成，按作廢實現(xiàn)返回功能。此窗體主要使用了 TEXTBOX控件 TEXTBOX 控件允許用戶在應(yīng)用程序中輸入文本和顯示文本 . 圖 11 增加門診藥品圖 完成以上操作后，藥品維護(hù)窗口就會發(fā)生變化，會將胃康靈添加進(jìn)去。此窗口和新增藥品窗口設(shè)計思路差不多 ,為了方便用戶增加藥品庫存數(shù)量 ,放置了一個 UPDOWN 控件 . 圖 13 增加庫存藥品圖 完成以上操作后，藥品維護(hù)窗口就會發(fā)生變化（庫存數(shù)量）。 圖 15 收費查詢圖 圖 16 藥品查詢圖 圖 17 診療項目查詢圖 此窗口主要是對藥品進(jìn)行增加、修改、刪除、打印等，藥品進(jìn)庫與出庫都要在這個窗口進(jìn)行。這里不再一一介紹。 shops, hoping for powder and the return of the royal bird, were besmeared with azure and decked with fleursdelys. It was the candid time at which Count Lynch sat every Sunday as churchwarden in the churchwarden39。Angouleme. Hence his peerage. In 1817 fashion swallowed up little boys of from four to six years of age in vast caps of morocco leather with eartabs resembling Esquimaux French army was dressed in white, after the mode of the Austrian。 instead of numbers they bore the names of departments。 and since England refused him green cloth, he was having his old coats 1817 Pelligrini sang。 Potier reigned。 both of them had celebrated, on the 14th of July, 1790, the mass of federation in the Champ de Mars。s platform in the Champ de were blackened here and there with the scor ches of the bivouac of Austr ians encamped near GrosCaillou. Two or three of these columns had disappeared in these bivouac fires, and had warmed the large hands of the Imperial troops. The Field of May had this remarkable point: that it had been held in the month of June and in the Field of March (Mars). In this year, 1817, two things were popular: the VoltaireTouquet and the snuffbox a la most recent Parisian sensation was the crime of Dautun, who had thrown his brother3