如图。 文本框内 要输入数据查询 ID 值，因为 ID 值是整数列， 所以下面的代码不好用，所以请高人指点一下啊。谢谢了！！

Dim txt As instring = e.Form.Controls("TextBox3")
Dim tbl As Table = Tables("order")
If txt = "" Then
    tbl.Filter = ""
Else
    txt = "\'*" & txt & "*\'"
    tbl.Filter = "ID = " & “

你最基本的概念都没有掌握，就开始做程序了。

Dim txt As String = e.Form.Controls("TextBox3").Value
Dim tbl As Table = Tables("order")
If txt = "" Then
    tbl.Filter = ""
Else
    tbl.Filter = "ID = " & txt
End If

建议你看看：

http://www.foxtable.com/help/topics/1647.htm

http://www.foxtable.com/help/topics/1284.htm

http://www.foxtable.com/help/topics/1058.htm

看了n次都不懂，留言也留了n次了。

总之还是要感谢 狐狸先生了