以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  判断错误  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=170099)

--  作者:yifan3429
--  发布时间:2021/7/12 15:11:00
--  判断错误
Dim dr As DataRow = DataTables("加载序列").SQLFind("主表=\'" & CurrentTable.Name & "\'")
If dr IsNot Nothing  Then \'一定要判断是否存在对应的行
    Forms(dr("主窗")).Open
End If

当没有内容的时候就会报错!

--  作者:有点蓝
--  发布时间:2021/7/12 15:21:00
--  
If dr IsNot Nothing andalso dr.isnull("主窗") = false andalso Forms.contains(dr("主窗")) Then \'一定要判断是否存在对应的行
    Forms(dr("主窗")).Open
End If