用命令制表
表的第一列已经有数据
在执行下边命令时
会被提示“skip”已到文件尾
求指教
谢谢


b=1
do while b<=3^1
repl 第二列 with 1
skip
b=b+1
enddo
b=1
do while b<=3^1
repl 第二列 with 2
skip
b=b+1
enddo
b=1
do while b<=3^1
repl 第二列 with 3
skip
b=b+1
enddo

skip 是跳转下一条
appe blan 是添加一条空记录

建议楼主调试程序时每走一步就看看表文件的状态，以及在监视窗口中监控一下RECNO()。

请教：
怎么实现在第一列有数据的情况下
追加第二列数据
b=1
do while b<=3^1
repl 第二列 with 1
skip
b=b+1
enddo

skip 需要与eof()配合使用
 如 :
   skip
   if eof()
        go bott
    endif

*skip 特性
skip 如果到了 eof,这时你再 skip 就会出错
如:
skip
if eof()
    skip &&这时就程序就会出错！
endif

先skip  然后再追加
b=1
do while b<=3^1
skip
repl 第二列 with 1
b=b+1
enddo
如果只有第一列有数据 就appe blan后再追加
b=1
do while b<=3^1
appe blan
repl 第二列 with 1
b=b+1
enddo

如5楼说的 用eof()判断 如到最底就appe blan 不到就skip
b=1
do while b<=3^1
if eof()
appe blan
else
skip
endi
repl 第二列 with 1
b=b+1
enddo

replace是修改表中原有的记录，append才是追加；要向表中添加一条有意义的记录，先append blank追加一条空白的记录，在使用replace进行修改空白值。

第一个循环到尾了。要GO TOP，再第二个循环。

有一点想请教楼主：红色粗体部分中的“3^1”与直接写“3”有什么区别？