以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]包含格式问题  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=139969)

--  作者:wqc360
--  发布时间:2019/8/26 21:01:00
--  [求助]包含格式问题
For n As Integer = 0 To Tables("装配BOM表").count-1
    If e.Form.Controls("CheckBox1").Checked = True
        If Tables("装配BOM表").rows(n)("父级") Like e.Form.Controls("本级").Value Or Tables("装配BOM表").rows(n)("本级") = e.Form.Controls("本级").Value
            Tables("装配BOM表").rows(n)("审核") = True
        End If
    Else
        If Tables("装配BOM表").rows(n)("父级") = e.Form.Controls("本级").Value Or Tables("装配BOM表").rows(n)("本级") = e.Form.Controls("本级").Value
            Tables("装配BOM表").rows(n)("审核") = True
        End If
    End If
Next
DataTables("装配BOM表").Save()\'保存

请问红色部分,我想在筛选行时的这个逻辑:  Filter = "父级 Like \'" & .Value & "%\'"
不知要怎样写才可以合格。

--  作者:有点蓝
--  发布时间:2019/8/26 21:42:00
--  
 If Tables("装配BOM表").rows(n)("父级") Like  e.Form.Controls("本级").Value & "*" Or ......