以文本方式查看主题 -  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp) --  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2) ----  数据筛选问题  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=93849)

--  作者：有点蓝 --  发布时间：2016/12/8 16:25:00 --   Dim dr1 As DataRow = Tables("表A").Current.DataRow Dim exp As String = CExp("[产品]  = \'{0}\' And [规格] = \'{1}\'", dr1("产品") ,dr1("规格")) Tables("表B").Filter = exp