“%保存%”附近有语法错误。

Dim txt As String = e.Form.Controls("模糊搜索").Text
                Dim tbl As Table = CurrentTable
                If txt = "" Then
                    tbl.Filter = ""
                Else
                    txt = "\'%" & txt & "%\'"
                    Dim f As String = "1=2"
                    For Each c As Col In tbl.cols
                        If c.IsString Then
                            f = f & " or " & c.name & "Like" & txt
                        Else If c.Isnumeric Then
                            f = f & " or cast(" & c.name & " as nvarchar) Like" & txt
                        Else If c.IsDate Then
                            f = f & " or cast(" & c.name & " as nvarchar) Like" & txt
                        End If
                    Next
                    tbl.DataTable.loadFilter = f
                    tbl.DataTable.load
                End If

msgbox(f)