这段代码的功能：窗口中有textbox1控件，Button1，和table1。根据textbox1控件中输入内容，点击Button1后，更新table1的对应内容。

--------------

1  Dim T As String = forms("ERP界面").Controls("人事档案TextBox1").Value \'定义控件的值
2   Dim Filter As String  \'定义筛选
3 For Each dc As Col In Tables("人事档案_人事档案Table1").Cols \'遍历表的所有列
4   If dc.DataCol.IsDate OrElse dc.DataCol.IsBoolean OrElse dc.DataCol.IsNumeric Then  \'如果是时间列,逻辑列,数值列
5       Continue For    \'排除
6 End If
7  If Filter > "" Then    
8      Filter  = Filter & " Or "
9  End If
10  Filter = Filter  & "[" & dc.Name & "] Like \'*" & T & "*\'"    \'根据控件值迷糊筛选
11Next
12Tables("人事档案_人事档案Table1").Filter = Filter  \'将数据筛选出来

-------------

只要看不懂的是7、8句，第10句

请老师们指点下。

谢谢！