直接加上筛选条件，如
Dim filter As String = Tables("表A").Filter
DataTables("表A").Select(iif(filter>"", filter, "1=1") & " and 第二列 = '123456'")
加好友 
发短信
Post By：2015/11/2 9:11:00 [显示全部帖子]
