全表查询,参考代码
dim str as string = e.form.controls("Textbox1").TextDim filter As String = "1=2"For Each c As Col In CurrentTable.Cols filter &= " or convert(" & c.name & ",'System.String') like '%" & str & "%'"NextCurrentTable.Filter = filter