以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]Filler  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=55924)
--  作者：蝙蝠侠K02
--  发布时间：2014/8/26 11:24:00
--  [求助]Filler

任务表中有一列"参与人"
Dim mm As String = "张三,李四,王五"
Dim mn As String = "张三"
DataTables("任务表").DataRow("参与人") = mm
Dim f As New Filler
f.SourceTable = DataTables("任务表")
f.SourceCols = "任务主题,计划时间,完成时间"
f.DataTable = DataTables("统计")
f.DataCols = "任务主题,计划时间,完成时间"
f.Filter =
f.Fill() \'填充数据

 

我想写(filter)一行代码,若任务表中的"参与人"列包含"张三",就加载形成统计表
写了多次都不行,请问如何写代码?
--  作者：Bin
--  发布时间：2014/8/26 11:33:00
--  
f.Filter = "参与人=\'张三\' or 参与人 like \'%,张三\' or 参与人 like \'张三,%\' or 参与人 like \'%,张三,%\'"