【正文】
價(jià)格,病床數(shù)}病人信息表{編號(hào),姓名,性別,年齡,入院日期,出院日期,是否出院,病因}住房信息表{編號(hào),性別,病房號(hào)碼,病房級(jí)別,床位}病人,病房號(hào)碼為外鍵,分別依賴于病人編號(hào),病房號(hào)碼用戶信息表{編號(hào),姓名,密碼,身份}物理設(shè)計(jì)(1)、病房信息表:(2)、病人信息表:(3)、住房信息表:(4)、用戶信息表: 五、系統(tǒng)設(shè)計(jì)概要設(shè)計(jì)醫(yī)院住院管理系統(tǒng)病人信息管理入院信息登記病房分類入住情況出院信息登記用戶管理密碼管理病房信息管理系統(tǒng)管理住院業(yè)務(wù)管理病人信息查詢?nèi)胱∏闆r查詢六、實(shí)現(xiàn)過程菜單設(shè)計(jì)界面設(shè)計(jì),控件屬性設(shè)計(jì),添加程序代碼(1)登錄界面對(duì)象名屬性屬性值Form1CaptionForm1Lable1Caption歡迎訪問醫(yī)院住院管理系統(tǒng)Lable2Caption姓名Lable3caption密碼Command1caption登錄Command2caption退出optiongroup1buttoncount2(管理員或病人)Text2passwordchar用戶信息表密碼Text1namechar用戶信息表姓名“登陸”按鈕的click事件代碼如下:use 用戶信息locate for alltrim(姓名)==alltrim() if .() messagebox(沒有該用戶!) else if =1 if alltrim(身份)==管理員 if alltrim(密碼)==alltrim() messagebox(歡迎訪問系統(tǒng)!) do form 管理員主頁(yè) else messagebox(密碼錯(cuò)誤!) endif else messagebox(身份不匹配!) endif else if alltrim(身份)==病人 if 密碼==alltrim() messagebox(歡迎訪問系統(tǒng)!) do form 病人主頁(yè) else message