主题：如何按学生姓名筛选。

Dim xm As WinForm.TextBox = e.Form.Controls("TextBox1")
Dim txt As String = xm.Text
Dim tbl As Table = Tables("表A")
If txt = "" Then
    tbl.Filter = ""
Else
    txt = "'%" & txt & "%'"
   tbl.Filter = "学生姓名 Like " & txt & " "
End If

TextChanged事件