病房管理系统—免费毕业设计论文内容摘要:

=alltrim() locate for alltrim(用户名 )=alltrim() if found() and upassword=alltrim(密码 ) =.f. do form d:\刘海青 \主界面 .scx else =messagebox(用户名或密码错误,请重新输入。 ) endif 取消按钮的 click 事 件代码: = = 查询界面代码 : optiongroup1 的 click 事件代码: if =1 =.T. =.F. =.F. endif if =1 =.F. =.T. =.F. endif if =1 =.F. =.F. =.T. endif 确定按钮的 click 事件代码: *use 表 1 excl IF =1 =select * from 表 1 where 表 =alltrim() into cursor temp endif IF =1 =select * from 表 1 where 表 =alltrim() into cursor temp endif IF =1 =select * from 表 1 where 表 =alltrim() into cursor temp endif 取消按钮的 click 事件代码: 登记界面代码 : 确定按钮的 click 事件代码: if empty() or empty() or empty()。 or empty() or empty() or empty()。 or empty() or empty() or empty() messagebox(信息添加不完整 ,48,提示信息 ) else use 表 1 go bottom append blank replace 姓名 with replace 性别 with replace 年龄 with val() replace 联系电话 with replace 入院日期 with replace 病房号 with replace 身 份证号 with replace 值班人员号 with replace 病房单价 with messagebox(登记成功 !!!) endif = = = = = = = = = 重置按钮的 click 事件代码: = = = = = = = = 取消按钮的 click 事件代码: 病房查询代码: optiongroup1 的 click 事件代码: if =1 =.T. =.F. endif if =1 =.F. =.T. endif 确定按钮的 click 事件代码: *use 表 2 excl IF =1 =select * from 表 2 where 表 =alltrim() into cursor temp endif IF =1 =select * from 表 2 where 表 =alltrim() into cursor temp endif 取消按钮的 click 事件代码: 病房整理界面代码 : 退房按钮的 click 事件代码: use 表 2 * =.f. locate for 病房号 = if found() replace 表 with allt() replace 表 with allt() messagebox(整理成功 !) endif 取消按钮的 click 事件代码: 费用界面代码: 合计按钮的 click 事件代码: select 表 1 locate all for 病房号 =alltrim()。 and 姓名 =alltrim() if found() =病房单价 *() else messagebox(病房号和姓名输入有误。 ,48,警告 ) endif 取消代码: 转房代码: 确定按钮的 click 事件代码: use 表 1 * =.f. if empty() or empty() or empty()。 or empty() or empty() or empty()。 or empty() or empty() messagebox(信息添加不完整 ,48,提示信息 ) else locate for 姓名 =allt() if found() replace 表 with allt() replace 表 with replace 表 with allt() replace 表 with replace 表 with allt() replace 表 with replace 表 with messagebox(转房成功 !) else message (信息不全,请重新填写。 ) endif endif 重置按钮的 click 事件代码: = = = = = = = 取消按钮的 click 事件代码: 系统维护界面代码: 确定按钮的 click 事件代码: SELE 表 3 GO top if empty() MESSAGEBOX(用户名不能为空,请 重新输入。 ) else LOCATE for 表 =allt() and 表 =allt() IF found() DO case CASE empty() MESSAGEBOX(密码不能为空,请重新输入。 ) CASE != MESSAGEBOX(两次输入结果不同。 请重新输入。 ,1+48,提示窗口 ) = = CASE allt()=allt() REPL 表 with allt() MESSAGEBOX(修改成功。 ) ENDCASE ELSE MESSAGEBOX(您的原始密码不正确,请重新输入。 ) = = = = ENDIF Endif 取消按钮的 click 事件代码: 病房管理系统 摘 要 随着计算机科学技术的快速 发展和普及, 计算机开始进入每个领域 ,要跟上时代的潮流必须全面提升信息管理水平 ,构建计算机化的内联网和外联网 ,可以设想 ,在计算机化企业的发展过程中 ,需要大量精通管理和计算机信息处理的复合型人才 . 计算机管理已经渗透了各行各业 .对于一个医院来说 ,房间管理也是一个 必备的环节 ,病房的入住 ,费用统计 ,转病房的登记都包含着复杂的信息 ,这就需要应用计算机软件来对各项工作进行管理以发挥最大的功效。 这次设计的目的就是为医院创建一个方便、实用、快捷的工作环境 ,减轻医院工作人员的负担 ,同时这也是现代化管理的必然要求。 此次研究 是创建了一个具备数据库维护功能 ,能根据用户需求进行数据的查询、添加、修改的管理系统。 关键词:病房的入住 转病房的登记 房间的整理 目录 前言 3 第一章 管理系统开发常识 4 管理系统的应用与发展 4 管理系统的开发过程 6 第二章 系统设计 7 系统功能分析 7 系统功能模块设计 8 第三章 数据库设计 8 数据库功能分析 8 开发与运行环境 9 创建数据库和数据表 9 第四章 医院病房管理主 界面 的 实现 11 创建系统 11 病房管理系统的主 界面 11 第五章 用户管理模块的创建 12 欢迎界面的创建 12 登陆界面的创建 12。
阅读剩余 0%
本站所有文章资讯、展示的图片素材等内容均为注册用户上传(部分报媒/平媒内容转载自网络合作媒体),仅供学习参考。 用户通过本站上传、发布的任何内容的知识产权归属用户或原始著作权人所有。如有侵犯您的版权,请联系我们反馈本站将在三个工作日内改正。