以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  请问：  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=59179)
--  作者：youngk
--  发布时间：2014/10/30 14:23:00
--  请问：
我想让窗口中的一个Table,有时候只显示最近五行数据怎么设置呢？
--  作者：Bin
--  发布时间：2014/10/30 14:26:00
--  
分页加载 http://www.foxtable.com/help/topics/2721.htm
--  作者：youngk
--  发布时间：2014/10/30 14:36:00
--  
不分页加载，只想让多余的行看不到就可以了，能办到吗？
--  作者：有点甜
--  发布时间：2014/10/30 14:40:00
--  

Dim count As Integer = 5
Dim str As String = ""
For Each r As DataRow In DataTables("表a").Select("", "_Sortkey desc")
    If count = 0 Then
        Exit For
    End If
    str &= r("_Identify") & ","
    count -= 1
Next

Tables("表a").Filter = "_Identify in (" & str.Trim(",") & ")"