VFP做的药物管理系统Word下载.docx
- 文档编号:16525287
- 上传时间:2022-11-24
- 格式:DOCX
- 页数:13
- 大小:3.04MB
VFP做的药物管理系统Word下载.docx
《VFP做的药物管理系统Word下载.docx》由会员分享,可在线阅读,更多相关《VFP做的药物管理系统Word下载.docx(13页珍藏版)》请在冰豆网上搜索。
2.1.2课程设计的目的
本课程设计其目的在于加深对《数据库技术与应用》的原理和程序的理解、巩固、提高,让学生做到学以致用,把所学的理论知识应用于实际问题的解决、编制出完整的应用程序,为以后的实际编制大型的应用软件打下基础。
第三章课程设计的说明介绍
3.1数据库技术与应用课程设计的说明介绍
先建立一览、基本信息、详细信息、管理员四个表,在数据库中建立关联,以便后面建立表单使用。
3.1.1进入界面
“进入”代码如下:
doform登陆界面
thisform.release
“退出”代码如下:
quit
3.1.2登录界面
*设置密码不能为空,如允许为空则不需此步骤
IfLen(Alltrim(Thisform.text2.Value))=0
Messagebox('
请输入密码!
'
)
Return
Endif
Usegly.dbf
LocateForAlltrim(用户名)==Alltrim(Thisform.text1.Value)
*如果没有找到相同记录时执行下面代码
IfEof()
Use
没有此用户!
Thisform.text1.Value='
Thisform.text2.Value='
Thisform.text1.SetFocus
i=i+1
ifi<
=3
messagebox("
密码或用户名错,请重新输入!
"
thisform.text2.value="
thisform.text2.setfocus
else
连续三次输入错误,系统将退出!
Quit
ENDIF
*找到后执行的动做
IfAlltrim(Thisform.text2.Value)==Alltrim(密码)
doform查询界面
*在这里添加在正确登录后你要继续执行的程度
Else
密码错误!
Thisform.text2.SetFocus
密码错,请重新输入!
“取消”代码如下:
thisform.text1.value="
thisform.refresh
doform进入界面
3.1.3查询界面
3.1.3.1浏览
3.1.3.2基本查询
“搜索”代码如下:
docase
casethisform.optiongroup1.value=1
select*fromjbxxwhere代码=allt(thisform.text1.value);
intocursoraa
thisform.grid1.recordsource="
aa"
casethisform.optiongroup1.value=2
select*fromjbxxwhere类型=allt(thisform.text1.value);
endcase
3.1.3.3基本信息打印
“确定”代码如下:
docase
reportformjbxxenvironmenttoprinterprom
reportformjbxxenvironmentpreview
endcase
3.1.3.4添加
“添加”代码如下:
usexxxx
appendblank
thisform.txt代码.readonly=.f.
thisform.txt药名.readonly=.f.
thisform.txt类型.readonly=.f.
thisform.txt单价.readonly=.f.
thisform.txt数量.readonly=.f.
thisform.txt厂商.readonly=.f.
thisform.txt库号.readonly=.f.
thisform.txt管理员.readonly=.f.
thisform.txt代码.setfocus
m=messagebox("
是否保存?
4+48,"
信息窗口"
ifm=6
信息已保存"
48,"
delete
pack
endif
3.1.3.5修改
“修改”代码如下:
“保存”代码如下:
3.1.3.6删除
“删除”代码如下:
是否删除?
4+32,"
纪录已删除"
3.1.3.7统计
“统计”代码如下:
select代码,count(*)as人数fromjbxxgroupby代码intocursoraa
select类型,count(*)as人数fromjbxxgroupby类型intocursorbb
bb"
casethisform.optiongroup1.value=3
select库号,count(*)as人数fromjbxxgroupby库号intocursorcc
cc"
casethisform.optiongroup1.value=4
select管理员,count(*)as人数fromjbxxgroupby管理员intocursordd
dd"
第四章课程设计的心得体会
4.1数据库技术与应用课程设计的心得体会
心得与体会
经过一周的时间,系统开发完毕。
通过系统的开发,我对面向对象的程序设计方法又有了更加深刻的认识,对Microsoft公司出品的VisualFoxPro6.0的功能特性有了更多的了解。
在开发设计过程中,我为了使所开发软件的功能尽可能完善且更加接近于一个真正的药品管理系统,使其可以充分体现出药品管理工作的各个方面,以达到我预期设想的系统设计目标。
药品管理系统是一款比较专业的最新药品管理软件,它集药品添加管理板块,药品编辑管理板块,药品删除板块等功能为一身,系统界面简洁优美,操作直观简单,无需专门培训即可正常使用。
药品管理系统是一款充分体现了药品信息的管理实情,为使用者和有意代理药品者量身定做的专业管理软件。
在课程设计的过程中,我们知道了自己在以前的学习中有很大的不足,导致在设计的过程中出现了很多问题,有些地方看不懂,也不知道怎么去设计。
但是,在设计的过程中我们也学到了很多以前没有掌握的知识,虽然这次可以查漏补缺,不过也给自己敲响了警钟,在学习中不可以浮于表面,要想学好一门课程就要踏踏实实,做什么都不是给别人看,最重要是做到问心无愧。
我们要更好的掌握这门知识,提高自己的修养,提高自己的能力,为以后的学习和工作打下良好的知识基础和技能基础。
学校开这门课程设计不仅让我们学到了很多计算机操作的知识和数据库应用的知识,真正让我们获益匪浅的是我们学会了学习方法,并让我们懂得了如何面对学习中的困难、挫折和挑战。
2011年12月28日
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- VFP 药物 管理 系统