Foxtable(狐表)用户栏目专家坐堂 → [求助] 动态查询


  共有4220人关注过本帖树形打印复制链接

主题:[求助] 动态查询

帅哥哟,离线,有人找我吗?
lsy
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:5246 积分:33163 威望:0 精华:8 注册:2013/1/17 21:28:00
  发帖心情 Post By:2014/1/27 7:28:00 [显示全部帖子]

Tables("表A").Sort = "第一列"
Dim idx As String
For i As Integer = 3 To 5
    idx + = Tables("表A").Rows(i)("_Identify") & ","
Next
Tables("表A").Filter = "_Identify In (" & idx.Trim(",") & ")"

 回到顶部