《vfp操作步骤说明》由会员分享，可在线阅读，更多相关《vfp操作步骤说明（16页珍藏版）》请在金锄头文库上搜索。
1、数据库技术与应用综合练习图书管理系统设计实验要求：（1）熟练掌握项目管理器、数据库、表、查询、视图、表单、菜单和应用程序等内容的应用；（2）学生独立完成，作为平时成绩的一部分；完成后请上传到 ftp 服务器上（上传帐号和密码由各自的任课教师提供）【系统功能模块介绍】欢迎画面登录界面系统主界面数据信息管理 借阅管理 统计查询 退出系统打印读者借阅明细数据信息管理图书信息管理借书管理借阅管理还书管理统计查询过期未还图书查询统计教师学生人数打印读者借阅明细 退出系统图 1 系统功能模块图【系统功能分析】1系统登录：通过密码验证后进入图书管理系统主界面，否则不能运行图书管理系统，保证系统的安全性。2数
2、据信息管理：主要是图书信息管理，包括记录的浏览。3借阅管理：主要实现图书的借出和归还操作。4统计查询：统计过期未还图书的情况，以及师生人数。5打印输出：读者借阅明细的打印输出功能实现。6退出系统：退出图书管理系统。【数据库表结构】表 1 读者表（dz.dbf）字段名 数据类型 宽度 字段含义 其他dzbh 字符型 8 读者编号 主索引xm 字符型 8 姓名lx 字符型 4 类型 字段注释：要么为教师，要么为学生xb 字符型 2 性别 字段有效性规则：性别只能为男或女！jg 字符型 10 籍贯 普通索引yxmc 字符型 20 院系名称 普通索引csrq 日期型 8 出生日期gszt 逻辑型 1
3、挂失状态 默认值为.F.zp 通用型 4 照片表 2 图书表（ts.dbf）字段名 数据类型 宽度 字段含义 其他sh 字符型 20 书号 主索引sm 字符型 50 书名cbs 字符型 30 出版社 普通索引zz 字符型 40 作者dj 数值型 5，1 单价rkcs 数值型 2，0 入库册数kccs 数值型 2，0 库存册数记录的有效性规则：入库册数大于等于库存册数两个字段的“匹配字段类型到类”均为 spinnerbz 备注型 4 备注表 3 借阅表（jy.dbf）字段名 数据类型 宽度 字段含义 其他dzbh 字符型 8 读者编号 普通索引sh 字符型 20 书号 普通索引jsrq 日期型
4、8 借书日期 字段有效性规则：借书日期不能比系统日期大hsrq 日期型 8 还书日期【实验步骤】1启动 VFP，将“d:vfp综合案例tsgl”文件夹设置为默认的工作文件夹。2素材中已提供了项目、数据库、表、视图、数据库表已设置了字段属性、表属性以及索引等，打开该文件夹中的项目文件“tsgl.pjx” 。3对照图 2 建立 tsk 数据库中表与表之间的关系。图 2 数据库表之间的关系4建立类库文件 mylib.vcx。应用程序的很多界面都要用到“退出”命令按钮，为了提高效率，在类设计器中自定义命令按钮类 cmdexit，并保存在类库文件 mylib.vcx 中，如图 3 所示。按钮中显示的图片
5、来自素材中的 exit.ico 文件，设置命令按钮的 click 事件代码为：thisform.release。图 3 用户自定义类创建界面5.创建查询利用查询设计器创建查询，文件名存为 chaxun1,各界面截图如下：查询设计器截图输出项查询设计器截图联接条件查询设计器截图排序依据6.创建表单系统引导界面（start.scx）图 4 系统引导封面系统引导封面（图 4）是运行系统后出现的欢迎界面。显示 10 秒后进入系统登录界面。设计步骤如下：（1）新建表单并以文件名 start.scx 保存。设置表单的 autocenter 属性为.T.，picture 属性为 fm.jpg 图片文件，ti
6、tlebar 属性为“0-关闭” 。在表单的 init 事件中添加代码：public n &定义全局变量 nn=0（2）在适当位置添加三个标签控件，caption 属性分别为“欢迎进入” 、 “图书信息管理系统”和“按任意键继续” 。标签的 backstyle 属性为“0-透明” 。设置标签的字体、字号和字型及颜色属性。（3）添加一个时钟控件 timer1，设置 interval 属性值为 1000，timer 事件代码为：n=n+1if n=10 do form login.scx &10 秒后自动运行登录表单 login.scxthisform.releaseendif（4）在表单的 ke
7、ypress 事件中编写代码：if nkeycode=13 &判断是否按下回车键do form login.scxthisform.releaseendif系统登录界面（login.scx）图 5 用户登录界面系统登录表单能够实现管理员的登录功能，输入用户名、密码，正确就进入图书管理系统菜单，否则直接结束。设计步骤如下：（1）新建一表单以文件名 login.scx 保存。表单居中显示，caption 属性为“登录”。（2）按照图 5 所示绘制三个标签和两个文本框，设置标签的相关属性，并拖动到适当位置，设置 text2 的 passwordchar 属性值为“？” 。（3）添加一个命令按钮控件，
8、caption 为“确定” ，并设置 picture 属性为 ok.ico 图片文件。由用户自定义类 cmdexit 创建“退出”按钮（后面退出按钮同样方法添加） 。（4） “确定”按钮的 click 事件代码为：yhm=thisform.text1.valuemm=thisform.text2.valueif yhm=tsgl and mm=123456do tsglmenu.mprthisform.releaseendifif yhmtsgl=messagebox(用户名错，请重新输入！) thisform.text1.value=thisform.text1.setfocusendif
9、if mm123456=messagebox(密码错，请重新输入！) thisform.text2.value=thisform.text2.setfocusendif （5） “退出”按钮由自定义命令按钮类 cmdexit 生成。图书信息管理界面（tsgl.scx）图 6 图书信息管理表单设计界面图书信息管理界面主要用于对 ts 中图书记录信息进行浏览、添加、修改以及删除操作，如图 6 所示。设计步骤如下：（1）新建一表单并保存为 tsgl.scx。表单的标题为“图书信息管理” ，居中显示，表单的 height 为 400，width 为 600。表单数据环境中添加 ts 表。（2）从数据环
10、境中将 ts 表中字段拖动到表单形成相应控件，适当调整位置，形成图3-6 所示格局，将 ts 表从数据环境中拖动到表单形成一个表格控件 grdts，设置表格的deletemark 属性为.F.，readonly 属性为.T.，设置表格的 height 为 200，width 为 400。（3）参考图 3-6，在表单上添加一形状控件绘制一个矩形框，并设置 specialeffect属性为“0-3 维” ，并至于其他控件的下层，再添加两个标签，caption 分别为“图书信息”和“（可直接在图书信息处修改记录） ”，按照图示拖放到适当位置。（4）新建一个命令按钮组，利用生成器产生 6 个命令按钮，
11、标题分别为“第一条” 、“上一条” 、 “下一条” 、 “最后一条” 、 “增加”和“删除” ，垂直放置在适当位置。（5）命令按钮组的 click 事件代码为：thisform.grdts.column1.text1.setfocus &焦点设置在表格当前记录的第一列上do casecase this.value=1go topcase this.value=2if not bof()skip -1endifcase this.value=3if not eof()skipendifcase this.value=4go bottomcase this.value=5 if mand5.cap
12、tion=增加select tsappend mand5.caption=保存&单击“增加”按钮后该按钮标题即为保存,提示添加的记录需要保存elsex=messagebox(确定增加该记录吗？,1+32,提示)if x=1messagebox(记录被保存！)mand5.caption=增加elsedeletepackgo mand5.caption=增加thisform.grdts.recordsource=tsfor i=1 to thisform.grdts.columncountthisform.grdts.columns(i).width=62 &设置表格各列的宽度endforendi
13、fendifcase this.value=6y=messagebox(确定删除该记录吗？,1+48,提示)if y=1r=recno()deletepackgo r-1 &跳转到上一条记录thisform.grdts.recordsource=tsfor i=1 to thisform.grdts.columncountthisform.grdts.columns(i).width=62 &设置每一列等宽endforendifendcasethisform.refresh（6）设置表格控件的 afterrowcolchange 事件代码为：select tsthis.setall(dynam
14、icforecolor,iif(this.column1.text1.value=ts.sh,;rgb(255,0,0),rgb(0,0,0),column) &设置表格的当前选定记录为红色显示thisform.refresh（7）图 7 为完成后运行的效果图。图 7 图书信息管理表单运行效果借书管理界面（jsgl.scx）图 8 借书管理表单设计界面借书管理表单的功能是将选定的图书和读者信息记录到 jy 表中。如果库存册数不为 0和读者没有挂失，则可以借出，否则就不允许借出。具体操作步骤如下：（1）新建一表单文件 jsgl.scx，参考图 8 所示，设置表单的标题为“借书管理” ，表单居中显
15、示，在表单的数据环境中添加 ts、jy 和 dz 三张数据表。（2）添加一标签控件，caption 属性为“请输入或选择图书书号：” ，添加一组合框控件 combo1，coloumcount 属性为 2，设置 rowsourcetype 为“6-字段” ，rowsource 为“ts.sh,sm”。（3）设置 combo1 的 interactivechange 事件代码为：select tsThisform.refresh（4）在组合框 combo1 的后面添加一命令按钮 command1，设置 caption 为“确定（0 &该图书库存不为 0，可以借出select dzif gszt=.T. &处于挂失状态的读者无法借书messagebox(该读者已经挂失，无法借书！)elsevarsh=allt(thisform.txtsh.value) &取出当前图书号vardzbh=allt(thisform.txtdzbh.value) &取出当前读者编号insert into jy(dzbh,
