主题：此题何解？

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

 

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