VFP中表单中命令按钮下一条记录的代码上一条求高手，！！！

Question

如题所述

Answer 1

首先要有条件判断记录指针是否到达文件首。
上一条：
if
bof()
&&判断记录指针是否已经到达记录首位置
go
top
&&判断已在记录首位置，将记录指针移到记录首位置
else
&&否则
skip
-1
&&记录指针上移一条
endif
thisform.refresh
&&刷新当前表单。
下一次：
if
eof()
go
bottom
else
skip
1
endif
thisform.refresh
经Visual
FoxPro
6.0上机调试，正确不误。希望采纳。

Answer 2

你是不是说在表单中移动到下一条记录，移动到上一条记录
SKIP
-1
移动到下一条记录
SKIP
1
移动到上一条记录

Answer 3

首先要有条件判断记录指针是否到达文件首。
上一条：
if
bof()
&&判断记录指针是否已经到达记录首位置
go
top
&&判断已在记录首位置，将记录指针移到记录首位置
else

&&否则
skip
-1
&&记录指针上移一条
endif

thisform.refresh

&&刷新当前表单。
下一次：
if
eof()
go
bottom
else
skip
1
endif
thisform.refresh
经Visual
FoxPro
6.0上机调试，正确不误。