实训3 浏览与编辑记录

跟我做

实训要求

  • 掌握通过窗口或命令方式浏览记录的方法
  • 掌握对表记录指针的绝对移动或相对移动
  • 掌握对记录进行编辑的方法

实例1 使用命令方式浏览“读者”表中的记录。

键入命令:

USE 读者
BROWSE

打开如图2-12所示的“浏览”窗口。

单击“显示”菜单中的“编辑”或“浏览”命令,可以在记录“编辑”或“浏览”窗口之间进行切换。

图2-12 “读者”表记录

在“命令”窗口键入EDIT或CHANGE命令,也可以打开“编辑”记录窗口来浏览记录。

在“编辑”或“浏览”记录窗口可以直接对记录字段进行修改。

实例2 显示“读者”表中所有男性记录。

键入命令:

USE 读者
LIST FOR 性别= "男"

执行上述命令后在系统主窗口显示满足条件的记录。

实例3 显示“读者”表中男性且在1980年以前出生的所有记录的前5个字段。

该操作需要两个条件:性别="男" 和出生日期<={^1980/01/01}。

键入命令:

LIST FOR 性别="男" AND 出生日期<={^1980/01/01} FIELDS 借书证号,姓名,;
性别,出生日期,职称

DISPLAY FOR 性别="男" AND 出生日期<={^1980/01/01} FIELDS 借书证号,姓名,;
性别,出生日期,职称

屏幕显示:

实例4 “读者”表中有6条记录,对记录指针进行操作。

键入命令:

USE 读者 EXCLUSIVE     &&打开表,指针指向首记录
? RECCOUNT()        &&测试表中记录数
      6
? RECNO(),BOF()   &&测试记录号和文件头函数的值
      1  .F.
SKIP -1       &&指针上移到文件头
? RECNO(),BOF(),EOF()   &&测试记录号、文件头、文件尾函数的值
      1 .T..F.
GO BOTTOM     &&指针指向最后一条记录
? EOF(),RECNO()   &&测试文件尾和记录号函数的值
      .F.6
SKIP        &&指针下移到文件尾
? RECNO(),EOF()
      7  .T.
SKIP -3       &&指针上移3条记录
? RECNO()
      4            &&指针指向4号记录

实例5 逐条修改记录,将“读者”表中职称“教授”改为“工程师”;成批修改记录,将职称 “学生”改为“服装设计师”。

操作步骤:

(1)逐条修改操作。在“读者”表的“浏览”窗口中,将鼠标指针指向职称是“教授”的记录,将“教授”改为“工程师”。如果有多条记录,逐条修改。

(2)成批修改操作。在“读者”表的“浏览”窗口下,单击“表”菜单中的“替换字段”命令。

(3)在打开“替换字段”对话框的各个相应项中,输入修改条件,如图2-13所示。

图2-13 “替换字段”对话框

在“替换为”和“For”两项中可以打开“表达式生成器”对话框,输入相应的表达式。在书写表达式时应注意表达式的类型。例如,在上述替换操作过程中,“学生”是字符串表达式,职称=“学生”是关系表达式。

对于备注型和通用型字段内容的修改操作,与输入数据时的操作相同。

想一想

在“替换字段”对话框中,“作用范围”有哪些选项?

练一练

1.填空题

(1)打开一个空表时,EOF()的值是______,BOF()的值是______,RECNO()的值是______。

(2)在定位记录时,其作用范围有4种选择,All表示______,Next表示______,Record表示______,Rest表示______。

2.选择题

(1)打开一个表后,如果要显示其中的记录,可以使用命令( )。

A.BROWSE B.SHOW C.VIEW D.OPEN

(2)若要显示年龄(N,2)为10的整数倍的职工记录,下列命令错误的是( )。

A.LIST FOR MOD(年龄,10)=0

B.LIST FOR 年龄/10=INT(年龄/10)

C.LIST FOR SUBSTR(STR(年龄,2),2,1)= "0"

D.LIST FOR 年龄=20 .OR.30 .OR.40 .OR.50 .OR.60

(3)当前表有11条记录,执行GO BOTTOM命令后,当前记录是( )。

A.11 B.1 C.12 D.不确定

(4)在Visual FoxPro的浏览窗口中,将某字段的显示宽度增加一倍后,该字段的实际宽度将( )。

A.增加一倍 B.减少一半 C.不变 D.无法确定

(5)只清空当前表中“奖金”字段的全部值,可以使用命令( )。

A.MODIFY STRUCTURE B.DELETE

C.REPLACE D.ZAP

动手做

1.分别使用“浏览”窗口和“编辑”窗口浏览“图书”表记录。

2.使用LIST或DISPLAY命令显示“图书”表中单价在18元(含)以上的记录。

3.显示“图书”表中“图书ID”字段值首字符是“T”的记录。

4.将“图书”表中的书名“因特网技术应用”改为“Internet技术应用”。

5.依次执行下列命令,写出每步操作对应的RECNO()、EOF()和BOF()这3个函数的值。

USE 图书
? RECNO(),EOF(),BOF()
SKIP -1
? RECNO(),EOF(),BOF()
GO 4
? RECNO(),EOF(),BOF()
GO BOTTOM
? RECNO(),EOF(),BOF()
SKIP
? RECNO(),EOF(),BOF()

6.使用“表”菜单中的“替换字段”命令,给“图书”表中所有记录的出版日期增加10天。