表单被输入查找内容后，在查寻记录时，还需要首条，末条、上一条、下一条按钮。应怎样制作这些按钮？求助编程代码！
   

[ 本帖最后由 sdfox 于 2012-3-14 20:38 编辑 ]

BOF()/EOF()
GO TOP/GO BOTTOM
看看就有思路了
再加一个MESSAGEBOX()
IF  ELSE  ENDIF
SKIP

[ 本帖最后由 sdta 于 2012-3-14 21:00 编辑 ]

首条
if not bof()
go top
thisform.refresh
endi
末条
if not eof()
go bott
thisform.refresh
endi
上一条
if not bof()
skip -1
thisform.refresh
endi
下一条
if not eof()
skip 1
thisform.refresh
endi

[ 本帖最后由 tlliqi 于 2012-3-14 21:11 编辑 ]

误人子弟

可以用 命令控件(commandButton), 也可以用 右键菜单(rightClick)~

至于相关代码, 可参照3楼~  当然可以更加简洁些~

其实呢, 为什么非要有 上/下条的按扭 呢?? 直接用键盘 方向键不就是了~






[ 本帖最后由 茵梦湖 于 2012-3-14 21:50 编辑 ]

其实呢, 为什么非要 上/下条 呢?? 直接用键盘 方向键不就是了~

首条
go top
thisform.refresh
末条
go bott
thisform.refresh
上一条
skip -1
if bof()
   go top
endif
thisform.refresh
下一条
skip
if eof()
   go bott
endif
thisform.refresh

[ 本帖最后由 qjbzjp 于 2012-3-14 22:43 编辑 ]

[ 本帖最后由 sdta 于 2012-3-14 23:39 编辑 ]

帮人就是一个字也是好意，你说什么“误人子弟”，那你一个人在这个论坛玩好了。。。。。无语

[ 本帖最后由 tlliqi 于 2012-3-14 23:21 编辑 ]

朋友：哈哈，是不是语气重了点。你帮人的出发点是好的，是值得赞扬的。但有时候帮忙会帮倒忙。也就是给你提个醒。