主题：怎么实现多表共用一个自建查找窗口

 密码多少？参考下面的代码

If e.KeyCode = Keys.Enter Then
    Dim filter As String = "1=2"
    For Each dc As Col In CurrentTable.Cols
        filter &= " or convert(" & dc.Name & ",'System.String') like '%" & e.Form.Controls("TextBox1").Text & "%'"
    Next
    
    CurrentTable.Filter = filter
End I