Question

VFP表单中向上/下按钮的CLICK代码

VFP表单中向上按钮的CLICK代码怎么写？
要求到顶就按钮就失效，我写了个但是只能用一次~就是到顶就失效但是再向下就恢复不了
是控制表的指针的按钮

Answer 1

你的意思是控制表的指针向上向下吧？
你可以这样写：
向上的按钮(如名为xs):
skip -1
thisform.xx.Enabled=!eof()
向下的按钮(如名为xx)
skip 1
thisform.xs.Enabled=!(recn()=1)

Answer 2

向上:
if not bof()
skip-1
thisform.refresh
endif

向下:
if not eof()
skip-1
thisform.refresh
endif