主题：[求助]查找问题

With e.Form.Controls("出厂编号查找")

    If .Value IsNot Nothing Then

        Dim v() As String =  .Value.split("、")

        Dim f2 As String

        For Each s As String In v

            f2 &= " 出厂编号 like '%" & s & "%' or"

        Next

        f2 = f2.SubString(0,f2.Length - 2)

        If Filter > "" Then

            Filter = Filter & " And "

        End If

        Filter = Filter & "( " & f2 & " )"

    End If

End With