vfp记录移动

来源：百度知道 编辑：UC知道 时间：2024/06/19 22:13:21
怎么样把DBF中的最后一条记录移到第一条记录?也就是说把第一条与最后一条交换.

DIMENSION abc(X) ** X 为字段个数
go bottom
copy to array abc
go 1
append blank before
go 1
append from array abc
go 2
copy to array abc
delete
go bottom
append from array abc

如果你的意思是在程序里面实现滚动,请按以下方法

加入一段代码

*往下移动判断代码
if eof() &&没有索引时recn()=recc()也可以
go top
else
skip
endif
*往上移动判断代码
if bof() &&或者没有索引时recn()=1也可以
go bott
else
skip -1
endif