页框第二页的上一条下一条代码怎么编?
在第一页的命令按钮组上一条下一条有用,但是第二页的点了没反应
回复 2楼 吹水佬
do casecase thisform.pageframe1.
thisform.pageframe1.
go top
thisform.pageframe1.
case thisform.pageframe1.
thisform.pageframe1.
if !bof()
skip-1
else
thisform.pageframe1.
endif
case thisform.pageframe1.
thisform.pageframe1.
if !eof()
skip 1
else
thisform.pageframe1.
endif
case thisform.pageframe1.
thisform.pageframe1.
go bottom
thisform.pageframe1.
case thisform.pageframe1.
thisform.release
endcase
thisform.pageframe1.page2.refresh
代码是这样的