以文本方式查看主题

-  易表在线答疑  (http://egrid2000.com/dvbbs/index.asp)
--  用户社区  (http://egrid2000.com/dvbbs/list.asp?boardid=2)
----  不用last()函数,如果移到筛选后可见行的最末行?  (http://egrid2000.com/dvbbs/dispbbs.asp?boardid=2&id=7301)

--  作者:fangling
--  发布时间:2007/4/11 8:48:00
--  不用last()函数,如果移到筛选后可见行的最末行?
请教各位:不不用last()函数,如何移到筛选后可见行的最末行?因为last()函数可移动到可见行的最末行,但不会自动翻屏,Move(rows,1)可以自动翻屏并可移到最末行,但不能移到筛选后可见行的最末行。
--  作者:Eval
--  发布时间:2007/4/11 9:03:00
--  
SendKeys(Concat("{down ",VisibleRows,"}")) And SetFocus("")
--  作者:fangling
--  发布时间:2007/4/12 8:51:00
--  
用楼上的公式,如果筛选后数据量大(超过百条记录)的话就要死机,请大家测试一下
--  作者:smileboy
--  发布时间:2007/4/12 9:25:00
--  
SetFocus("") And SendKeys("^{PGDN}")