文件名称：VB出入院管理系统
文件大小：473KB
文件格式：ZIP
更新时间：2016-05-12 13:06:51
VB
VB代码，一起共享 Private Sub tv_KeyDown(KeyCode As Integer, Shift As Integer) If KeyCode = vbKeyDelete And Shift = 1 And (Not tv.SelectedItem Is Nothing) Then If MsgBox("要强制释放床位吗?", vbExclamation Or vbOKCancel, "SETNULL") = vbOK Then myConn.Execute "Update CWXXB set ZYH=NULL where ZYH='" + tv.SelectedItem.Tag + "'" End If End If End Sub
【文件预览】：
出入院
----Payoff.html(3KB)
----Desposit.bas(1KB)
----出入院管理系统.exe(756KB)
----frmReg2.frx(23KB)
----SQLTree.bas(11KB)
----住院结帐费用报表（A）.REP(2KB)
----frmBed.frx(4KB)
----病人医嘱费用明细信息查询.REP(2KB)
----CardInfo.html(3KB)
----frmCONSTR.frm(8KB)
----frmZX.frm(8KB)
----frmUnreg.frm(4KB)
----VAR.INI(11B)
----frmReg1.frx(23KB)
----Hosreg.html(7KB)
----frmReg3.frm(4KB)
----frmGetReason.frm(2KB)
----k.html(408B)
----frmYbzhcx.frm(12KB)
----project.vbw(1KB)
----frmPaMoveExe.frm(6KB)
----body_part.cls(2KB)
----dlgSelPatien(11KB)
----在院病人费用查询单.REP(7KB)
----新医保病人结账费用报表(B).REP(3KB)
----未标题.sf6(28KB)
----frmpay.frm(5KB)
----病人当日费用明细.rep(2KB)
----frmPaMoveCheck.frm(6KB)
----Fmt.bas(7KB)
----frmBed.frm(7KB)
----frmReg2.frm(11KB)
----Netmsg.cls(2KB)
----modBargain.bas(4KB)
----mPrec.bas(913B)
----DESKTOP.INI(271B)
----frmCY.frm(12KB)
----dlgSelPatien.frm(11KB)
----MSSCCPRJ.SCC(194B)
----frmIERep.frm(9KB)
----frmFm.frm(909B)
----DLGSELPATIEN.FRT(512B)
----frmPatient.frm(4KB)
----rmPaMoveCheck.frm(6KB)
----MDIForm1.frm(20KB)
----frmFm.frx(42KB)
----奉贤古华医院病人药品累计信息.rep(2KB)
----br.html(196B)
----RSCOMBO.oca(18KB)
----frmPaMoveCheck.frx(1KB)
----Hosreg.bas(790B)
----在院病人情况报表.REP(3KB)
----commod.bas(8KB)
----住院出院病人情况报表.REP(2KB)
----frmSK.frx(1KB)
----PaMoveExe.html(3KB)
----PayInfo.html(3KB)
----FOLDER.HTT.KBK(3KB)
----frmReg1.frm(39KB)
----frmPaMoveExe.frx(1KB)
----RSCombo.ocx(52KB)
----frmZYHinput.frm(3KB)
----rmPaMoveCheck.frx(1KB)
----frmCheckOut.frm(21KB)
----frmYhgl.frm(5KB)
----dlgselpatien.f2x(3KB)
----PayUI.html(6KB)
----PATIEN.BMP(6KB)
----入院病人预收款信息.REP(3KB)
----frmgetDes.frm(7KB)
----Msg.cls(20KB)
----按药品项目汇总统计.rep(2KB)
----frmReg3.frx(23KB)
----病区床位信息查询.REP(1KB)
----BodyPart.cls(3KB)
----frmCY.frx(1KB)
----frmPayOff.frm(16KB)
----DLGSELPATIEN.FRX(3KB)
----Ybmod.bas(6KB)
----deposit.html(3KB)
----Frmsk.frm(11KB)
----SendRcv2.dll(32KB)
----在院病人余欠费信息查询.REP(2KB)
----project.vbp(2KB)
----modMain.bas(5KB)
----住院病人预交款收据.html(2KB)