以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  模糊查找记录为空出现”未将对象引用设置到对象的实例“报错  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=179139)

--  作者:comfortfoot
--  发布时间:2022/8/10 3:56:00
--  模糊查找记录为空出现”未将对象引用设置到对象的实例“报错
Dim txt As String = e.Form.Controls("cb_na").Text
Dim tbl As Table = Tables("录入_Table2")
Dim tbl1 As Table = Tables("录入_Table1")

If txt = "" Then
    tbl.Filter = ""
    tbl1.Filter = ""
Else
    txt = "\'%" & txt & "%\'"
    tbl.Filter = "全名 Like " & txt & " or No Like " & txt
    tbl1.Filter = "na Like " & txt & " or 编号 Like " & txt
    
End If

同样的代码,在一个窗口模糊查找如果数据为空,就直接不显示
但是另一个窗口就会出现 
的提示

--  作者:有点蓝
--  发布时间:2022/8/10 8:32:00
--  
应该是控件名称,或者表名称不正确
--  作者:comfortfoot
--  发布时间:2022/8/13 1:01:00
--  
检查了一下名称都没有问题
功能其实也不受影响,只不过出现报错,需要多点一下
但是两个窗口同样的代码,另一个就不会报错

--  作者:有点蓝
--  发布时间:2022/8/13 9:36:00
--  
请上传实例说明