可以,参考代码
Dim s As String = "111"Dim str As String = "1=2"For Each c As Col In CurrentTable.Cols str &= " or convert(" & c.name & ", 'System.String') like '%" & s & "%'"NextCurrentTable.filter = str