主题：筛选

谁帮我写一下如下筛选代码:按最近上传时间之前的10个记录筛选

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:日期筛选.foxdb

Dim t As Table = Tables("表A")
t.sort = "上传时间 desc"
Dim idx As String = "-1,"
For i As Integer = 0 To 9
    If i < t.Rows.count Then
        idx &= t.Rows(i)("_Identify") & ","
    End If
Next
t.filter = "_Identify in (" & idx.trim(",") & ")"

谢大红袍