Question

VFP表单中上一个下一个按钮怎么写

若以下回答无法解决问题，邀请你更新回答

Answer 1

上一个

select tnlname   && 选择表
if  !bof()
    skip -1
    * 此处可以做刷新
else
    =messagebox （‘已经是第一条’）
endif

*下一个
select tnlname   && 选择表
if  !eof()
    skip 1
    * 此处可以做刷新
else
    =messagebox （‘已经是最后一条’）
endif