上一条。
sele 表名
skip -1
thisform.text1.value=学号
.
.
.
.
下一条
sele 表名
skip
thisform.text1.value=学号
.
.
.
.
第一条
sele 表名
go top
最后
sele 表名
go bott
命令按钮组的CLICK事件的方法程序
DO CASE
CASE THIS.VALUE=1 &&上一条
IF RECNO()>1
SKIP -1
ENDIF
CASE THIS.VALUE=1 &&下一条
IF RECNO()<RECCOUNT()
SKIP
ENDIF
CASE THIS.VALUE=1 &&第一条
GO TOP
CASE THIS.VALUE=1 &&最后一条
GO BOTTOM
ENDCASE
THISFORM.TEXT1.VALUE=<你要显示的第一个字段名>
.....................................................................................