APPEND [BLANK] [IN nWorkArea | cTableAlias] [NOMENU]
参数
BLANK
在当前表的末尾添加一个空记录。Visual FoxPro 在发出 APPEND BLANK 命令时并不打开编辑窗口。
可以使用 BROWSE、CHANGE 或 EDIT 命令编辑新记录。
IN nWorkArea
指定要添加新记录的表所在的工作区。
IN cTableAlias
指定要添加新记录的表的别名。
如果省略 nWorkArea 和 cTableAlias,新记录将添加到当前选定工作区的表中。如果发出 APPEND 命令,空记录将添加到由 nWorkArea 或 cTableAlias 指定的工作区的表中,并且自动选定该表;如果发出 APPEND BLANK 命令,空记录将添加到指定的 nWorkarea 或 cTableAlias 工作区的表中,但不选定表。
NOMENU
指定将表菜单标题从系统菜单栏中删除,以避免改变编辑窗口的格式。
备注
当发出 APPEND 或 APPEND BLANK 命令,并且没有在当前选定工作区中打开表时,将显示一个打开对话框,您可以在对话框中选择需要添加记录的表。
APPEND 命令打开一个编辑窗口,您可以在其中输入一个或多个新记录。增加新记录后,Visual FoxPro 将自动修改打开的所有索引。
示例
以下示例用 append blank 命令创建一个有 10 条记录的表,记录中包含有随机值,然后显示表的最大值和最小值。
CLOSE DATABASES
CREATE TABLE Random (cValue N(3))
FOR nItem = 1 TO 10 &&添加 10 条记录
APPEND BLANK
REPLACE cValue WITH 1 + 100 * RAND() &&插入随机值
ENDFOR
CLEAR
LIST &&显示值
gnMaximum = 1 &&初始的最小值
gnMinimum = 100 &&初始的最大值
SCAN
gnMinimum = MIN(gnMinimum, cValue)
gnMaximum = MAX(gnMaximum, cValue)
ENDSCAN
? '最小值是: ', gnMinimum &&显示最小值
? '最大值是: ', gnMaximum &&显示最大值
不会吧,升级到9.0连最基本的插入命令都不能用了?假设要在第3 第4条记录之间插入一条空记录,有两个方法:
go 3
insert blank
或
go 4
insert before blank
记住用insert 命令时,索引文件不能打开。
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)