主题：[求助]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)一行代码,若任务表中的"参与人"列包含"张三",就加载形成统计表
写了多次都不行,请问如何写代码?