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 IfNextt.filter = "_Identify in (" & idx.trim(",") & ")"
加好友 
发短信
Post By：2016/2/24 9:56:00 [显示全部帖子]
