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 &&显示最大值
第一步:选定插入位置。可以用 go <记录号>的方法;
亦可在 Brow 浏览状态下点取,这样更直观。
第二步:插入。
在选定的记录后插入:insert blank
在选定的记录前插入:insert blank Before
最后要提醒一下,如此表已建立了索引,进行此 *** 作插入的记录,都在表尾!
1、如果你只是要添加记录的话,用菜单命令“view》append mode”就可以在表中连续添加记录而不需要一次次的添加空记录了。2、如果是要连续加空记录的话,用循环语句试试吧~
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)