7-2015-VFP第10部分(数据表的基本操作).pptVIP

每一个数据表都有开始和结束标志，可以用函数bof()和eof()来测试。 bof() eof() 文件开始的测试函数 文件结束的测试函数 在一个空表中，bof( )和eof( ) 的值为： ；recn( )的值为 。 （教科书P121） 在一个空表中，bof( )和 eof( )的值为：.T.； recno( )的值为1。 利用命令进行记录定位：绝对定位和相对定位 1. 绝对定位 [go[to]] 数值表达式| bottom | top 命令格式： （教科书P119） (教材P117) 【例5-1】在“图书信息管理”项目中建立一个管理图书信息的表单，保存为“图书信息.scx”，实现“首记录”、“末记录”按钮的功能，使得表单上能够看到图书表的第一条记录或最后一条记录。 在数据环境中添加图书表，将“图书”表的所有字段逐个拖放到表单上，自动生成与该字段关联的控件。 字符、数值、日期型字段，产生文本框控件； 逻辑型字段，产生复选框控件； 备注型字段，产生编辑框控件； 通用型字段，产生ActiveX绑定控件 表示commandgroup1 命令按钮组Commandgroup1的click事件代码如下： do case case this.value=1 go top case this.value=4 go bottom case this.value=5 thisform.release endcase thisform.refresh 数据表字段的值改变后并不能立即显示在控件上，需要使用refresh方法刷新表单中各控件显示的内容。 表示什么？ 第1、4、5个按钮：首记录、末记录、关闭 2. 相对定位 skip [数值表达式] （教科书P120-121） 【例5-2】 打开【例5-1】的图书信息.scx表单，进一步完善表单的功能，实现“上一条”、“下一条”按钮的功能，使得表单上能够逐一查看“图书”表的所有记录。 修改Commandgroup1命令按钮组click事件代码，为原多分支case语句增加两个判断分支，代码如下： case this.value=2 skip -1 if bof() go top messagebox(已经是第一条记录。) endif case this.value=3 skip if eof() skip -1 messagebox(已经是末记录。) endif 表示第2、3个按钮： 上一条、下一条 bof()函数为.t.，表示指针指到开始位置 eof()函数为.t.，表示指针指到结束位置 记录的维护 Vfp命令尽量学生自学，主要重视操作增删改，掌握SQL命令 (见教科书123页） 记录的增加 打开表，“显示”菜单中的“追加方式” 用SQL命令添加记录 insert into 表文件名… 命令格式： (见教科书124页） 学号 姓名 英语 计算机 数学 001 张三 85 82 76 002 李四 70 95 63 003 王武 40 70 83 学生成绩表cj.dbf Insert into cj values(“004”, “赵六”,76,82,45) Insert into cj(学号,姓名,计算机) values(“005”, “章七”,88) 2个数据表： 学生表(文件名为：ST.dbf)：学号(C,5），姓名(C,6)，专业班级(C,20)。 选课表(文件名为：XK.dbf)：学号(C,5)，课程号(C,3)，成绩(N,5,1)。注：选课表中一条记录代表一名学生选择的一门课程，一名学生可以选择多门课程。 向选课表添加一名学生的选课记录，数据是：学号为“10301”，课程号为“012”，成绩为87，正确的SQL语句是( )。 (A)INSERT INTO XK VALUES(10301,012,87) (B)INSERT INTO XK VALUES(10301,012,87) (C)INSERT INTO XK VALUES(10301,012,87) (D)INSERT INTO XK VALUES(10301,012,87) 表中数据的删除包括逻辑删除和物理删除 删除和恢复表中的数据 1）逻辑删除表中的记录 打开表，选择“显示”菜单“浏览”，在浏览窗口中利用鼠标删除标记 delete from